?swap ( a b ? -- a/b b/a )

Vocabulary

pair-methods

Inputs

a	an object
b	an object
?	an object

Outputs

a/b	an object
b/a	an object

Definition

USING: kernel ;

IN: pair-methods

: ?swap ( a b ? -- a/b b/a ) [ swap ] when ;