70900 #include "rundecs.h"
70910     (*  COPYRIGHT 1983 C.H.LINDSEY, UNIVERSITY OF MANCHESTER  *)
70920 (**)
70930 (**)
70940 (*+01() (*$X6*) ()+01*)
70950 (**)
70960 PROCEDURE DUMBACCH(PCOV: OBJECTP; LFN: LFNTYPE);
70970     BEGIN PCOV^.POSSIBLES := [] END;
70980 (**)
70990 (**)
71000 (*+01() (*$X4*) ()+01*)
71010 (**)
71020 (**)
71030 (*-02()
71040 BEGIN (*OF A68*)
71050 END; (*OF A68*)
71060 ()-02*)
71070 (*+01()
71080 BEGIN (*OF MAIN PROGRAM*)
71090 END (* OF EVERYTHING *).
71100 ()+01*)