Idris2/tests/idris2/basic/basic028/input
2023-09-07 14:57:22 +01:00

7 lines
153 B
Plaintext

:l "Do.idr"
mPatBind (Just (S Z)) (Just (S (S Z)))
mPatBind (Just (S Z)) Nothing
mLetBind (Just (S Z)) (Just (S (S Z)))
mLetBind (Just (S Z)) Nothing
:q