(]){0(%stdin)(r)file 99 string readline{{2 copy xor(%stdout)(w)file exch write not 32 and xor}forall()=]}if}def]