: K 37 2 DO I base ! 257 2 .r CR LOOP ; K