; @origtpdbfilename emmes-nonloop-ex2_4.trs
; @xtcfilename "./TRS_Standard/EEG_IJCAR_12/emmes-nonloop-ex2_4.xml"
(format TRS)
(fun f 3)
(fun true 0)
(fun gt 2)
(fun double 1)
(fun s 1)
(fun |0| 0)
(fun false 0)
(fun times 2)
(fun plus 2)
(rule (f true x y) (f (gt x y) (double x) (s y)))
(rule (gt (s x) |0|) true)
(rule (gt |0| y) false)
(rule (gt (s x) (s y)) (gt x y))
(rule (double x) (times x (s (s |0|))))
(rule (times |0| y) |0|)
(rule (times (s x) y) (plus y (times x y)))
(rule (plus |0| y) y)
(rule (plus (s x) y) (plus x (s y)))