pushValue GHC.Show.show
  minReads=(Right 3)
  mayRaise=[ExceptionFailure]
catch ExceptionFailure
  minReads=(Right 3)
  mayRaise=[ExceptionFailure]
| <ok>
| | pushValue (GHC.Types.:)
| |   minReads=(Right 3)
| |   mayRaise=[ExceptionFailure]
| | pushValue (\x_0 -> \x_1 -> x_0)
| |   minReads=(Right 3)
| |   mayRaise=[ExceptionFailure]
| | pushValue 'a'
| |   minReads=(Right 3)
| |   mayRaise=[ExceptionFailure]
| | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
| |   minReads=(Right 3)
| |   mayRaise=[ExceptionFailure]
| | read ((GHC.Classes.==) 'a')
| |   minReads=(Right 3)
| |   mayRaise=[ExceptionFailure]
| | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
| |   minReads=(Right 2)
| |   mayRaise=[ExceptionFailure]
| | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
| |   minReads=(Right 2)
| |   mayRaise=[ExceptionFailure]
| | pushValue (GHC.Types.:)
| |   minReads=(Right 2)
| |   mayRaise=[ExceptionFailure]
| | pushValue (\x_0 -> \x_1 -> x_0)
| |   minReads=(Right 2)
| |   mayRaise=[ExceptionFailure]
| | pushValue 'b'
| |   minReads=(Right 2)
| |   mayRaise=[ExceptionFailure]
| | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
| |   minReads=(Right 2)
| |   mayRaise=[ExceptionFailure]
| | read ((GHC.Classes.==) 'b')
| |   minReads=(Right 2)
| |   mayRaise=[ExceptionFailure]
| | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
| |   minReads=(Right 1)
| |   mayRaise=[ExceptionFailure]
| | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
| |   minReads=(Right 1)
| |   mayRaise=[ExceptionFailure]
| | pushValue (GHC.Types.:)
| |   minReads=(Right 1)
| |   mayRaise=[ExceptionFailure]
| | pushValue (\x_0 -> \x_1 -> x_0)
| |   minReads=(Right 1)
| |   mayRaise=[ExceptionFailure]
| | pushValue 'c'
| |   minReads=(Right 1)
| |   mayRaise=[ExceptionFailure]
| | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
| |   minReads=(Right 1)
| |   mayRaise=[ExceptionFailure]
| | read ((GHC.Classes.==) 'c')
| |   minReads=(Right 1)
| |   mayRaise=[ExceptionFailure]
| | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
| |   minReads=(Right 0)
| |   mayRaise=[]
| | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
| |   minReads=(Right 0)
| |   mayRaise=[]
| | pushValue GHC.Types.[]
| |   minReads=(Right 0)
| |   mayRaise=[]
| | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
| |   minReads=(Right 0)
| |   mayRaise=[]
| | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
| |   minReads=(Right 0)
| |   mayRaise=[]
| | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
| |   minReads=(Right 0)
| |   mayRaise=[]
| | commit ExceptionFailure
| |   minReads=(Right 0)
| |   mayRaise=[]
| | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
| |   minReads=(Right 0)
| |   mayRaise=[]
| | ret
| |   minReads=(Right 0)
| |   mayRaise=[]
| <ko>
| | loadInput
| |   minReads=(Left ExceptionFailure)
| |   mayRaise=[ExceptionFailure]
| | fail []
| |   minReads=(Left ExceptionFailure)
| |   mayRaise=[ExceptionFailure]