NatEx.hascasl.hs revision 4d5f32c7e4e49e726f5d10943be3718afdff73cd
module Dummy where
import Prelude (undefined, Show, Eq, Ord, Bool)
import MyLogic
f :: Nat -> Nat
prec :: Nat -> Nat
prec (Suc x_11_11) = x_11_11
data Nat = Zero
| Suc !Nat
deriving (Show, Eq, Ord)
f x = Suc x