pushValue GHC.Show.show
  minReads=2
  mayRaise=[ExceptionFailure]
  alwaysRaise=[]
  freeRegs=[]
join join
  minReads=0
  mayRaise=[]
  alwaysRaise=[]
  freeRegs=[]
| lift2Value (\u_0 -> \u_1 -> u_0 u_1)
|   minReads=0
|   mayRaise=[]
|   alwaysRaise=[]
|   freeRegs=[]
| ret
|   minReads=0
|   mayRaise=[]
|   alwaysRaise=[]
|   freeRegs=[]
catch ExceptionFailure
  minReads=2
  mayRaise=[ExceptionFailure]
  alwaysRaise=[]
  freeRegs=[]
| <catchScope>
| | catch ExceptionFailure
| |   minReads=2
| |   mayRaise=[ExceptionFailure]
| |   alwaysRaise=[]
| |   freeRegs=[]
| | | <catchScope>
| | | | pushValue (\u_0 -> \u_1 -> (GHC.Types.:) 'a' ((GHC.Types.:) 'a' GHC.Types.[]))
| | | |   minReads=2
| | | |   mayRaise=[ExceptionFailure]
| | | |   alwaysRaise=[]
| | | |   freeRegs=[]
| | | | comment "satisfy ((GHC.Classes.==) 'a')"
| | | |   minReads=2
| | | |   mayRaise=[ExceptionFailure]
| | | |   alwaysRaise=[]
| | | |   freeRegs=[]
| | | | read ((GHC.Classes.==) 'a')
| | | |   minReads=2
| | | |   mayRaise=[ExceptionFailure]
| | | |   alwaysRaise=[]
| | | |   freeRegs=[]
| | | | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
| | | |   minReads=1
| | | |   mayRaise=[ExceptionFailure]
| | | |   alwaysRaise=[]
| | | |   freeRegs=[]
| | | | comment "satisfy ((GHC.Classes.==) 'a')"
| | | |   minReads=1
| | | |   mayRaise=[ExceptionFailure]
| | | |   alwaysRaise=[]
| | | |   freeRegs=[]
| | | | read ((GHC.Classes.==) 'a')
| | | |   minReads=1
| | | |   mayRaise=[ExceptionFailure]
| | | |   alwaysRaise=[]
| | | |   freeRegs=[]
| | | | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
| | | |   minReads=0
| | | |   mayRaise=[]
| | | |   alwaysRaise=[]
| | | |   freeRegs=[]
| | | | commit ExceptionFailure
| | | |   minReads=0
| | | |   mayRaise=[]
| | | |   alwaysRaise=[]
| | | |   freeRegs=[]
| | | | commit ExceptionFailure
| | | |   minReads=0
| | | |   mayRaise=[]
| | | |   alwaysRaise=[]
| | | |   freeRegs=[]
| | | | refJoin join
| | | |   minReads=0
| | | |   mayRaise=[]
| | | |   alwaysRaise=[]
| | | |   freeRegs=[]
| | | <onException ExceptionFailure>
| | | | loadInput
| | | |   minReads=0
| | | |   mayRaise=[ExceptionFailure]
| | | |   alwaysRaise=[ExceptionFailure]
| | | |   freeRegs=[]
| | | | fail []
| | | |   minReads=0
| | | |   mayRaise=[ExceptionFailure]
| | | |   alwaysRaise=[ExceptionFailure]
| | | |   freeRegs=[]
| <onException ExceptionFailure>
| | comment "raiseAgainIfConsumed"
| |   minReads=2
| |   mayRaise=[ExceptionFailure]
| |   alwaysRaise=[]
| |   freeRegs=[]
| | saveInput
| |   minReads=2
| |   mayRaise=[ExceptionFailure]
| |   alwaysRaise=[]
| |   freeRegs=[]
| | lift2Value ((GHC.Classes.==) @GHC.Types.Int)
| |   minReads=2
| |   mayRaise=[ExceptionFailure]
| |   alwaysRaise=[]
| |   freeRegs=[]
| | choicesBranch
| |   minReads=2
| |   mayRaise=[ExceptionFailure]
| |   alwaysRaise=[]
| |   freeRegs=[]
| | | <branch (\u_0 -> u_0)>
| | | | catch ExceptionFailure
| | | |   minReads=2
| | | |   mayRaise=[ExceptionFailure]
| | | |   alwaysRaise=[]
| | | |   freeRegs=[]
| | | | | <catchScope>
| | | | | | pushValue (\u_0 -> \u_1 -> (GHC.Types.:) 'a' ((GHC.Types.:) 'b' GHC.Types.[]))
| | | | | |   minReads=2
| | | | | |   mayRaise=[ExceptionFailure]
| | | | | |   alwaysRaise=[]
| | | | | |   freeRegs=[]
| | | | | | comment "satisfy ((GHC.Classes.==) 'a')"
| | | | | |   minReads=2
| | | | | |   mayRaise=[ExceptionFailure]
| | | | | |   alwaysRaise=[]
| | | | | |   freeRegs=[]
| | | | | | read ((GHC.Classes.==) 'a')
| | | | | |   minReads=2
| | | | | |   mayRaise=[ExceptionFailure]
| | | | | |   alwaysRaise=[]
| | | | | |   freeRegs=[]
| | | | | | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
| | | | | |   minReads=1
| | | | | |   mayRaise=[ExceptionFailure]
| | | | | |   alwaysRaise=[]
| | | | | |   freeRegs=[]
| | | | | | comment "satisfy ((GHC.Classes.==) 'b')"
| | | | | |   minReads=1
| | | | | |   mayRaise=[ExceptionFailure]
| | | | | |   alwaysRaise=[]
| | | | | |   freeRegs=[]
| | | | | | read ((GHC.Classes.==) 'b')
| | | | | |   minReads=1
| | | | | |   mayRaise=[ExceptionFailure]
| | | | | |   alwaysRaise=[]
| | | | | |   freeRegs=[]
| | | | | | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
| | | | | |   minReads=0
| | | | | |   mayRaise=[]
| | | | | |   alwaysRaise=[]
| | | | | |   freeRegs=[]
| | | | | | commit ExceptionFailure
| | | | | |   minReads=0
| | | | | |   mayRaise=[]
| | | | | |   alwaysRaise=[]
| | | | | |   freeRegs=[]
| | | | | | refJoin join
| | | | | |   minReads=0
| | | | | |   mayRaise=[]
| | | | | |   alwaysRaise=[]
| | | | | |   freeRegs=[]
| | | | | <onException ExceptionFailure>
| | | | | | loadInput
| | | | | |   minReads=0
| | | | | |   mayRaise=[ExceptionFailure]
| | | | | |   alwaysRaise=[ExceptionFailure]
| | | | | |   freeRegs=[]
| | | | | | fail []
| | | | | |   minReads=0
| | | | | |   mayRaise=[ExceptionFailure]
| | | | | |   alwaysRaise=[ExceptionFailure]
| | | | | |   freeRegs=[]
| | | <default>
| | | | fail []
| | | |   minReads=0
| | | |   mayRaise=[ExceptionFailure]
| | | |   alwaysRaise=[ExceptionFailure]
| | | |   freeRegs=[]