le 0 y true le s x 0 false le s x s y le x y minus x 0 x minus s x s y minus x y mod 0 y 0 mod s x 0 0 mod s x s y if_mod le y x s x s y if_mod true x y mod minus x y y if_mod false s x s y s x le 2 0 0 true 0 s 1 false 0 minus 2 mod 2 if_mod 3 INNERMOST ./TRS/AG01/#4.30b.trs