fmod NATURALS-SIGN is sort Nat . op 0 : -> Nat [ctor] . op s : Nat -> Nat [ctor] . endfm