Fei at 21:15, 15 November 2006

2006-11-15T21:15:21Z

← Older revision		Revision as of 21:15, 15 November 2006
Line 25:		Line 25:
	Producer.lse DEBUG		Producer.lse DEBUG
	Consumer.lse DEBUG		Consumer.lse DEBUG

	Spatial Variables:		Spatial Variables:
	LSState[3]		LSState[3]

	Legends:		Legends:
	LSStateTypes = {0:Uncolonised, 1:Producer, 2:Consumer}		LSStateTypes = {0:Uncolonised, 1:Producer, 2:Consumer}

	Global Variables:		Global Variables:
	pInitialProducer = 0.01		pInitialProducer = 0.01
Line 40:		Line 37:
	pDeathConsumer = 0.05		pDeathConsumer = 0.05
	Output Frequency: 1		Output Frequency: 1


	===consumer.lse===		===consumer.lse===
Line 63:		Line 59:
	// Decide if this cell survives		// Decide if this cell survives
	Dies = UNIFORM(0,1) < pDeathConsumer		Dies = UNIFORM(0,1) < pDeathConsumer

	// If the consumer is dying		// If the consumer is dying
	IF Dies		IF Dies
Line 88:		Line 83:
	n = n + (UNIFORM(0,1) < pSpreadConsumer)		n = n + (UNIFORM(0,1) < pSpreadConsumer)
	ENDFN		ENDFN

	NUMOFFSPRING = n		NUMOFFSPRING = n
	isSedentary = FALSE		isSedentary = FALSE

Fei at 21:13, 15 November 2006

2006-11-15T21:13:50Z

Show changes

Fei at 21:04, 15 November 2006

2006-11-15T21:04:03Z

New page

==Summary==

==Screenshot==

[[Image:Consumer.gif]]

==Download Model==

Download the .scn, .sel and .lse files by clicking on the following link: [[Image:ProducerConsumer.zip]]

==Model Code Exploration==

In the following sections we will examine all of the model files for this model. Note that instead of downloading the zip file above, you could just copy the text in the boxes below into a text editor and save it with the appropriate name (Section title). Opening the resulting .scn file in the SELES simulator would run this model.

===Consume.scn===
Seles Scenario
Model.sel
SimPriority Low Priority

===Model.sel===
Seles Model
Time Units: Step kiloStep 1000 1000
Landscape Events:
Producer.lse DEBUG
Consumer.lse DEBUG
Update.lse DEBUG
Spatial Variables:
LSState[3]
PrevLSState[3]
Legends:
LSStateTypes = {0:Uncolonised, 1:Producer, 2:Consumer}
Global Variables:
pInitialProducer = 0.01
pInitialConsumer = 0.01
pSpreadProducer = 0.1
pSpreadConsumer = 0.2
pDeathProducer = 0.01
pDeathConsumer = 0.05
// SpreadRateProducer = 1
// SpreadRateConsumer = 1
Output Frequency: 1

===consumer.lse===
// Process based definition for consumber behaviour in producer/consumer model
LSEVENT: Consumder
DEFINITIONS
LAYER: LSState, PrevLSState
GLOBAL CONSTANT: Uncolonised, Producer, Consumer
GLOBAL VARIABLE: pInitialConsumer, pSpreadConsumer, pDeathConsumer //, SpreadRateConsumer
ENDDEF
// Just start once
RETURNTIME = 0
// Initialize in an empty cell
PROBINIT = IF LSState EQ Uncolonised THEN pInitialConsumer ELSE 0
TRANSITIONS
// Decide if this cell survives
Dies = UNIFORM(0,1) < pDeathConsumer
// If the consumer is dying
IF Dies
LSState = Uncolonised
ENDFN
TRANSITIONS = !Dies
LSState = Consumer
ENDTR
SPREADTIMESTEP = 1 //SpreadRateConsumer
SPREADLOCATION
REGION CENTRED(0,1, WRAPPED)
ENDSL
SPREADPROB
// Always spread to the same cell (self), and spread probabilistical to neighbouring producer cells
SPREADPROB = IF Location EQ (SOURCE Location) THEN 1
ELSE IF PrevLSState EQ Producer THEN pSpreadConsumer
ELSE 0
ENDSP

===producer.lse===
// Process based definiton of producer behaviour in producer/consumer model
LSEVENT: Producer
DEFINITIONS
LAYER: LSState, PrevLSState
GLOBAL CONSTANT: Uncolonised, Producer, Consumer
GLOBAL VARIABLE: pInitialProducer, pSpreadProducer, pDeathProducer //, SpreadRateProducer
ENDDEF
// Just start once
RETURNTIME = 0
// Initialize in an empty cell
PROBINIT = IF LSState EQ Uncolonised THEN pInitialProducer ELSE 0
TRANSITIONS
// Decide if this cell survives
Dies = UNIFORM(0,1) < pDeathProducer
// If the producer is dying
IF Dies
LSState = Uncolonised
ENDFN
TRANSITIONS = (!Dies)
LSState = Producer
ENDTR
SPREADTIMESTEP = 1 //SpreadRateProducer
SPREADLOCATION
notEaten = PrevLSState EQ Producer // check that the producer wasn't eaten during the last step
REGION CENTRED(0, 1, WRAPPED)
DECISION notEaten // don't spread if eaten (i.e. stop process)
ENDSL
SPREADPROB
// Always spread to the same cell (self), and spread probabilistically to empty neighbouring cells
SPREADPROB = IF Location EQ (SOURCE Location) THEN 1 // spread to same cell
ELSE IF PrevLSState EQ Uncolonised THEN pSpreadProducer
ELSE 0
ENDSP

===update.lse===
// Event to update time step
LSEVENT: Update
DEFINITIONS
LAYER: LSState, PrevLSState
ENDDEF
RETURNTIME
RETURNTIME = 1
PrevLSState = LSState
ENDRT
NUMCLUSTERS = 0

==Suggested Experiments==

To explore this cellular automata model further, try the following:

The IBM model - Revision history

Fei at 21:15, 15 November 2006

Fei at 21:13, 15 November 2006

Fei at 21:04, 15 November 2006