mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-12-27 13:43:28 +03:00
6 lines
159 B
Idris
6 lines
159 B
Idris
|
data Baz : Int -> Type where
|
||
|
AddThings : (x : Int) -> (y : Int) -> Baz (x + y)
|
||
|
|
||
|
addBaz : (x : Int) -> Baz x -> Int
|
||
|
addBaz (x + y) (AddThings x z) = x + y
|