sorts Nat < Int
op 0 : Nat
op __ - __ : Nat * Nat -> Int
sort s
var a :s
forall a : Nat
. def a - 0