1
1
mirror of https://github.com/edwinb/Idris2-boot.git synced 2024-12-21 11:51:31 +03:00
Idris2-boot/tests/idris2/basic023/expected
2019-09-24 20:26:25 +06:00

10 lines
450 B
Plaintext

1/1: Building Params (Params.idr)
Main> Main.Dict : (a -> a -> Bool) -> Type -> Type
Main> Main.MkDict : (eq : (a -> a -> Bool)) -> List (a, b) -> Dict eq b
Main> Main.lookup : (a -> a -> Bool) -> a -> List (a, b) -> Maybe b
Main> Main.lookupK : (eq : (a -> a -> Bool)) -> a -> Dict eq b -> Maybe b
Main> MkDict (\{arg:0} => (\{arg:1} => (intToBool (prim__eq_Int arg arg)))) [(0, "foo"), (1, "bar")]
Main> Just "bar"
Main> Nothing
Main> Bye for now!