(VAR x y)

(DATATYPES
  Nat = µX.< 0, s(X) >
)

(SIGNATURES
  minus :: Nat x Nat -> Nat
)

(RULES
  minus(x, 0) -> x
  minus(s(x), s(y)) -> minus(x, y)
)
(COMMENT
)