; @origtpdbfilename ./TRS/D33/21.trs
; @xtcfilename "./TRS_Standard/Der95/21.xml"
(format TRS)
(fun p 1)
(fun s 1)
(fun fact 1)
(fun |0| 0)
(fun * 2)
(fun + 2)
(rule (p (s x)) x)
(rule (fact |0|) (s |0|))
(rule (fact (s x)) (* (s x) (fact (p (s x)))))
(rule (* |0| y) |0|)
(rule (* (s x) y) (+ (* x y) y))
(rule (+ x |0|) x)
(rule (+ x (s y)) (s (+ x y)))