9/f(%stdin)(r)file def/a{/c f read{def c c 7 mod 2 and 2 eq{xor 7 gt{(failed at: )print(EOL)c 10 ne{f c unread f 127 string readline pop}if = clear 9}if count 0 eq{(yes)= 9}if}if a}if}def a