Test.obn

   1 MODULE Test;
   2
   3 TYPE
   4
   5   PC = ARRAY 3 OF PB;
   6
   7   B = RECORD z : PC; next : PB END;
   8
   9   PB = POINTER TO B;
  10
  11 END Test.