floyd=: verb define for_j. i.#y do. y=. y <. j ({"1 +/ {) y end. )