{ @ewe ( 8 4 7 tak @ewe.call ) } @ewe def tak ; @ewe.stack ~( $x $y $z ) { @ewe ( $x $y $z $y $x @ewe.lt @ewe.not tak.true tak.false @ewe.if ) } @ewe def tak.true ; @ewe.stack ~( $x $y $z ) { @ewe ( $x 1 @ewe.sub $y $z tak @ewe.call $y 1 @ewe.sub $z $x tak @ewe.call $z 1 @ewe.sub $x $y tak @ewe.call tak @ewe.call ) } @ewe def tak.false ; @ewe.stack ~( $x $y $z ) { @ewe $z }