Idris2/tests/idris2/misc/import001/Nat.idr
2023-09-07 14:57:22 +01:00

10 lines
128 B
Idris

module Nat
public export
data Nat = Z | S Nat
public export
plus : Nat -> Nat -> Nat
plus Z y = y
plus (S k) y = S (plus k y)