Idris2/tests/idris2/basic/basic006/PMLet.idr
2023-09-07 14:57:22 +01:00

13 lines
275 B
Idris

import Stuff
foo : Int -> Maybe Int
foo 0 = Nothing
foo x = Just (prim__mul_Int x 2)
testLet : Int -> Int
testLet x = let y = prim__mul_Int x 2
Just ans = foo y
| Nothing => 99
z = prim__mul_Int ans 2
in z