Jump to content

Spreading.lse

From SELESwiki
Revision as of 16:44, 8 November 2006 by JSH (talk | contribs)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
 DistanceFromSrc = d

ENDTR

SPREADTIMESTEP = distInc


SPREADLOCATION

  maxD = IF (1 <= SpreadType <= 3) THEN 1.5 ELSE 1
  
  REGION CENTRED(1, maxD)
     DECISION DistanceFromSrc > (DISTANCE(StartLocation, Location))

ENDSL


SPREADPROB

  SPREADPROB = 1
  d = ROUND(DISTANCE(StartLocation, Location))
  distInc = CLASSIFY(SpreadType)
              0: 1
              1: 1
              2: DISTANCE(Location, SOURCE Location)
              3: MAX(0,d - SOURCE DistanceFromSrc)
             ENDFN

ENDSP

Return to Spreading1 model overview