3 | catchException "fail"
5 | | pushValue (\u1 -> (\u2 -> 'a' : ('a' : Term)))
7 | | lift2Value (\u1 -> (\u2 -> u1 u2))
9 | | lift2Value (\u1 -> (\u2 -> u1 u2))
10 | | popException "fail"
11 | | popException "fail"
15 | raiseException "fail"
19 choicesBranch [(\u1 -> u1)]
21 | catchException "fail"
23 | | pushValue (\u1 -> (\u2 -> 'a' : ('b' : Term)))
25 | | lift2Value (\u1 -> (\u2 -> u1 u2))
27 | | lift2Value (\u1 -> (\u2 -> u1 u2))
28 | | popException "fail"
32 | raiseException "fail"