File psl-1983/3-1/tests/20/init7 from the latest check-in

(de mkquote(x) (list 'quote x))
(de flag(x y) NIL)
(prin2t "sub2.init")(lapin "sub2.init")
(prin2t "sub3.init")(lapin "sub3.init")
(prin2t "sub4.init")(lapin "sub4.init")
(prin2t "sub5a.init")(lapin "sub5a.init")
(prin2t "sub5b.init")(lapin "sub5b.init")
(prin2t "sub6.init")(lapin "sub6.init")
(prin2t "sub7.init")(lapin "sub7.init")
(prin2t "main7.init")(lapin "main7.init")