: A ." "FOR ." ##"NEXT CR ; : B DUP FOR ." #"I IF ." "THEN NEXT CR ; STDIN INCLUDE-FILE 1- DUP A ." "B B B B ." "B A