1 17{2 mul (%stdin) (r) file read pop 2 mod add}repeat dup -9 bitshift mul 2 32 string cvrs 18 8 getinterval =