pushValue Term minReads=(Right 3) mayRaise=[] catchException "fail" minReads=(Right 3) mayRaise=[] | | | pushValue cons | | minReads=(Right 3) | | mayRaise=["fail"] | | pushValue (\u1 -> (\u2 -> u1)) | | minReads=(Right 3) | | mayRaise=["fail"] | | pushValue 'a' | | minReads=(Right 3) | | mayRaise=["fail"] | | lift2Value (\u1 -> (\u2 -> u1 u2)) | | minReads=(Right 3) | | mayRaise=["fail"] | | read ('a' ==) | | minReads=(Right 3) | | mayRaise=["fail"] | | lift2Value (\u1 -> (\u2 -> u1 u2)) | | minReads=(Right 2) | | mayRaise=["fail"] | | lift2Value (\u1 -> (\u2 -> u1 u2)) | | minReads=(Right 2) | | mayRaise=["fail"] | | pushValue cons | | minReads=(Right 2) | | mayRaise=["fail"] | | pushValue (\u1 -> (\u2 -> u1)) | | minReads=(Right 2) | | mayRaise=["fail"] | | pushValue 'b' | | minReads=(Right 2) | | mayRaise=["fail"] | | lift2Value (\u1 -> (\u2 -> u1 u2)) | | minReads=(Right 2) | | mayRaise=["fail"] | | read ('b' ==) | | minReads=(Right 2) | | mayRaise=["fail"] | | lift2Value (\u1 -> (\u2 -> u1 u2)) | | minReads=(Right 1) | | mayRaise=["fail"] | | lift2Value (\u1 -> (\u2 -> u1 u2)) | | minReads=(Right 1) | | mayRaise=["fail"] | | pushValue cons | | minReads=(Right 1) | | mayRaise=["fail"] | | pushValue (\u1 -> (\u2 -> u1)) | | minReads=(Right 1) | | mayRaise=["fail"] | | pushValue 'c' | | minReads=(Right 1) | | mayRaise=["fail"] | | lift2Value (\u1 -> (\u2 -> u1 u2)) | | minReads=(Right 1) | | mayRaise=["fail"] | | read ('c' ==) | | minReads=(Right 1) | | mayRaise=["fail"] | | lift2Value (\u1 -> (\u2 -> u1 u2)) | | minReads=(Right 0) | | mayRaise=[] | | lift2Value (\u1 -> (\u2 -> u1 u2)) | | minReads=(Right 0) | | mayRaise=[] | | pushValue Term | | minReads=(Right 0) | | mayRaise=[] | | lift2Value (\u1 -> (\u2 -> u1 u2)) | | minReads=(Right 0) | | mayRaise=[] | | lift2Value (\u1 -> (\u2 -> u1 u2)) | | minReads=(Right 0) | | mayRaise=[] | | lift2Value (\u1 -> (\u2 -> u1 u2)) | | minReads=(Right 0) | | mayRaise=[] | | popException "fail" | | minReads=(Right 0) | | mayRaise=[] | | lift2Value (\u1 -> (\u2 -> u1 u2)) | | minReads=(Right 0) | | mayRaise=[] | | ret | | minReads=(Right 0) | | mayRaise=[] | | | loadInput | | minReads=(Left "fail") | | mayRaise=["fail"] | | raiseException "fail" | | minReads=(Left "fail") | | mayRaise=["fail"]