PROCEDURES	input.e	/^deferred class PROCEDURES$/;"	c
procedure0	input.e	/^	procedure0$/;"	f	class:PROCEDURES
procedure1	input.e	/^	procedure1 (one: STRING)$/;"	f	class:PROCEDURES
procedure2	input.e	/^	procedure2 (one: INTEGER; two: STRING)$/;"	f	class:PROCEDURES
procedure_full	input.e	/^	procedure_full (one: STRING)$/;"	f	class:PROCEDURES
