1MODULE Generic76; 2 3TYPE 4 Alp = POINTER TO AlpDesc; 5 AlpDesc = RECORD [ABSTRACT] 6 END; 7 8PROCEDURE (self: Alp) [ABSTRACT] INIT*(); END INIT; 9 10END Generic76. 11