File psl-1983/3-1/tests/20/main6.init from the latest check-in

(FLAG (QUOTE (INIT20 PUTC20 GETC20 TIMC20 QUIT20 ERR20 PUTI20)) (QUOTE 
FOREIGNFUNCTION))
(GLOBAL (QUOTE (IN!* OUT!*)))
(FLUID (QUOTE (UNDEFNCODE!* UNDEFNNARG!*)))
(FLUID (QUOTE (UNDEFNCODE!* UNDEFNNARG!*)))
(GLOBAL (QUOTE (LAMBDA1 LAMBDA2 CODEFORM!*)))