RosettaCodeData/Task/Runtime-evaluation-In-an-environment/Factor/runtime-evaluation-in-an-environment-3.factor

: bi@- ( a b quot -- n ) bi@ - ; inline