0 0 1002{(%stdin)(r)file read{3 copy or xor 1 and( #)exch 1 getinterval print}if}repeat(#)=