<<>> <> <> <> XMesaCmplr10Defs1: DEFINITIONS = BEGIN i1: INTEGER = 1; i2: INTEGER; c1: CARDINAL =1; c2: CARDINAL; r1: REAL = 1.0; r2: REAL; char1: CHAR = 'a; char2: CHAR; b1: BOOLEAN = TRUE; b2: BOOLEAN; SimplRecord: TYPE = RECORD[ anInt: INTEGER ¬ 9, aCard: CARDINAL ¬ 9, aReal: REAL ¬ 9.0, aChar: CHAR ¬ 'j, aBool: BOOLEAN ¬ TRUE]; iArray: TYPE = ARRAY [0..5] OF INTEGER; cArray: TYPE = ARRAY [0..5] OF CARDINAL; rArray: TYPE = ARRAY [0..5] OF REAL; charArray: TYPE = ARRAY [0..5] OF CHAR; bArray: TYPE = ARRAY [0..5] OF BOOLEAN; Geti: PROCEDURE RETURNS[INTEGER]; Getc: PROCEDURE RETURNS[CARDINAL]; Getr: PROCEDURE RETURNS[REAL]; Getchar: PROCEDURE RETURNS[CHAR]; Getb: PROCEDURE RETURNS[BOOLEAN]; END..