program incltest (input, output); #include "incltypes.h" #include "included.h" var p : T; q : OT; r : RT; begin new(r); r^.i := 3; r^.j := 4; Blah; end.