Spreading.lse
Appearance
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