/home/nowonder/forschung/aprove/TPDB05/TRS/AG01/#3.1.trs

The program

(from AG01 3.1)
(VAR x y)
(RULES
minus(x,0)  -> x
minus(s(x),s(y)) -> minus(x,y)
quot(0,s(y)) -> 0
quot(s(x),s(y)) -> s(quot(minus(x,y),s(y)))
)