perm filename X.LST[S,AIL] blob sn#038291 filedate 1973-05-02 generic text, type T, neo UTF8
M		SAIL	2-MAY-73   18:14 X       1-1
M

␈Bβ¬BEGIN
↓x␈A000010   00100	begin "x"
␈B↓ε064127α↓ε064155α↓ε064203α↓ε064216α↓ε064244α↓ε064272αεε064346␈A000010   00200	  define x="i";
␈BβπINTEGER↓ε064361α␈A000010   00300	  integer i;
␈B¬ε064346↓ε064361␈A000011   00400	   x←3
␈BββEND∞↓x	ε064127πUNBOUND	ε064155εMAINPI	ε064203βNIC	ε064216εEVTYPI	ε064244βANY	ε064272εBINDITε064346↓X	ε064361↓I␈A000057   00500	end "x";