: ---> ( w x y z -- x y z w ) roll ; : <--- ( w x y z -- z w x y ) -roll ;