Anonymous user
Brownian tree: Difference between revisions
m
→{{header|REXX}}: added whitespace.
m (→{{header|REXX}}: tided up some code.) |
m (→{{header|REXX}}: added whitespace.) |
||
Line 3,756:
BM: do x =minX to maxX; xm= x - 1; xp= x + 1 /*two handy─dandy values. */
do y=minY to maxY; if @.x.y\==mote then iterate /*Not a mote: keep looking.*/
if x<loX then loX=x; if x>hiX then hiX=
if y<loY then loY=y; if y>hiY then hiY=
if @.xm.y ==tree then do; @.x.y= tree; iterate; end /*there a neighbor of tree? */
if @.xp.y ==tree then do; @.x.y= tree; iterate; end /* " " " " " */
|