Idris2/tests/idris2/literate006/expected

18 lines
513 B
Plaintext
Raw Normal View History

1/1: Building Door (Door.lidr)
Main> > (val # y) => ?now_4
Main> > (True # d) => ?now_4
> (False # d) => ?now_5
Main> 0 m : Type -> Type
1 d : Door Open
x : Integer
0 r : Res Bool (\r => Door (if r then Open else Closed))
2020-08-18 15:36:34 +03:00
------------------------------
now_2 : Use Many m ()
Main> 0 m : Type -> Type
1 d : Door Closed
x : Integer
0 r : Res Bool (\r => Door (if r then Open else Closed))
2020-08-18 15:36:34 +03:00
------------------------------
now_3 : Use Many m ()
Main> Bye for now!