[Oberon] Initializations of lookup-tables

[Christian Wassmer]

Hello

How do I build pre-calculated lookup-tables like this one:

lookupTable: ARRAY 32 OF LONGINT;

[...]

PROCEDURE InitTable();
BEGIN
	lookupTable[0] := 4234;
	lookupTable[1] := 2342;
	lookupTable[2] := 23423;
	lookupTable[3] := 22634;
	lookupTable[4] := 3462;
END InitTable;

Instead of calculating each the time the value I need, I just jump into 
this lookup-table fetching the correct value.

-Christian Wassmer