; @origtpdbfilename ./TRS/AG01/#3.42.trs
; @xtcfilename "./TRS_Standard/AG01/#3.42.xml"
(format TRS)
(fun half 1)
(fun |0| 0)
(fun s 1)
(fun lastbit 1)
(fun conv 1)
(fun cons 2)
(fun nil 0)
(rule (half |0|) |0|)
(rule (half (s |0|)) |0|)
(rule (half (s (s x))) (s (half x)))
(rule (lastbit |0|) |0|)
(rule (lastbit (s |0|)) (s |0|))
(rule (lastbit (s (s x))) (lastbit x))
(rule (conv |0|) (cons nil |0|))
(rule (conv (s x)) (cons (conv (half (s x))) (lastbit (s x))))