Idris2/tests/idris2/interface/interface020/LocalInterface.idr
2023-09-07 14:57:22 +01:00

10 lines
152 B
Idris

interface Add a where
add : a -> a
testAdd : Nat -> Nat -> Nat
testAdd x y = add x
where
Add Nat where
add Z = y
add (S k) = add k