until[eof?][apply[pr last power last ? 4+modulo ?2 4]rl]bye