priffle
.
((<)*.zip2.(iota.#,repeat.(1,#)o)o,repeat.(1000,#.mask.(iota.#,(<)*.zip2.(iota.#,repeat.(1,#)o)o)o)o,select.(id,(-)*.zip2.(mask.(iota.#,(~)*.(<)*.zip2.(iota.#,repeat.(1,#)o)o)o,repeat.(1,#.mask.(iota.#,(~)*.(<)*.zip2.(iota.#,repeat.(1,#)o)o)o)o)o)o)o