MODULE Test;

TYPE

  PC = ARRAY 3 OF PB;

  B = RECORD z : PC; next : PB END;

  PB = POINTER TO B;

END Test.