|
GameOfLife.m2 |
PROCEDURE InitWorld(VAR world: World); (* initialisiert die Welt fuer die Eingabe *) VAR i, j: WorldIndex; BEGIN FOR i := MIN(WorldIndex) TO MAX(WorldIndex) DO FOR j := MIN(WorldIndex) TO MAX(WorldIndex) DO world[i, j] := space; END; END; END InitWorld; |
Da beim Einlesen nur die Felder initialisiert werden,
die in der Eingabe ihre Repräsentierung finden, ist
es notwendig zuvor die gesamte Matrix zu initialisieren.
| |
Um flexibel gegenüber Programmänderungen zu sein,
empfiehlt es sich bei solchen FOR-Schleifen immer,
einen entsprechenden Bereichstyp zur Hand zu haben,
um die MIN- und MAX-Funktionen dafür
auszunutzen.
|
Copyright © 1999 Andreas Borchert, in HTML konvertiert am 04.02.1999 |