GridParticipant subclass: #GjParticipant
	instanceVariableNames: 'mcom'
	classVariableNames: ''
	poolDictionaries: ''
	category: 'Grid-June'!

!GjParticipant methodsFor: 'as yet unclassified' stamp: 'strick 6/30/2007 14:59'!
demoWorlds

	^ { GridWorldDemo5x5. }! !

!GjParticipant methodsFor: 'as yet unclassified' stamp: 'strick 6/30/2007 15:03'!
entry

	| w | 
	w := self demoWorlds first.

	^entry ifNil: [self entryWorld: w. entry].

! !

!GjParticipant methodsFor: 'as yet unclassified' stamp: 'strick 7/1/2007 08:50'!
initialize

	mcom = MatterCompiler new.

	super initialize.

 ! !

"-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- "!

GjParticipant class
	instanceVariableNames: ''!

!GjParticipant class methodsFor: 'as yet unclassified' stamp: 'strick 6/30/2007 11:47'!
descriptionForPartsBin
	^ self partName:	'Grid JUNE'
		categories:		#('Strick')
		documentation:	'not yet'
		sampleImageForm: self defaultForm.! !


GridWorld subclass: #GridWorldDemo5x5
	instanceVariableNames: ''
	classVariableNames: ''
	poolDictionaries: ''
	category: 'Grid-June'!

!GridWorldDemo5x5 methodsFor: 'as yet unclassified' stamp: 'strick 6/30/2007 14:53'!
demoSize

	"A 5x5 world is more interesting demo; it takes a while to explore 25 parcels."

	^ 5 @ 5! !