collapseos/blk/109

: _U ( U without P, used in VE )
    15 EDPOS @ 64 / - 0 DO
        14 I - _mvln+
    LOOP ;
: U _U P ;