collapseos/blk/155

: FILL ( a n b -- )
    SWAP 2 PICK + ( a b a+n ) ROT ( b a+n a ) DO ( b )
        DUP I C!
    LOOP DROP ;