1 type 2 OT = integer; 3 T = record 4 a, b : integer; 5 end; 6 7 var v : integer; 8 9 procedure Blah ; external; 10