Prog "OracleFlatCurryXML" ["CEventOracle","Oracle","IOExts","FlatCurryXML","FlatCurry","Prelude","Read","XML","OracleFlatCurry","OraclePrelude","OracleRead","OracleXML"] [] [Func ("OracleFlatCurryXML","flatCurryDtd") 1 Private (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("Prelude","[]") [TCons ("Prelude","Char") []])) (Rule [1] (Comb FuncCall ("CEventOracle","collapse") [Var 1,Comb ConsCall ("Prelude",":") [Lit (Charc 'h'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc ':'),Comb ConsCall ("Prelude",":") [Lit (Charc '/'),Comb ConsCall ("Prelude",":") [Lit (Charc '/'),Comb ConsCall ("Prelude",":") [Lit (Charc 'w'),Comb ConsCall ("Prelude",":") [Lit (Charc 'w'),Comb ConsCall ("Prelude",":") [Lit (Charc 'w'),Comb ConsCall ("Prelude",":") [Lit (Charc '.'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'f'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'm'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'k'),Comb ConsCall ("Prelude",":") [Lit (Charc '.'),Comb ConsCall ("Prelude",":") [Lit (Charc 'u'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc '-'),Comb ConsCall ("Prelude",":") [Lit (Charc 'k'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc '.'),Comb ConsCall ("Prelude",":") [Lit (Charc 'd'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc '/'),Comb ConsCall ("Prelude",":") [Lit (Charc '~'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'u'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'y'),Comb ConsCall ("Prelude",":") [Lit (Charc '/'),Comb ConsCall ("Prelude",":") [Lit (Charc 'f'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'u'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'y'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'w'),Comb ConsCall ("Prelude",":") [Lit (Charc '.'),Comb ConsCall ("Prelude",":") [Lit (Charc 'd'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'd'),Comb ConsCall ("Prelude","[]") []]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]])),Func ("OracleFlatCurryXML","flatCurry2XmlFile") 3 Public (FuncType (TCons ("FlatCurry","Prog") []) (FuncType (TCons ("Prelude","[]") [TCons ("Prelude","Char") []]) (FuncType (TCons ("CEventOracle","Ref") []) (FuncType (TCons ("CEventOracle","Ref") []) (FuncType (TCons ("Prelude","()") []) (TCons ("Prelude","IO") [TCons ("Prelude","()") []])))))) (Rule [2,3,1] (Let [(4,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(5,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(6,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 4,Comb ConsCall ("Prelude",":") [Var 5,Comb ConsCall ("Prelude",":") [Var 6,Comb ConsCall ("Prelude","[]") []]]],Comb FuncCall ("OraclePrelude","writeFile") [Var 3,Comb FuncCall ("OracleXML","showXmlDocWithParams") [Comb ConsCall ("Prelude",":") [Comb ConsCall ("XML","DtdUrl") [Comb FuncCall ("OracleFlatCurryXML","flatCurryDtd") [Var 1]],Comb ConsCall ("Prelude","[]") []],Comb FuncCall ("OracleFlatCurryXML","flatCurry2Xml") [Var 2,Var 4],Var 5],Var 6]]))),Func ("OracleFlatCurryXML","flatCurry2Xml") 2 Public (FuncType (TCons ("FlatCurry","Prog") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("XML","XmlExp") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1068") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatCurry2Xml._#lambda2") 2 Private (FuncType (TCons ("Prelude","[]") [TCons ("Prelude","Char") []]) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("XML","XmlExp") []))) (Rule [2,1] (Let [(3,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 3,Comb ConsCall ("Prelude","[]") []],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'm'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'd'),Comb ConsCall ("Prelude",":") [Lit (Charc 'u'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude","[]") []]]]]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xtxt") [Var 2,Var 1],Comb ConsCall ("Prelude","[]") []],Var 3]]))),Func ("OracleFlatCurryXML","qname2xmlattrs") 2 Private (FuncType (TCons ("Prelude","(,)") [TVar 0,TVar 0]) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("Prelude","[]") [TCons ("Prelude","(,)") [TCons ("Prelude","[]") [TCons ("Prelude","Char") []],TVar 0]]))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1067") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xmlShowVisibity") 2 Private (FuncType (TCons ("FlatCurry","Visibility") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("Prelude","[]") [TCons ("Prelude","(,)") [TCons ("Prelude","[]") [TCons ("Prelude","Char") []],TCons ("Prelude","[]") [TCons ("Prelude","Char") []]]]))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1066") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xmlShowType") 2 Private (FuncType (TCons ("FlatCurry","TypeDecl") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("XML","XmlExp") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1065") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xmlShowCons") 2 Private (FuncType (TCons ("FlatCurry","ConsDecl") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("XML","XmlExp") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1064") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xmlShowTypeExpr") 2 Private (FuncType (TCons ("FlatCurry","TypeExpr") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("XML","XmlExp") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1063") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xmlShowTVar") 2 Private (FuncType (TVar 0) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("XML","XmlExp") []))) (Rule [2,1] (Let [(3,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(4,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 3,Comb ConsCall ("Prelude",":") [Var 4,Comb ConsCall ("Prelude","[]") []]],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'v'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude","[]") []]]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xtxt") [Comb FuncCall ("OraclePrelude","show") [Var 2,Var 1],Var 3],Comb ConsCall ("Prelude","[]") []],Var 4]]))),Func ("OracleFlatCurryXML","xmlShowFunc") 2 Private (FuncType (TCons ("FlatCurry","FuncDecl") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("XML","XmlExp") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1062") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xmlShowRule") 2 Private (FuncType (TCons ("FlatCurry","Rule") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("XML","XmlExp") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1061") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xmlShowVar") 2 Private (FuncType (TVar 0) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("XML","XmlExp") []))) (Rule [2,1] (Let [(3,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(4,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 3,Comb ConsCall ("Prelude",":") [Var 4,Comb ConsCall ("Prelude","[]") []]],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'v'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude","[]") []]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xtxt") [Comb FuncCall ("OraclePrelude","show") [Var 2,Var 1],Var 3],Comb ConsCall ("Prelude","[]") []],Var 4]]))),Func ("OracleFlatCurryXML","xmlShowExpr") 2 Private (FuncType (TCons ("FlatCurry","Expr") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("XML","XmlExp") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1060") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xmlShowExpr._#lambda3") 2 Private (FuncType (TCons ("Prelude","(,)") [TCons ("Prelude","Int") [],TCons ("FlatCurry","Expr") []]) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("XML","XmlExp") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1057") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xmlShowLit") 2 Private (FuncType (TCons ("FlatCurry","Literal") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("XML","XmlExp") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1056") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xmlShowBranch") 2 Private (FuncType (TCons ("FlatCurry","BranchExpr") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("XML","XmlExp") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1055") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xmlShowOp") 2 Private (FuncType (TCons ("FlatCurry","OpDecl") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("XML","XmlExp") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1053") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xmlFile2FlatCurry") 2 Public (FuncType (TCons ("Prelude","[]") [TCons ("Prelude","Char") []]) (FuncType (TCons ("CEventOracle","Ref") []) (FuncType (TCons ("CEventOracle","Ref") []) (FuncType (TCons ("Prelude","()") []) (TCons ("Prelude","IO") [TCons ("FlatCurry","Prog") []]))))) (Rule [2,1] (Let [(3,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 3,Comb ConsCall ("Prelude","[]") []],Comb FuncCall ("Oracle",">>=") [Comb FuncCall ("OracleXML","readXmlFile") [Var 2,Var 1],Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlFile2FlatCurry._#lambda4") []],Var 3]]))),Func ("OracleFlatCurryXML","xmlFile2FlatCurry._#lambda4") 2 Private (FuncType (TCons ("XML","XmlExp") []) (FuncType (TCons ("CEventOracle","Ref") []) (FuncType (TCons ("CEventOracle","Ref") []) (FuncType (TCons ("Prelude","()") []) (TCons ("Prelude","IO") [TCons ("FlatCurry","Prog") []]))))) (Rule [2,1] (Let [(3,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 3,Comb ConsCall ("Prelude","[]") []],Comb FuncCall ("OraclePrelude","return") [Comb FuncCall ("OracleFlatCurryXML","xml2FlatCurry") [Var 2,Var 1],Var 3]]))),Func ("OracleFlatCurryXML","xml2FlatCurry") 2 Public (FuncType (TCons ("XML","XmlExp") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("FlatCurry","Prog") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1052") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xml2FlatCurry._#lambda5") 2 Private (FuncType (TCons ("XML","XmlExp") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("Prelude","[]") [TCons ("Prelude","Char") []]))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_950") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xml2FlatCurry._#lambda6") 2 Private (FuncType (TCons ("XML","XmlExp") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("FlatCurry","FuncDecl") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_935") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xml2FlatCurry._#lambda7") 2 Private (FuncType (TCons ("XML","XmlExp") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("FlatCurry","OpDecl") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_881") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2typedecl") 2 Private (FuncType (TCons ("XML","XmlExp") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("FlatCurry","TypeDecl") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_821") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2typedecl._#lambda8") 2 Private (FuncType (TCons ("XML","XmlExp") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("Prelude","Int") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_715") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2typedecl._#lambda9") 2 Private (FuncType (TCons ("XML","XmlExp") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("FlatCurry","ConsDecl") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_704") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2typedecl._#lambda10") 2 Private (FuncType (TCons ("XML","XmlExp") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("Prelude","Int") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_653") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2FunBody") 2 Private (FuncType (TCons ("XML","XmlExp") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("FlatCurry","Rule") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_642") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2var") 2 Private (FuncType (TCons ("XML","XmlExp") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("Prelude","Int") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_592") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2exp") 2 Private (FuncType (TCons ("XML","XmlExp") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("FlatCurry","Expr") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_583") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2exp._#selFP3#bindings") 2 Private (FuncType (TCons ("Prelude","(,)") [TCons ("Prelude","[]") [TCons ("Prelude","(,)") [TCons ("Prelude","Int") [],TCons ("FlatCurry","Expr") []]],TCons ("FlatCurry","Expr") []]) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("Prelude","[]") [TCons ("Prelude","(,)") [TCons ("Prelude","Int") [],TCons ("FlatCurry","Expr") []]]))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_302") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2exp._#selFP4#exp") 2 Private (FuncType (TCons ("Prelude","(,)") [TCons ("Prelude","[]") [TCons ("Prelude","(,)") [TCons ("Prelude","Int") [],TCons ("FlatCurry","Expr") []]],TCons ("FlatCurry","Expr") []]) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("FlatCurry","Expr") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_301") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2exp._#selFP6#bindings") 2 Private (FuncType (TCons ("Prelude","(,)") [TCons ("Prelude","[]") [TCons ("Prelude","(,)") [TCons ("Prelude","Int") [],TCons ("FlatCurry","Expr") []]],TCons ("FlatCurry","Expr") []]) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("Prelude","[]") [TCons ("Prelude","(,)") [TCons ("Prelude","Int") [],TCons ("FlatCurry","Expr") []]]))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_300") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2exp._#selFP7#exp") 2 Private (FuncType (TCons ("Prelude","(,)") [TCons ("Prelude","[]") [TCons ("Prelude","(,)") [TCons ("Prelude","Int") [],TCons ("FlatCurry","Expr") []]],TCons ("FlatCurry","Expr") []]) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("FlatCurry","Expr") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_299") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2let") 2 Private (FuncType (TCons ("Prelude","[]") [TCons ("XML","XmlExp") []]) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("Prelude","(,)") [TCons ("Prelude","[]") [TCons ("Prelude","(,)") [TCons ("Prelude","Int") [],TCons ("FlatCurry","Expr") []]],TCons ("FlatCurry","Expr") []]))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_298") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2let._#selFP9#bindings") 2 Private (FuncType (TCons ("Prelude","(,)") [TCons ("Prelude","[]") [TCons ("Prelude","(,)") [TCons ("Prelude","Int") [],TCons ("FlatCurry","Expr") []]],TCons ("FlatCurry","Expr") []]) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("Prelude","[]") [TCons ("Prelude","(,)") [TCons ("Prelude","Int") [],TCons ("FlatCurry","Expr") []]]))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_267") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2let._#selFP10#exp") 2 Private (FuncType (TCons ("Prelude","(,)") [TCons ("Prelude","[]") [TCons ("Prelude","(,)") [TCons ("Prelude","Int") [],TCons ("FlatCurry","Expr") []]],TCons ("FlatCurry","Expr") []]) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("FlatCurry","Expr") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_266") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2branch") 2 Private (FuncType (TCons ("XML","XmlExp") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("FlatCurry","BranchExpr") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_265") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2lit") 2 Private (FuncType (TCons ("XML","XmlExp") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("FlatCurry","Literal") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_167") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2texp") 2 Private (FuncType (TCons ("XML","XmlExp") []) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("FlatCurry","TypeExpr") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_134") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","xvis2vis") 2 Private (FuncType (TCons ("Prelude","(,)") [TCons ("Prelude","[]") [TCons ("Prelude","Char") []],TCons ("Prelude","[]") [TCons ("Prelude","Char") []]]) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("FlatCurry","Visibility") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_70") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","flatx2Fixity") 2 Private (FuncType (TCons ("Prelude","[]") [TCons ("Prelude","Char") []]) (FuncType (TCons ("CEventOracle","Ref") []) (TCons ("FlatCurry","Fixity") []))) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_24") [Var 2,Var 1]])),Func ("OracleFlatCurryXML","_case_24") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("Prelude",":") [3,4]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_23") [Var 4,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_23") 3 Private (TVar (-42)) (Rule [4,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (LPattern (Charc 'I')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_22") [Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_22") 2 Private (TVar (-42)) (Rule [4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude",":") [5,6]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_21") [Var 6,Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_21") 3 Private (TVar (-42)) (Rule [6,5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_20") [Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_20") 2 Private (TVar (-42)) (Rule [6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (Pattern ("Prelude",":") [7,8]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_19") [Var 8,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_19") 3 Private (TVar (-42)) (Rule [8,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (LPattern (Charc 'f')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_18") [Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_18") 2 Private (TVar (-42)) (Rule [8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (Pattern ("Prelude",":") [9,10]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_17") [Var 10,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_17") 3 Private (TVar (-42)) (Rule [10,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_16") [Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_16") 2 Private (TVar (-42)) (Rule [10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (Pattern ("Prelude",":") [11,12]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_15") [Var 12,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_15") 3 Private (TVar (-42)) (Rule [12,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (LPattern (Charc 'x')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_14") [Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_14") 2 Private (TVar (-42)) (Rule [12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (Pattern ("Prelude",":") [13,14]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_13") [Var 14,Var 13,Var 1]])]])),Func ("OracleFlatCurryXML","_case_13") 3 Private (TVar (-42)) (Rule [14,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (LPattern (Charc 'O')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_12") [Var 14,Var 1]]),Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_9") [Var 14,Var 1]]),Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_4") [Var 14,Var 1]])]])),Func ("OracleFlatCurryXML","_case_4") 2 Private (TVar (-42)) (Rule [14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (Pattern ("Prelude",":") [21,22]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_3") [Var 22,Var 21,Var 1]])]])),Func ("OracleFlatCurryXML","_case_3") 3 Private (TVar (-42)) (Rule [22,21,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 21) [Branch (LPattern (Charc 'O')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_2") [Var 22,Var 1]])]])),Func ("OracleFlatCurryXML","_case_2") 2 Private (TVar (-42)) (Rule [22,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 22) [Branch (Pattern ("Prelude",":") [23,24]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1") [Var 24,Var 23,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1") 3 Private (TVar (-42)) (Rule [24,23,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 23) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_0") [Var 24,Var 1]])]])),Func ("OracleFlatCurryXML","_case_0") 2 Private (TVar (-42)) (Rule [24,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 24) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Comb ConsCall ("FlatCurry","InfixrOp") []])]])),Func ("OracleFlatCurryXML","_case_9") 2 Private (TVar (-42)) (Rule [14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (Pattern ("Prelude",":") [17,18]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_8") [Var 18,Var 17,Var 1]])]])),Func ("OracleFlatCurryXML","_case_8") 3 Private (TVar (-42)) (Rule [18,17,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 17) [Branch (LPattern (Charc 'O')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_7") [Var 18,Var 1]])]])),Func ("OracleFlatCurryXML","_case_7") 2 Private (TVar (-42)) (Rule [18,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 18) [Branch (Pattern ("Prelude",":") [19,20]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_6") [Var 20,Var 19,Var 1]])]])),Func ("OracleFlatCurryXML","_case_6") 3 Private (TVar (-42)) (Rule [20,19,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 19) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_5") [Var 20,Var 1]])]])),Func ("OracleFlatCurryXML","_case_5") 2 Private (TVar (-42)) (Rule [20,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 20) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Comb ConsCall ("FlatCurry","InfixlOp") []])]])),Func ("OracleFlatCurryXML","_case_12") 2 Private (TVar (-42)) (Rule [14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (Pattern ("Prelude",":") [15,16]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_11") [Var 16,Var 15,Var 1]])]])),Func ("OracleFlatCurryXML","_case_11") 3 Private (TVar (-42)) (Rule [16,15,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 15) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_10") [Var 16,Var 1]])]])),Func ("OracleFlatCurryXML","_case_10") 2 Private (TVar (-42)) (Rule [16,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 16) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Comb ConsCall ("FlatCurry","InfixOp") []])]])),Func ("OracleFlatCurryXML","_case_70") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("Prelude","(,)") [3,4]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_69") [Var 4,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_69") 3 Private (TVar (-42)) (Rule [4,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("Prelude",":") [5,6]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_68") [Var 4,Var 6,Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_68") 4 Private (TVar (-42)) (Rule [4,6,5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (LPattern (Charc 'v')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_67") [Var 4,Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_67") 3 Private (TVar (-42)) (Rule [4,6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (Pattern ("Prelude",":") [7,8]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_66") [Var 4,Var 8,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_66") 4 Private (TVar (-42)) (Rule [4,8,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_65") [Var 4,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_65") 3 Private (TVar (-42)) (Rule [4,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (Pattern ("Prelude",":") [9,10]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_64") [Var 4,Var 10,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_64") 4 Private (TVar (-42)) (Rule [4,10,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_63") [Var 4,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_63") 3 Private (TVar (-42)) (Rule [4,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (Pattern ("Prelude",":") [11,12]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_62") [Var 4,Var 12,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_62") 4 Private (TVar (-42)) (Rule [4,12,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_61") [Var 4,Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_61") 3 Private (TVar (-42)) (Rule [4,12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (Pattern ("Prelude",":") [13,14]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_60") [Var 4,Var 14,Var 13,Var 1]])]])),Func ("OracleFlatCurryXML","_case_60") 4 Private (TVar (-42)) (Rule [4,14,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (LPattern (Charc 'b')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_59") [Var 4,Var 14,Var 1]])]])),Func ("OracleFlatCurryXML","_case_59") 3 Private (TVar (-42)) (Rule [4,14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (Pattern ("Prelude",":") [15,16]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_58") [Var 4,Var 16,Var 15,Var 1]])]])),Func ("OracleFlatCurryXML","_case_58") 4 Private (TVar (-42)) (Rule [4,16,15,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 15) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_57") [Var 4,Var 16,Var 1]])]])),Func ("OracleFlatCurryXML","_case_57") 3 Private (TVar (-42)) (Rule [4,16,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 16) [Branch (Pattern ("Prelude",":") [17,18]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_56") [Var 4,Var 18,Var 17,Var 1]])]])),Func ("OracleFlatCurryXML","_case_56") 4 Private (TVar (-42)) (Rule [4,18,17,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 17) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_55") [Var 4,Var 18,Var 1]])]])),Func ("OracleFlatCurryXML","_case_55") 3 Private (TVar (-42)) (Rule [4,18,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 18) [Branch (Pattern ("Prelude",":") [19,20]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_54") [Var 4,Var 20,Var 19,Var 1]])]])),Func ("OracleFlatCurryXML","_case_54") 4 Private (TVar (-42)) (Rule [4,20,19,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 19) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_53") [Var 4,Var 20,Var 1]])]])),Func ("OracleFlatCurryXML","_case_53") 3 Private (TVar (-42)) (Rule [4,20,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 20) [Branch (Pattern ("Prelude",":") [21,22]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_52") [Var 4,Var 22,Var 21,Var 1]])]])),Func ("OracleFlatCurryXML","_case_52") 4 Private (TVar (-42)) (Rule [4,22,21,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 21) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_51") [Var 4,Var 22,Var 1]])]])),Func ("OracleFlatCurryXML","_case_51") 3 Private (TVar (-42)) (Rule [4,22,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 22) [Branch (Pattern ("Prelude",":") [23,24]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_50") [Var 4,Var 24,Var 23,Var 1]])]])),Func ("OracleFlatCurryXML","_case_50") 4 Private (TVar (-42)) (Rule [4,24,23,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 23) [Branch (LPattern (Charc 'y')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_49") [Var 4,Var 24,Var 1]])]])),Func ("OracleFlatCurryXML","_case_49") 3 Private (TVar (-42)) (Rule [4,24,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 24) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_48") [Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_48") 2 Private (TVar (-42)) (Rule [4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude",":") [25,26]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_47") [Var 26,Var 25,Var 1]])]])),Func ("OracleFlatCurryXML","_case_47") 3 Private (TVar (-42)) (Rule [26,25,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 25) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_46") [Var 26,Var 1]])]])),Func ("OracleFlatCurryXML","_case_46") 2 Private (TVar (-42)) (Rule [26,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 26) [Branch (Pattern ("Prelude",":") [27,28]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_45") [Var 28,Var 27,Var 1]])]])),Func ("OracleFlatCurryXML","_case_45") 3 Private (TVar (-42)) (Rule [28,27,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 27) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_44") [Var 28,Var 1]]),Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_35") [Var 28,Var 1]])]])),Func ("OracleFlatCurryXML","_case_35") 2 Private (TVar (-42)) (Rule [28,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 28) [Branch (Pattern ("Prelude",":") [37,38]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_34") [Var 38,Var 37,Var 1]])]])),Func ("OracleFlatCurryXML","_case_34") 3 Private (TVar (-42)) (Rule [38,37,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 37) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_33") [Var 38,Var 1]])]])),Func ("OracleFlatCurryXML","_case_33") 2 Private (TVar (-42)) (Rule [38,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 38) [Branch (Pattern ("Prelude",":") [39,40]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_32") [Var 40,Var 39,Var 1]])]])),Func ("OracleFlatCurryXML","_case_32") 3 Private (TVar (-42)) (Rule [40,39,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 39) [Branch (LPattern (Charc 'v')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_31") [Var 40,Var 1]])]])),Func ("OracleFlatCurryXML","_case_31") 2 Private (TVar (-42)) (Rule [40,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 40) [Branch (Pattern ("Prelude",":") [41,42]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_30") [Var 42,Var 41,Var 1]])]])),Func ("OracleFlatCurryXML","_case_30") 3 Private (TVar (-42)) (Rule [42,41,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 41) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_29") [Var 42,Var 1]])]])),Func ("OracleFlatCurryXML","_case_29") 2 Private (TVar (-42)) (Rule [42,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 42) [Branch (Pattern ("Prelude",":") [43,44]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_28") [Var 44,Var 43,Var 1]])]])),Func ("OracleFlatCurryXML","_case_28") 3 Private (TVar (-42)) (Rule [44,43,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 43) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_27") [Var 44,Var 1]])]])),Func ("OracleFlatCurryXML","_case_27") 2 Private (TVar (-42)) (Rule [44,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 44) [Branch (Pattern ("Prelude",":") [45,46]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_26") [Var 46,Var 45,Var 1]])]])),Func ("OracleFlatCurryXML","_case_26") 3 Private (TVar (-42)) (Rule [46,45,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 45) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_25") [Var 46,Var 1]])]])),Func ("OracleFlatCurryXML","_case_25") 2 Private (TVar (-42)) (Rule [46,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 46) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Comb ConsCall ("FlatCurry","Private") []])]])),Func ("OracleFlatCurryXML","_case_44") 2 Private (TVar (-42)) (Rule [28,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 28) [Branch (Pattern ("Prelude",":") [29,30]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_43") [Var 30,Var 29,Var 1]])]])),Func ("OracleFlatCurryXML","_case_43") 3 Private (TVar (-42)) (Rule [30,29,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 29) [Branch (LPattern (Charc 'b')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_42") [Var 30,Var 1]])]])),Func ("OracleFlatCurryXML","_case_42") 2 Private (TVar (-42)) (Rule [30,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 30) [Branch (Pattern ("Prelude",":") [31,32]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_41") [Var 32,Var 31,Var 1]])]])),Func ("OracleFlatCurryXML","_case_41") 3 Private (TVar (-42)) (Rule [32,31,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 31) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_40") [Var 32,Var 1]])]])),Func ("OracleFlatCurryXML","_case_40") 2 Private (TVar (-42)) (Rule [32,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 32) [Branch (Pattern ("Prelude",":") [33,34]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_39") [Var 34,Var 33,Var 1]])]])),Func ("OracleFlatCurryXML","_case_39") 3 Private (TVar (-42)) (Rule [34,33,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 33) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_38") [Var 34,Var 1]])]])),Func ("OracleFlatCurryXML","_case_38") 2 Private (TVar (-42)) (Rule [34,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 34) [Branch (Pattern ("Prelude",":") [35,36]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_37") [Var 36,Var 35,Var 1]])]])),Func ("OracleFlatCurryXML","_case_37") 3 Private (TVar (-42)) (Rule [36,35,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 35) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_36") [Var 36,Var 1]])]])),Func ("OracleFlatCurryXML","_case_36") 2 Private (TVar (-42)) (Rule [36,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 36) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Comb ConsCall ("FlatCurry","Public") []])]])),Func ("OracleFlatCurryXML","_case_134") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("XML","XElem") [3,4,5]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_133") [Var 4,Var 5,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_133") 4 Private (TVar (-42)) (Rule [4,5,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("Prelude",":") [6,7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_132") [Var 4,Var 5,Var 7,Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_132") 5 Private (TVar (-42)) (Rule [4,5,7,6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_131") [Var 4,Var 5,Var 7,Var 1]]),Branch (LPattern (Charc 'f')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_89") [Var 4,Var 5,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_89") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [48,49]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_88") [Var 4,Var 5,Var 49,Var 48,Var 1]])]])),Func ("OracleFlatCurryXML","_case_88") 5 Private (TVar (-42)) (Rule [4,5,49,48,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 48) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_87") [Var 4,Var 5,Var 49,Var 1]])]])),Func ("OracleFlatCurryXML","_case_87") 4 Private (TVar (-42)) (Rule [4,5,49,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 49) [Branch (Pattern ("Prelude",":") [50,51]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_86") [Var 4,Var 5,Var 51,Var 50,Var 1]])]])),Func ("OracleFlatCurryXML","_case_86") 5 Private (TVar (-42)) (Rule [4,5,51,50,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 50) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_85") [Var 4,Var 5,Var 51,Var 1]])]])),Func ("OracleFlatCurryXML","_case_85") 4 Private (TVar (-42)) (Rule [4,5,51,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 51) [Branch (Pattern ("Prelude",":") [52,53]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_84") [Var 4,Var 5,Var 53,Var 52,Var 1]])]])),Func ("OracleFlatCurryXML","_case_84") 5 Private (TVar (-42)) (Rule [4,5,53,52,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 52) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_83") [Var 4,Var 5,Var 53,Var 1]])]])),Func ("OracleFlatCurryXML","_case_83") 4 Private (TVar (-42)) (Rule [4,5,53,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 53) [Branch (Pattern ("Prelude",":") [54,55]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_82") [Var 4,Var 5,Var 55,Var 54,Var 1]])]])),Func ("OracleFlatCurryXML","_case_82") 5 Private (TVar (-42)) (Rule [4,5,55,54,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 54) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_81") [Var 4,Var 5,Var 55,Var 1]])]])),Func ("OracleFlatCurryXML","_case_81") 4 Private (TVar (-42)) (Rule [4,5,55,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 55) [Branch (Pattern ("Prelude",":") [56,57]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_80") [Var 4,Var 5,Var 57,Var 56,Var 1]])]])),Func ("OracleFlatCurryXML","_case_80") 5 Private (TVar (-42)) (Rule [4,5,57,56,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 56) [Branch (LPattern (Charc 'y')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_79") [Var 4,Var 5,Var 57,Var 1]])]])),Func ("OracleFlatCurryXML","_case_79") 4 Private (TVar (-42)) (Rule [4,5,57,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 57) [Branch (Pattern ("Prelude",":") [58,59]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_78") [Var 4,Var 5,Var 59,Var 58,Var 1]])]])),Func ("OracleFlatCurryXML","_case_78") 5 Private (TVar (-42)) (Rule [4,5,59,58,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 58) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_77") [Var 4,Var 5,Var 59,Var 1]])]])),Func ("OracleFlatCurryXML","_case_77") 4 Private (TVar (-42)) (Rule [4,5,59,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 59) [Branch (Pattern ("Prelude",":") [60,61]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_76") [Var 4,Var 5,Var 61,Var 60,Var 1]])]])),Func ("OracleFlatCurryXML","_case_76") 5 Private (TVar (-42)) (Rule [4,5,61,60,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 60) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_75") [Var 4,Var 5,Var 61,Var 1]])]])),Func ("OracleFlatCurryXML","_case_75") 4 Private (TVar (-42)) (Rule [4,5,61,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 61) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_74") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_74") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_73") [Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_73") 2 Private (TVar (-42)) (Rule [5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (Pattern ("Prelude",":") [62,63]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_72") [Var 62,Var 63,Var 1]])]])),Func ("OracleFlatCurryXML","_case_72") 3 Private (TVar (-42)) (Rule [62,63,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 63) [Branch (Pattern ("Prelude",":") [64,65]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_71") [Var 62,Var 64,Var 65,Var 1]])]])),Func ("OracleFlatCurryXML","_case_71") 4 Private (TVar (-42)) (Rule [62,64,65,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 65) [Branch (Pattern ("Prelude","[]") []) (Let [(66,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 66,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("FlatCurry","FuncType") [Comb FuncCall ("OracleFlatCurryXML","flatx2texp") [Var 62,Var 1],Comb FuncCall ("OracleFlatCurryXML","flatx2texp") [Var 64,Var 66]]]))]])),Func ("OracleFlatCurryXML","_case_131") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [8,9]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_130") [Var 4,Var 5,Var 9,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_130") 5 Private (TVar (-42)) (Rule [4,5,9,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (LPattern (Charc 'v')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_129") [Var 4,Var 5,Var 9,Var 1]]),Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_123") [Var 4,Var 5,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_123") 4 Private (TVar (-42)) (Rule [4,5,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude",":") [14,15]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_122") [Var 4,Var 5,Var 15,Var 14,Var 1]])]])),Func ("OracleFlatCurryXML","_case_122") 5 Private (TVar (-42)) (Rule [4,5,15,14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_121") [Var 4,Var 5,Var 15,Var 1]])]])),Func ("OracleFlatCurryXML","_case_121") 4 Private (TVar (-42)) (Rule [4,5,15,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 15) [Branch (Pattern ("Prelude",":") [16,17]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_120") [Var 4,Var 5,Var 17,Var 16,Var 1]])]])),Func ("OracleFlatCurryXML","_case_120") 5 Private (TVar (-42)) (Rule [4,5,17,16,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 16) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_119") [Var 4,Var 5,Var 17,Var 1]])]])),Func ("OracleFlatCurryXML","_case_119") 4 Private (TVar (-42)) (Rule [4,5,17,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 17) [Branch (Pattern ("Prelude",":") [18,19]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_118") [Var 4,Var 5,Var 19,Var 18,Var 1]])]])),Func ("OracleFlatCurryXML","_case_118") 5 Private (TVar (-42)) (Rule [4,5,19,18,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 18) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_117") [Var 4,Var 5,Var 19,Var 1]])]])),Func ("OracleFlatCurryXML","_case_117") 4 Private (TVar (-42)) (Rule [4,5,19,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 19) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_116") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_116") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude",":") [20,21]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_115") [Var 5,Var 21,Var 20,Var 1]])]])),Func ("OracleFlatCurryXML","_case_115") 4 Private (TVar (-42)) (Rule [5,21,20,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 20) [Branch (Pattern ("Prelude","(,)") [22,23]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_114") [Var 5,Var 21,Var 23,Var 22,Var 1]])]])),Func ("OracleFlatCurryXML","_case_114") 5 Private (TVar (-42)) (Rule [5,21,23,22,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 22) [Branch (Pattern ("Prelude",":") [24,25]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_113") [Var 5,Var 21,Var 23,Var 25,Var 24,Var 1]])]])),Func ("OracleFlatCurryXML","_case_113") 6 Private (TVar (-42)) (Rule [5,21,23,25,24,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 24) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_112") [Var 5,Var 21,Var 23,Var 25,Var 1]])]])),Func ("OracleFlatCurryXML","_case_112") 5 Private (TVar (-42)) (Rule [5,21,23,25,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 25) [Branch (Pattern ("Prelude",":") [26,27]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_111") [Var 5,Var 21,Var 23,Var 27,Var 26,Var 1]])]])),Func ("OracleFlatCurryXML","_case_111") 6 Private (TVar (-42)) (Rule [5,21,23,27,26,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 26) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_110") [Var 5,Var 21,Var 23,Var 27,Var 1]])]])),Func ("OracleFlatCurryXML","_case_110") 5 Private (TVar (-42)) (Rule [5,21,23,27,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 27) [Branch (Pattern ("Prelude",":") [28,29]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_109") [Var 5,Var 21,Var 23,Var 29,Var 28,Var 1]])]])),Func ("OracleFlatCurryXML","_case_109") 6 Private (TVar (-42)) (Rule [5,21,23,29,28,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 28) [Branch (LPattern (Charc 'd')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_108") [Var 5,Var 21,Var 23,Var 29,Var 1]])]])),Func ("OracleFlatCurryXML","_case_108") 5 Private (TVar (-42)) (Rule [5,21,23,29,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 29) [Branch (Pattern ("Prelude",":") [30,31]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_107") [Var 5,Var 21,Var 23,Var 31,Var 30,Var 1]])]])),Func ("OracleFlatCurryXML","_case_107") 6 Private (TVar (-42)) (Rule [5,21,23,31,30,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 30) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_106") [Var 5,Var 21,Var 23,Var 31,Var 1]])]])),Func ("OracleFlatCurryXML","_case_106") 5 Private (TVar (-42)) (Rule [5,21,23,31,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 31) [Branch (Pattern ("Prelude",":") [32,33]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_105") [Var 5,Var 21,Var 23,Var 33,Var 32,Var 1]])]])),Func ("OracleFlatCurryXML","_case_105") 6 Private (TVar (-42)) (Rule [5,21,23,33,32,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 32) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_104") [Var 5,Var 21,Var 23,Var 33,Var 1]])]])),Func ("OracleFlatCurryXML","_case_104") 5 Private (TVar (-42)) (Rule [5,21,23,33,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 33) [Branch (Pattern ("Prelude",":") [34,35]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_103") [Var 5,Var 21,Var 23,Var 35,Var 34,Var 1]])]])),Func ("OracleFlatCurryXML","_case_103") 6 Private (TVar (-42)) (Rule [5,21,23,35,34,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 34) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_102") [Var 5,Var 21,Var 23,Var 35,Var 1]])]])),Func ("OracleFlatCurryXML","_case_102") 5 Private (TVar (-42)) (Rule [5,21,23,35,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 35) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_101") [Var 5,Var 23,Var 21,Var 1]])]])),Func ("OracleFlatCurryXML","_case_101") 4 Private (TVar (-42)) (Rule [5,23,21,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 21) [Branch (Pattern ("Prelude",":") [36,37]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_100") [Var 5,Var 23,Var 37,Var 36,Var 1]])]])),Func ("OracleFlatCurryXML","_case_100") 5 Private (TVar (-42)) (Rule [5,23,37,36,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 36) [Branch (Pattern ("Prelude","(,)") [38,39]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_99") [Var 5,Var 23,Var 37,Var 39,Var 38,Var 1]])]])),Func ("OracleFlatCurryXML","_case_99") 6 Private (TVar (-42)) (Rule [5,23,37,39,38,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 38) [Branch (Pattern ("Prelude",":") [40,41]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_98") [Var 5,Var 23,Var 37,Var 39,Var 41,Var 40,Var 1]])]])),Func ("OracleFlatCurryXML","_case_98") 7 Private (TVar (-42)) (Rule [5,23,37,39,41,40,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 40) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_97") [Var 5,Var 23,Var 37,Var 39,Var 41,Var 1]])]])),Func ("OracleFlatCurryXML","_case_97") 6 Private (TVar (-42)) (Rule [5,23,37,39,41,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 41) [Branch (Pattern ("Prelude",":") [42,43]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_96") [Var 5,Var 23,Var 37,Var 39,Var 43,Var 42,Var 1]])]])),Func ("OracleFlatCurryXML","_case_96") 7 Private (TVar (-42)) (Rule [5,23,37,39,43,42,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 42) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_95") [Var 5,Var 23,Var 37,Var 39,Var 43,Var 1]])]])),Func ("OracleFlatCurryXML","_case_95") 6 Private (TVar (-42)) (Rule [5,23,37,39,43,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 43) [Branch (Pattern ("Prelude",":") [44,45]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_94") [Var 5,Var 23,Var 37,Var 39,Var 45,Var 44,Var 1]])]])),Func ("OracleFlatCurryXML","_case_94") 7 Private (TVar (-42)) (Rule [5,23,37,39,45,44,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 44) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_93") [Var 5,Var 23,Var 37,Var 39,Var 45,Var 1]])]])),Func ("OracleFlatCurryXML","_case_93") 6 Private (TVar (-42)) (Rule [5,23,37,39,45,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 45) [Branch (Pattern ("Prelude",":") [46,47]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_92") [Var 5,Var 23,Var 37,Var 39,Var 47,Var 46,Var 1]])]])),Func ("OracleFlatCurryXML","_case_92") 7 Private (TVar (-42)) (Rule [5,23,37,39,47,46,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 46) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_91") [Var 5,Var 23,Var 37,Var 39,Var 47,Var 1]])]])),Func ("OracleFlatCurryXML","_case_91") 6 Private (TVar (-42)) (Rule [5,23,37,39,47,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 47) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_90") [Var 5,Var 23,Var 39,Var 37,Var 1]])]])),Func ("OracleFlatCurryXML","_case_90") 5 Private (TVar (-42)) (Rule [5,23,39,37,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 37) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb ConsCall ("FlatCurry","TCons") [Comb ConsCall ("Prelude","(,)") [Var 23,Var 39],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatx2texp") []],Var 5,Var 1]]])]])),Func ("OracleFlatCurryXML","_case_129") 4 Private (TVar (-42)) (Rule [4,5,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude",":") [10,11]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_128") [Var 4,Var 5,Var 11,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_128") 5 Private (TVar (-42)) (Rule [4,5,11,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_127") [Var 4,Var 5,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_127") 4 Private (TVar (-42)) (Rule [4,5,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (Pattern ("Prelude",":") [12,13]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_126") [Var 4,Var 5,Var 13,Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_126") 5 Private (TVar (-42)) (Rule [4,5,13,12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_125") [Var 4,Var 5,Var 13,Var 1]])]])),Func ("OracleFlatCurryXML","_case_125") 4 Private (TVar (-42)) (Rule [4,5,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_124") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_124") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Let [(6,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 6,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("FlatCurry","TVar") [Comb FuncCall ("OracleRead","readNat") [Comb FuncCall ("OracleXML","textOfXml") [Var 5,Var 1],Var 6]]]))]])),Func ("OracleFlatCurryXML","_case_167") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("XML","XElem") [3,4,5]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_166") [Var 4,Var 5,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_166") 4 Private (TVar (-42)) (Rule [4,5,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("Prelude",":") [6,7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_165") [Var 4,Var 5,Var 7,Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_165") 5 Private (TVar (-42)) (Rule [4,5,7,6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_164") [Var 4,Var 5,Var 7,Var 1]]),Branch (LPattern (Charc 'f')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_156") [Var 4,Var 7,Var 1]]),Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_144") [Var 4,Var 5,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_144") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [24,25]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_143") [Var 4,Var 5,Var 25,Var 24,Var 1]])]])),Func ("OracleFlatCurryXML","_case_143") 5 Private (TVar (-42)) (Rule [4,5,25,24,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 24) [Branch (LPattern (Charc 'h')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_142") [Var 4,Var 5,Var 25,Var 1]])]])),Func ("OracleFlatCurryXML","_case_142") 4 Private (TVar (-42)) (Rule [4,5,25,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 25) [Branch (Pattern ("Prelude",":") [26,27]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_141") [Var 4,Var 5,Var 27,Var 26,Var 1]])]])),Func ("OracleFlatCurryXML","_case_141") 5 Private (TVar (-42)) (Rule [4,5,27,26,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 26) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_140") [Var 4,Var 5,Var 27,Var 1]])]])),Func ("OracleFlatCurryXML","_case_140") 4 Private (TVar (-42)) (Rule [4,5,27,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 27) [Branch (Pattern ("Prelude",":") [28,29]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_139") [Var 4,Var 5,Var 29,Var 28,Var 1]])]])),Func ("OracleFlatCurryXML","_case_139") 5 Private (TVar (-42)) (Rule [4,5,29,28,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 28) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_138") [Var 4,Var 5,Var 29,Var 1]])]])),Func ("OracleFlatCurryXML","_case_138") 4 Private (TVar (-42)) (Rule [4,5,29,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 29) [Branch (Pattern ("Prelude",":") [30,31]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_137") [Var 4,Var 5,Var 31,Var 30,Var 1]])]])),Func ("OracleFlatCurryXML","_case_137") 5 Private (TVar (-42)) (Rule [4,5,31,30,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 30) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_136") [Var 4,Var 5,Var 31,Var 1]])]])),Func ("OracleFlatCurryXML","_case_136") 4 Private (TVar (-42)) (Rule [4,5,31,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 31) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_135") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_135") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Let [(6,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(7,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 6,Comb ConsCall ("Prelude",":") [Var 7,Comb ConsCall ("Prelude","[]") []]],Comb ConsCall ("FlatCurry","Charc") [Comb FuncCall ("OraclePrelude","chr") [Comb FuncCall ("OracleRead","readNat") [Comb FuncCall ("OracleXML","textOfXml") [Var 5,Var 1],Var 6],Var 7]]]))]])),Func ("OracleFlatCurryXML","_case_156") 3 Private (TVar (-42)) (Rule [4,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [14,15]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_155") [Var 4,Var 15,Var 14,Var 1]])]])),Func ("OracleFlatCurryXML","_case_155") 4 Private (TVar (-42)) (Rule [4,15,14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_154") [Var 4,Var 15,Var 1]])]])),Func ("OracleFlatCurryXML","_case_154") 3 Private (TVar (-42)) (Rule [4,15,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 15) [Branch (Pattern ("Prelude",":") [16,17]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_153") [Var 4,Var 17,Var 16,Var 1]])]])),Func ("OracleFlatCurryXML","_case_153") 4 Private (TVar (-42)) (Rule [4,17,16,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 16) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_152") [Var 4,Var 17,Var 1]])]])),Func ("OracleFlatCurryXML","_case_152") 3 Private (TVar (-42)) (Rule [4,17,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 17) [Branch (Pattern ("Prelude",":") [18,19]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_151") [Var 4,Var 19,Var 18,Var 1]])]])),Func ("OracleFlatCurryXML","_case_151") 4 Private (TVar (-42)) (Rule [4,19,18,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 18) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_150") [Var 4,Var 19,Var 1]])]])),Func ("OracleFlatCurryXML","_case_150") 3 Private (TVar (-42)) (Rule [4,19,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 19) [Branch (Pattern ("Prelude",":") [20,21]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_149") [Var 4,Var 21,Var 20,Var 1]])]])),Func ("OracleFlatCurryXML","_case_149") 4 Private (TVar (-42)) (Rule [4,21,20,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 20) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_148") [Var 4,Var 21,Var 1]])]])),Func ("OracleFlatCurryXML","_case_148") 3 Private (TVar (-42)) (Rule [4,21,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 21) [Branch (Pattern ("Prelude",":") [22,23]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_147") [Var 4,Var 23,Var 22,Var 1]])]])),Func ("OracleFlatCurryXML","_case_147") 4 Private (TVar (-42)) (Rule [4,23,22,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 22) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_146") [Var 4,Var 23,Var 1]])]])),Func ("OracleFlatCurryXML","_case_146") 3 Private (TVar (-42)) (Rule [4,23,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 23) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_145") [Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_145") 2 Private (TVar (-42)) (Rule [4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OraclePrelude","error") [Comb ConsCall ("Prelude",":") [Lit (Charc 'R'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'd'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'g'),Comb ConsCall ("Prelude",":") [Lit (Charc ' '),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'f'),Comb ConsCall ("Prelude",":") [Lit (Charc ' '),Comb ConsCall ("Prelude",":") [Lit (Charc 'f'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc ' '),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc ' '),Comb ConsCall ("Prelude",":") [Lit (Charc 'y'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc ' '),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'm'),Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'm'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'd'),Comb ConsCall ("Prelude",":") [Lit (Charc '!'),Comb ConsCall ("Prelude","[]") []]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]],Var 1]])]])),Func ("OracleFlatCurryXML","_case_164") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [8,9]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_163") [Var 4,Var 5,Var 9,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_163") 5 Private (TVar (-42)) (Rule [4,5,9,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_162") [Var 4,Var 5,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_162") 4 Private (TVar (-42)) (Rule [4,5,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude",":") [10,11]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_161") [Var 4,Var 5,Var 11,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_161") 5 Private (TVar (-42)) (Rule [4,5,11,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_160") [Var 4,Var 5,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_160") 4 Private (TVar (-42)) (Rule [4,5,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (Pattern ("Prelude",":") [12,13]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_159") [Var 4,Var 5,Var 13,Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_159") 5 Private (TVar (-42)) (Rule [4,5,13,12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_158") [Var 4,Var 5,Var 13,Var 1]])]])),Func ("OracleFlatCurryXML","_case_158") 4 Private (TVar (-42)) (Rule [4,5,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_157") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_157") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Let [(6,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 6,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("FlatCurry","Intc") [Comb FuncCall ("OracleRead","readNat") [Comb FuncCall ("OracleXML","textOfXml") [Var 5,Var 1],Var 6]]]))]])),Func ("OracleFlatCurryXML","_case_265") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("XML","XElem") [3,4,5]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_264") [Var 4,Var 5,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_264") 4 Private (TVar (-42)) (Rule [4,5,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("Prelude",":") [6,7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_263") [Var 4,Var 5,Var 7,Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_263") 5 Private (TVar (-42)) (Rule [4,5,7,6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (LPattern (Charc 'b')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_262") [Var 4,Var 5,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_262") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [8,9]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_261") [Var 4,Var 5,Var 9,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_261") 5 Private (TVar (-42)) (Rule [4,5,9,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_260") [Var 4,Var 5,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_260") 4 Private (TVar (-42)) (Rule [4,5,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude",":") [10,11]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_259") [Var 4,Var 5,Var 11,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_259") 5 Private (TVar (-42)) (Rule [4,5,11,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_258") [Var 4,Var 5,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_258") 4 Private (TVar (-42)) (Rule [4,5,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (Pattern ("Prelude",":") [12,13]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_257") [Var 4,Var 5,Var 13,Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_257") 5 Private (TVar (-42)) (Rule [4,5,13,12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_256") [Var 4,Var 5,Var 13,Var 1]])]])),Func ("OracleFlatCurryXML","_case_256") 4 Private (TVar (-42)) (Rule [4,5,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (Pattern ("Prelude",":") [14,15]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_255") [Var 4,Var 5,Var 15,Var 14,Var 1]])]])),Func ("OracleFlatCurryXML","_case_255") 5 Private (TVar (-42)) (Rule [4,5,15,14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_254") [Var 4,Var 5,Var 15,Var 1]])]])),Func ("OracleFlatCurryXML","_case_254") 4 Private (TVar (-42)) (Rule [4,5,15,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 15) [Branch (Pattern ("Prelude",":") [16,17]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_253") [Var 4,Var 5,Var 17,Var 16,Var 1]])]])),Func ("OracleFlatCurryXML","_case_253") 5 Private (TVar (-42)) (Rule [4,5,17,16,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 16) [Branch (LPattern (Charc 'h')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_252") [Var 4,Var 5,Var 17,Var 1]])]])),Func ("OracleFlatCurryXML","_case_252") 4 Private (TVar (-42)) (Rule [4,5,17,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 17) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_251") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_251") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_250") [Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_250") 2 Private (TVar (-42)) (Rule [5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (Pattern ("Prelude",":") [18,19]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_249") [Var 19,Var 18,Var 1]])]])),Func ("OracleFlatCurryXML","_case_249") 3 Private (TVar (-42)) (Rule [19,18,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 18) [Branch (Pattern ("XML","XElem") [20,21,22]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_248") [Var 19,Var 21,Var 22,Var 20,Var 1]])]])),Func ("OracleFlatCurryXML","_case_248") 5 Private (TVar (-42)) (Rule [19,21,22,20,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 20) [Branch (Pattern ("Prelude",":") [23,24]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_247") [Var 19,Var 21,Var 22,Var 24,Var 23,Var 1]])]])),Func ("OracleFlatCurryXML","_case_247") 6 Private (TVar (-42)) (Rule [19,21,22,24,23,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 23) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_246") [Var 19,Var 21,Var 22,Var 24,Var 1]]),Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_204") [Var 19,Var 21,Var 22,Var 24,Var 1]]),Branch (LPattern (Charc 'h')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_184") [Var 19,Var 24,Var 1]])]])),Func ("OracleFlatCurryXML","_case_184") 3 Private (TVar (-42)) (Rule [19,24,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 24) [Branch (Pattern ("Prelude",":") [85,86]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_183") [Var 19,Var 86,Var 85,Var 1]])]])),Func ("OracleFlatCurryXML","_case_183") 4 Private (TVar (-42)) (Rule [19,86,85,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 85) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_182") [Var 19,Var 86,Var 1]])]])),Func ("OracleFlatCurryXML","_case_182") 3 Private (TVar (-42)) (Rule [19,86,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 86) [Branch (Pattern ("Prelude",":") [87,88]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_181") [Var 19,Var 88,Var 87,Var 1]])]])),Func ("OracleFlatCurryXML","_case_181") 4 Private (TVar (-42)) (Rule [19,88,87,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 87) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_180") [Var 19,Var 88,Var 1]])]])),Func ("OracleFlatCurryXML","_case_180") 3 Private (TVar (-42)) (Rule [19,88,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 88) [Branch (Pattern ("Prelude",":") [89,90]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_179") [Var 19,Var 90,Var 89,Var 1]])]])),Func ("OracleFlatCurryXML","_case_179") 4 Private (TVar (-42)) (Rule [19,90,89,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 89) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_178") [Var 19,Var 90,Var 1]])]])),Func ("OracleFlatCurryXML","_case_178") 3 Private (TVar (-42)) (Rule [19,90,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 90) [Branch (Pattern ("Prelude",":") [91,92]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_177") [Var 19,Var 92,Var 91,Var 1]])]])),Func ("OracleFlatCurryXML","_case_177") 4 Private (TVar (-42)) (Rule [19,92,91,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 91) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_176") [Var 19,Var 92,Var 1]])]])),Func ("OracleFlatCurryXML","_case_176") 3 Private (TVar (-42)) (Rule [19,92,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 92) [Branch (Pattern ("Prelude",":") [93,94]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_175") [Var 19,Var 94,Var 93,Var 1]])]])),Func ("OracleFlatCurryXML","_case_175") 4 Private (TVar (-42)) (Rule [19,94,93,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 93) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_174") [Var 19,Var 94,Var 1]])]])),Func ("OracleFlatCurryXML","_case_174") 3 Private (TVar (-42)) (Rule [19,94,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 94) [Branch (Pattern ("Prelude",":") [95,96]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_173") [Var 19,Var 96,Var 95,Var 1]])]])),Func ("OracleFlatCurryXML","_case_173") 4 Private (TVar (-42)) (Rule [19,96,95,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 95) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_172") [Var 19,Var 96,Var 1]])]])),Func ("OracleFlatCurryXML","_case_172") 3 Private (TVar (-42)) (Rule [19,96,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 96) [Branch (Pattern ("Prelude",":") [97,98]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_171") [Var 19,Var 98,Var 97,Var 1]])]])),Func ("OracleFlatCurryXML","_case_171") 4 Private (TVar (-42)) (Rule [19,98,97,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 97) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_170") [Var 19,Var 98,Var 1]])]])),Func ("OracleFlatCurryXML","_case_170") 3 Private (TVar (-42)) (Rule [19,98,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 98) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_169") [Var 19,Var 1]])]])),Func ("OracleFlatCurryXML","_case_169") 2 Private (TVar (-42)) (Rule [19,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 19) [Branch (Pattern ("Prelude",":") [99,100]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_168") [Var 100,Var 1]])]])),Func ("OracleFlatCurryXML","_case_168") 2 Private (TVar (-42)) (Rule [100,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 100) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OraclePrelude","error") [Comb ConsCall ("Prelude",":") [Lit (Charc 'H'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'g'),Comb ConsCall ("Prelude",":") [Lit (Charc 'h'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc '-'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'd'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc ' '),Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc ' '),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc ' '),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc 'u'),Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'd'),Comb ConsCall ("Prelude",":") [Lit (Charc ' '),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc ' '),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'h'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc ' '),Comb ConsCall ("Prelude",":") [Lit (Charc 'v'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc ' '),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'f'),Comb ConsCall ("Prelude",":") [Lit (Charc ' '),Comb ConsCall ("Prelude",":") [Lit (Charc 'F'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'C'),Comb ConsCall ("Prelude",":") [Lit (Charc 'u'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'y'),Comb ConsCall ("Prelude",":") [Lit (Charc '!'),Comb ConsCall ("Prelude","[]") []]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]],Var 1]])]])),Func ("OracleFlatCurryXML","_case_204") 5 Private (TVar (-42)) (Rule [19,21,22,24,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 24) [Branch (Pattern ("Prelude",":") [67,68]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_203") [Var 19,Var 21,Var 22,Var 68,Var 67,Var 1]])]])),Func ("OracleFlatCurryXML","_case_203") 6 Private (TVar (-42)) (Rule [19,21,22,68,67,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 67) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_202") [Var 19,Var 21,Var 22,Var 68,Var 1]])]])),Func ("OracleFlatCurryXML","_case_202") 5 Private (TVar (-42)) (Rule [19,21,22,68,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 68) [Branch (Pattern ("Prelude",":") [69,70]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_201") [Var 19,Var 21,Var 22,Var 70,Var 69,Var 1]])]])),Func ("OracleFlatCurryXML","_case_201") 6 Private (TVar (-42)) (Rule [19,21,22,70,69,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 69) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_200") [Var 19,Var 21,Var 22,Var 70,Var 1]])]])),Func ("OracleFlatCurryXML","_case_200") 5 Private (TVar (-42)) (Rule [19,21,22,70,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 70) [Branch (Pattern ("Prelude",":") [71,72]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_199") [Var 19,Var 21,Var 22,Var 72,Var 71,Var 1]])]])),Func ("OracleFlatCurryXML","_case_199") 6 Private (TVar (-42)) (Rule [19,21,22,72,71,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 71) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_198") [Var 19,Var 21,Var 22,Var 72,Var 1]])]])),Func ("OracleFlatCurryXML","_case_198") 5 Private (TVar (-42)) (Rule [19,21,22,72,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 72) [Branch (Pattern ("Prelude",":") [73,74]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_197") [Var 19,Var 21,Var 22,Var 74,Var 73,Var 1]])]])),Func ("OracleFlatCurryXML","_case_197") 6 Private (TVar (-42)) (Rule [19,21,22,74,73,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 73) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_196") [Var 19,Var 21,Var 22,Var 74,Var 1]])]])),Func ("OracleFlatCurryXML","_case_196") 5 Private (TVar (-42)) (Rule [19,21,22,74,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 74) [Branch (Pattern ("Prelude",":") [75,76]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_195") [Var 19,Var 21,Var 22,Var 76,Var 75,Var 1]])]])),Func ("OracleFlatCurryXML","_case_195") 6 Private (TVar (-42)) (Rule [19,21,22,76,75,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 75) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_194") [Var 19,Var 21,Var 22,Var 76,Var 1]])]])),Func ("OracleFlatCurryXML","_case_194") 5 Private (TVar (-42)) (Rule [19,21,22,76,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 76) [Branch (Pattern ("Prelude",":") [77,78]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_193") [Var 19,Var 21,Var 22,Var 78,Var 77,Var 1]])]])),Func ("OracleFlatCurryXML","_case_193") 6 Private (TVar (-42)) (Rule [19,21,22,78,77,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 77) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_192") [Var 19,Var 21,Var 22,Var 78,Var 1]])]])),Func ("OracleFlatCurryXML","_case_192") 5 Private (TVar (-42)) (Rule [19,21,22,78,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 78) [Branch (Pattern ("Prelude",":") [79,80]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_191") [Var 19,Var 21,Var 22,Var 80,Var 79,Var 1]])]])),Func ("OracleFlatCurryXML","_case_191") 6 Private (TVar (-42)) (Rule [19,21,22,80,79,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 79) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_190") [Var 19,Var 21,Var 22,Var 80,Var 1]])]])),Func ("OracleFlatCurryXML","_case_190") 5 Private (TVar (-42)) (Rule [19,21,22,80,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 80) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_189") [Var 19,Var 22,Var 21,Var 1]])]])),Func ("OracleFlatCurryXML","_case_189") 4 Private (TVar (-42)) (Rule [19,22,21,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 21) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_188") [Var 19,Var 22,Var 1]])]])),Func ("OracleFlatCurryXML","_case_188") 3 Private (TVar (-42)) (Rule [19,22,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 22) [Branch (Pattern ("Prelude",":") [81,82]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_187") [Var 19,Var 81,Var 82,Var 1]])]])),Func ("OracleFlatCurryXML","_case_187") 4 Private (TVar (-42)) (Rule [19,81,82,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 82) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_186") [Var 81,Var 19,Var 1]])]])),Func ("OracleFlatCurryXML","_case_186") 3 Private (TVar (-42)) (Rule [81,19,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 19) [Branch (Pattern ("Prelude",":") [83,84]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_185") [Var 81,Var 83,Var 84,Var 1]])]])),Func ("OracleFlatCurryXML","_case_185") 4 Private (TVar (-42)) (Rule [81,83,84,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 84) [Branch (Pattern ("Prelude","[]") []) (Let [(85,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 85,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("FlatCurry","Branch") [Comb ConsCall ("FlatCurry","LPattern") [Comb FuncCall ("OracleFlatCurryXML","flatx2lit") [Var 81,Var 1]],Comb FuncCall ("OracleFlatCurryXML","flatx2exp") [Var 83,Var 85]]]))]])),Func ("OracleFlatCurryXML","_case_246") 5 Private (TVar (-42)) (Rule [19,21,22,24,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 24) [Branch (Pattern ("Prelude",":") [25,26]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_245") [Var 19,Var 21,Var 22,Var 26,Var 25,Var 1]])]])),Func ("OracleFlatCurryXML","_case_245") 6 Private (TVar (-42)) (Rule [19,21,22,26,25,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 25) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_244") [Var 19,Var 21,Var 22,Var 26,Var 1]])]])),Func ("OracleFlatCurryXML","_case_244") 5 Private (TVar (-42)) (Rule [19,21,22,26,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 26) [Branch (Pattern ("Prelude",":") [27,28]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_243") [Var 19,Var 21,Var 22,Var 28,Var 27,Var 1]])]])),Func ("OracleFlatCurryXML","_case_243") 6 Private (TVar (-42)) (Rule [19,21,22,28,27,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 27) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_242") [Var 19,Var 21,Var 22,Var 28,Var 1]])]])),Func ("OracleFlatCurryXML","_case_242") 5 Private (TVar (-42)) (Rule [19,21,22,28,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 28) [Branch (Pattern ("Prelude",":") [29,30]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_241") [Var 19,Var 21,Var 22,Var 30,Var 29,Var 1]])]])),Func ("OracleFlatCurryXML","_case_241") 6 Private (TVar (-42)) (Rule [19,21,22,30,29,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 29) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_240") [Var 19,Var 21,Var 22,Var 30,Var 1]])]])),Func ("OracleFlatCurryXML","_case_240") 5 Private (TVar (-42)) (Rule [19,21,22,30,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 30) [Branch (Pattern ("Prelude",":") [31,32]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_239") [Var 19,Var 21,Var 22,Var 32,Var 31,Var 1]])]])),Func ("OracleFlatCurryXML","_case_239") 6 Private (TVar (-42)) (Rule [19,21,22,32,31,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 31) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_238") [Var 19,Var 21,Var 22,Var 32,Var 1]])]])),Func ("OracleFlatCurryXML","_case_238") 5 Private (TVar (-42)) (Rule [19,21,22,32,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 32) [Branch (Pattern ("Prelude",":") [33,34]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_237") [Var 19,Var 21,Var 22,Var 34,Var 33,Var 1]])]])),Func ("OracleFlatCurryXML","_case_237") 6 Private (TVar (-42)) (Rule [19,21,22,34,33,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 33) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_236") [Var 19,Var 21,Var 22,Var 34,Var 1]])]])),Func ("OracleFlatCurryXML","_case_236") 5 Private (TVar (-42)) (Rule [19,21,22,34,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 34) [Branch (Pattern ("Prelude",":") [35,36]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_235") [Var 19,Var 21,Var 22,Var 36,Var 35,Var 1]])]])),Func ("OracleFlatCurryXML","_case_235") 6 Private (TVar (-42)) (Rule [19,21,22,36,35,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 35) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_234") [Var 19,Var 21,Var 22,Var 36,Var 1]])]])),Func ("OracleFlatCurryXML","_case_234") 5 Private (TVar (-42)) (Rule [19,21,22,36,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 36) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_233") [Var 19,Var 22,Var 21,Var 1]])]])),Func ("OracleFlatCurryXML","_case_233") 4 Private (TVar (-42)) (Rule [19,22,21,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 21) [Branch (Pattern ("Prelude",":") [37,38]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_232") [Var 19,Var 22,Var 38,Var 37,Var 1]])]])),Func ("OracleFlatCurryXML","_case_232") 5 Private (TVar (-42)) (Rule [19,22,38,37,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 37) [Branch (Pattern ("Prelude","(,)") [39,40]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_231") [Var 19,Var 22,Var 38,Var 40,Var 39,Var 1]])]])),Func ("OracleFlatCurryXML","_case_231") 6 Private (TVar (-42)) (Rule [19,22,38,40,39,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 39) [Branch (Pattern ("Prelude",":") [41,42]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_230") [Var 19,Var 22,Var 38,Var 40,Var 42,Var 41,Var 1]])]])),Func ("OracleFlatCurryXML","_case_230") 7 Private (TVar (-42)) (Rule [19,22,38,40,42,41,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 41) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_229") [Var 19,Var 22,Var 38,Var 40,Var 42,Var 1]])]])),Func ("OracleFlatCurryXML","_case_229") 6 Private (TVar (-42)) (Rule [19,22,38,40,42,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 42) [Branch (Pattern ("Prelude",":") [43,44]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_228") [Var 19,Var 22,Var 38,Var 40,Var 44,Var 43,Var 1]])]])),Func ("OracleFlatCurryXML","_case_228") 7 Private (TVar (-42)) (Rule [19,22,38,40,44,43,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 43) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_227") [Var 19,Var 22,Var 38,Var 40,Var 44,Var 1]])]])),Func ("OracleFlatCurryXML","_case_227") 6 Private (TVar (-42)) (Rule [19,22,38,40,44,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 44) [Branch (Pattern ("Prelude",":") [45,46]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_226") [Var 19,Var 22,Var 38,Var 40,Var 46,Var 45,Var 1]])]])),Func ("OracleFlatCurryXML","_case_226") 7 Private (TVar (-42)) (Rule [19,22,38,40,46,45,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 45) [Branch (LPattern (Charc 'd')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_225") [Var 19,Var 22,Var 38,Var 40,Var 46,Var 1]])]])),Func ("OracleFlatCurryXML","_case_225") 6 Private (TVar (-42)) (Rule [19,22,38,40,46,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 46) [Branch (Pattern ("Prelude",":") [47,48]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_224") [Var 19,Var 22,Var 38,Var 40,Var 48,Var 47,Var 1]])]])),Func ("OracleFlatCurryXML","_case_224") 7 Private (TVar (-42)) (Rule [19,22,38,40,48,47,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 47) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_223") [Var 19,Var 22,Var 38,Var 40,Var 48,Var 1]])]])),Func ("OracleFlatCurryXML","_case_223") 6 Private (TVar (-42)) (Rule [19,22,38,40,48,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 48) [Branch (Pattern ("Prelude",":") [49,50]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_222") [Var 19,Var 22,Var 38,Var 40,Var 50,Var 49,Var 1]])]])),Func ("OracleFlatCurryXML","_case_222") 7 Private (TVar (-42)) (Rule [19,22,38,40,50,49,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 49) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_221") [Var 19,Var 22,Var 38,Var 40,Var 50,Var 1]])]])),Func ("OracleFlatCurryXML","_case_221") 6 Private (TVar (-42)) (Rule [19,22,38,40,50,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 50) [Branch (Pattern ("Prelude",":") [51,52]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_220") [Var 19,Var 22,Var 38,Var 40,Var 52,Var 51,Var 1]])]])),Func ("OracleFlatCurryXML","_case_220") 7 Private (TVar (-42)) (Rule [19,22,38,40,52,51,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 51) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_219") [Var 19,Var 22,Var 38,Var 40,Var 52,Var 1]])]])),Func ("OracleFlatCurryXML","_case_219") 6 Private (TVar (-42)) (Rule [19,22,38,40,52,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 52) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_218") [Var 19,Var 22,Var 40,Var 38,Var 1]])]])),Func ("OracleFlatCurryXML","_case_218") 5 Private (TVar (-42)) (Rule [19,22,40,38,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 38) [Branch (Pattern ("Prelude",":") [53,54]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_217") [Var 19,Var 22,Var 40,Var 54,Var 53,Var 1]])]])),Func ("OracleFlatCurryXML","_case_217") 6 Private (TVar (-42)) (Rule [19,22,40,54,53,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 53) [Branch (Pattern ("Prelude","(,)") [55,56]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_216") [Var 19,Var 22,Var 40,Var 54,Var 56,Var 55,Var 1]])]])),Func ("OracleFlatCurryXML","_case_216") 7 Private (TVar (-42)) (Rule [19,22,40,54,56,55,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 55) [Branch (Pattern ("Prelude",":") [57,58]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_215") [Var 19,Var 22,Var 40,Var 54,Var 56,Var 58,Var 57,Var 1]])]])),Func ("OracleFlatCurryXML","_case_215") 8 Private (TVar (-42)) (Rule [19,22,40,54,56,58,57,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 57) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_214") [Var 19,Var 22,Var 40,Var 54,Var 56,Var 58,Var 1]])]])),Func ("OracleFlatCurryXML","_case_214") 7 Private (TVar (-42)) (Rule [19,22,40,54,56,58,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 58) [Branch (Pattern ("Prelude",":") [59,60]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_213") [Var 19,Var 22,Var 40,Var 54,Var 56,Var 60,Var 59,Var 1]])]])),Func ("OracleFlatCurryXML","_case_213") 8 Private (TVar (-42)) (Rule [19,22,40,54,56,60,59,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 59) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_212") [Var 19,Var 22,Var 40,Var 54,Var 56,Var 60,Var 1]])]])),Func ("OracleFlatCurryXML","_case_212") 7 Private (TVar (-42)) (Rule [19,22,40,54,56,60,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 60) [Branch (Pattern ("Prelude",":") [61,62]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_211") [Var 19,Var 22,Var 40,Var 54,Var 56,Var 62,Var 61,Var 1]])]])),Func ("OracleFlatCurryXML","_case_211") 8 Private (TVar (-42)) (Rule [19,22,40,54,56,62,61,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 61) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_210") [Var 19,Var 22,Var 40,Var 54,Var 56,Var 62,Var 1]])]])),Func ("OracleFlatCurryXML","_case_210") 7 Private (TVar (-42)) (Rule [19,22,40,54,56,62,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 62) [Branch (Pattern ("Prelude",":") [63,64]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_209") [Var 19,Var 22,Var 40,Var 54,Var 56,Var 64,Var 63,Var 1]])]])),Func ("OracleFlatCurryXML","_case_209") 8 Private (TVar (-42)) (Rule [19,22,40,54,56,64,63,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 63) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_208") [Var 19,Var 22,Var 40,Var 54,Var 56,Var 64,Var 1]])]])),Func ("OracleFlatCurryXML","_case_208") 7 Private (TVar (-42)) (Rule [19,22,40,54,56,64,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 64) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_207") [Var 19,Var 22,Var 40,Var 56,Var 54,Var 1]])]])),Func ("OracleFlatCurryXML","_case_207") 6 Private (TVar (-42)) (Rule [19,22,40,56,54,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 54) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_206") [Var 22,Var 40,Var 56,Var 19,Var 1]])]])),Func ("OracleFlatCurryXML","_case_206") 5 Private (TVar (-42)) (Rule [22,40,56,19,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 19) [Branch (Pattern ("Prelude",":") [65,66]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_205") [Var 22,Var 40,Var 56,Var 65,Var 66,Var 1]])]])),Func ("OracleFlatCurryXML","_case_205") 6 Private (TVar (-42)) (Rule [22,40,56,65,66,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 66) [Branch (Pattern ("Prelude","[]") []) (Let [(67,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 67,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("FlatCurry","Branch") [Comb ConsCall ("FlatCurry","Pattern") [Comb ConsCall ("Prelude","(,)") [Var 40,Var 56],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatx2var") []],Var 22,Var 1]],Comb FuncCall ("OracleFlatCurryXML","flatx2exp") [Var 65,Var 67]]]))]])),Func ("OracleFlatCurryXML","_case_266") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("Prelude","(,)") [3,4]) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Var 4])]])),Func ("OracleFlatCurryXML","_case_267") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("Prelude","(,)") [3,4]) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Var 3])]])),Func ("OracleFlatCurryXML","_case_298") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("Prelude",":") [3,4]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_297") [Var 3,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_297") 3 Private (TVar (-42)) (Rule [3,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb ConsCall ("Prelude","(,)") [Comb ConsCall ("Prelude","[]") [],Comb FuncCall ("OracleFlatCurryXML","flatx2exp") [Var 3,Var 1]]]),Branch (Pattern ("Prelude",":") [5,6]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_296") [Var 5,Var 6,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_296") 4 Private (TVar (-42)) (Rule [5,6,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("XML","XElem") [7,8,9]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_295") [Var 5,Var 6,Var 8,Var 9,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_295") 6 Private (TVar (-42)) (Rule [5,6,8,9,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [10,11]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_294") [Var 5,Var 6,Var 8,Var 9,Var 11,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_294") 7 Private (TVar (-42)) (Rule [5,6,8,9,11,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (LPattern (Charc 'b')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_293") [Var 5,Var 6,Var 8,Var 9,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_293") 6 Private (TVar (-42)) (Rule [5,6,8,9,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (Pattern ("Prelude",":") [12,13]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_292") [Var 5,Var 6,Var 8,Var 9,Var 13,Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_292") 7 Private (TVar (-42)) (Rule [5,6,8,9,13,12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_291") [Var 5,Var 6,Var 8,Var 9,Var 13,Var 1]])]])),Func ("OracleFlatCurryXML","_case_291") 6 Private (TVar (-42)) (Rule [5,6,8,9,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (Pattern ("Prelude",":") [14,15]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_290") [Var 5,Var 6,Var 8,Var 9,Var 15,Var 14,Var 1]])]])),Func ("OracleFlatCurryXML","_case_290") 7 Private (TVar (-42)) (Rule [5,6,8,9,15,14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_289") [Var 5,Var 6,Var 8,Var 9,Var 15,Var 1]])]])),Func ("OracleFlatCurryXML","_case_289") 6 Private (TVar (-42)) (Rule [5,6,8,9,15,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 15) [Branch (Pattern ("Prelude",":") [16,17]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_288") [Var 5,Var 6,Var 8,Var 9,Var 17,Var 16,Var 1]])]])),Func ("OracleFlatCurryXML","_case_288") 7 Private (TVar (-42)) (Rule [5,6,8,9,17,16,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 16) [Branch (LPattern (Charc 'd')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_287") [Var 5,Var 6,Var 8,Var 9,Var 17,Var 1]])]])),Func ("OracleFlatCurryXML","_case_287") 6 Private (TVar (-42)) (Rule [5,6,8,9,17,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 17) [Branch (Pattern ("Prelude",":") [18,19]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_286") [Var 5,Var 6,Var 8,Var 9,Var 19,Var 18,Var 1]])]])),Func ("OracleFlatCurryXML","_case_286") 7 Private (TVar (-42)) (Rule [5,6,8,9,19,18,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 18) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_285") [Var 5,Var 6,Var 8,Var 9,Var 19,Var 1]])]])),Func ("OracleFlatCurryXML","_case_285") 6 Private (TVar (-42)) (Rule [5,6,8,9,19,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 19) [Branch (Pattern ("Prelude",":") [20,21]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_284") [Var 5,Var 6,Var 8,Var 9,Var 21,Var 20,Var 1]])]])),Func ("OracleFlatCurryXML","_case_284") 7 Private (TVar (-42)) (Rule [5,6,8,9,21,20,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 20) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_283") [Var 5,Var 6,Var 8,Var 9,Var 21,Var 1]])]])),Func ("OracleFlatCurryXML","_case_283") 6 Private (TVar (-42)) (Rule [5,6,8,9,21,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 21) [Branch (Pattern ("Prelude",":") [22,23]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_282") [Var 5,Var 6,Var 8,Var 9,Var 23,Var 22,Var 1]])]])),Func ("OracleFlatCurryXML","_case_282") 7 Private (TVar (-42)) (Rule [5,6,8,9,23,22,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 22) [Branch (LPattern (Charc 'g')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_281") [Var 5,Var 6,Var 8,Var 9,Var 23,Var 1]])]])),Func ("OracleFlatCurryXML","_case_281") 6 Private (TVar (-42)) (Rule [5,6,8,9,23,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 23) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_280") [Var 5,Var 6,Var 9,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_280") 5 Private (TVar (-42)) (Rule [5,6,9,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_279") [Var 5,Var 6,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_279") 4 Private (TVar (-42)) (Rule [5,6,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude",":") [24,25]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_278") [Var 5,Var 6,Var 25,Var 24,Var 1]])]])),Func ("OracleFlatCurryXML","_case_278") 5 Private (TVar (-42)) (Rule [5,6,25,24,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 24) [Branch (Pattern ("XML","XElem") [26,27,28]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_277") [Var 5,Var 6,Var 25,Var 27,Var 28,Var 26,Var 1]])]])),Func ("OracleFlatCurryXML","_case_277") 7 Private (TVar (-42)) (Rule [5,6,25,27,28,26,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 26) [Branch (Pattern ("Prelude",":") [29,30]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_276") [Var 5,Var 6,Var 25,Var 27,Var 28,Var 30,Var 29,Var 1]])]])),Func ("OracleFlatCurryXML","_case_276") 8 Private (TVar (-42)) (Rule [5,6,25,27,28,30,29,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 29) [Branch (LPattern (Charc 'v')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_275") [Var 5,Var 6,Var 25,Var 27,Var 28,Var 30,Var 1]])]])),Func ("OracleFlatCurryXML","_case_275") 7 Private (TVar (-42)) (Rule [5,6,25,27,28,30,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 30) [Branch (Pattern ("Prelude",":") [31,32]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_274") [Var 5,Var 6,Var 25,Var 27,Var 28,Var 32,Var 31,Var 1]])]])),Func ("OracleFlatCurryXML","_case_274") 8 Private (TVar (-42)) (Rule [5,6,25,27,28,32,31,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 31) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_273") [Var 5,Var 6,Var 25,Var 27,Var 28,Var 32,Var 1]])]])),Func ("OracleFlatCurryXML","_case_273") 7 Private (TVar (-42)) (Rule [5,6,25,27,28,32,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 32) [Branch (Pattern ("Prelude",":") [33,34]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_272") [Var 5,Var 6,Var 25,Var 27,Var 28,Var 34,Var 33,Var 1]])]])),Func ("OracleFlatCurryXML","_case_272") 8 Private (TVar (-42)) (Rule [5,6,25,27,28,34,33,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 33) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_271") [Var 5,Var 6,Var 25,Var 27,Var 28,Var 34,Var 1]])]])),Func ("OracleFlatCurryXML","_case_271") 7 Private (TVar (-42)) (Rule [5,6,25,27,28,34,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 34) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_270") [Var 5,Var 6,Var 25,Var 28,Var 27,Var 1]])]])),Func ("OracleFlatCurryXML","_case_270") 6 Private (TVar (-42)) (Rule [5,6,25,28,27,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 27) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_269") [Var 5,Var 6,Var 28,Var 25,Var 1]])]])),Func ("OracleFlatCurryXML","_case_269") 5 Private (TVar (-42)) (Rule [5,6,28,25,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 25) [Branch (Pattern ("Prelude",":") [35,36]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_268") [Var 5,Var 6,Var 28,Var 35,Var 36,Var 1]])]])),Func ("OracleFlatCurryXML","_case_268") 6 Private (TVar (-42)) (Rule [5,6,28,35,36,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 36) [Branch (Pattern ("Prelude","[]") []) (Let [(40,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 40,Comb ConsCall ("Prelude","[]") []],Let [(37,Comb FuncCall ("OracleFlatCurryXML","flatx2let") [Comb ConsCall ("Prelude",":") [Var 5,Var 6],Var 1])] (Let [(41,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 40,Comb ConsCall ("Prelude",":") [Var 41,Comb ConsCall ("Prelude","[]") []],Let [(38,Comb FuncCall ("OracleFlatCurryXML","flatx2let._#selFP9#bindings") [Var 37,Var 40])] (Let [(42,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 41,Comb ConsCall ("Prelude",":") [Var 42,Comb ConsCall ("Prelude","[]") []],Let [(39,Comb FuncCall ("OracleFlatCurryXML","flatx2let._#selFP10#exp") [Var 37,Var 41])] (Let [(43,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(44,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 42,Comb ConsCall ("Prelude",":") [Var 43,Comb ConsCall ("Prelude",":") [Var 44,Comb ConsCall ("Prelude","[]") []]],Comb ConsCall ("Prelude","(,)") [Comb ConsCall ("Prelude",":") [Comb ConsCall ("Prelude","(,)") [Comb FuncCall ("OracleRead","readNat") [Comb FuncCall ("OracleXML","textOfXml") [Var 28,Var 42],Var 43],Comb FuncCall ("OracleFlatCurryXML","flatx2exp") [Var 35,Var 44]],Var 38],Var 39]]))]))]))]))]])),Func ("OracleFlatCurryXML","_case_299") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("Prelude","(,)") [3,4]) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Var 4])]])),Func ("OracleFlatCurryXML","_case_300") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("Prelude","(,)") [3,4]) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Var 3])]])),Func ("OracleFlatCurryXML","_case_301") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("Prelude","(,)") [3,4]) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Var 4])]])),Func ("OracleFlatCurryXML","_case_302") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("Prelude","(,)") [3,4]) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Var 3])]])),Func ("OracleFlatCurryXML","_case_583") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("XML","XElem") [3,4,5]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_582") [Var 4,Var 5,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_582") 4 Private (TVar (-42)) (Rule [4,5,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("Prelude",":") [6,7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_581") [Var 4,Var 5,Var 7,Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_581") 5 Private (TVar (-42)) (Rule [4,5,7,6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (LPattern (Charc 'v')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_580") [Var 4,Var 5,Var 7,Var 1]]),Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_574") [Var 4,Var 5,Var 7,Var 1]]),Branch (LPattern (Charc 'f')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_555") [Var 4,Var 5,Var 7,Var 1]]),Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_417") [Var 4,Var 5,Var 7,Var 1]]),Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_309") [Var 4,Var 5,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_309") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [277,278]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_308") [Var 4,Var 5,Var 278,Var 277,Var 1]])]])),Func ("OracleFlatCurryXML","_case_308") 5 Private (TVar (-42)) (Rule [4,5,278,277,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 277) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_307") [Var 4,Var 5,Var 278,Var 1]])]])),Func ("OracleFlatCurryXML","_case_307") 4 Private (TVar (-42)) (Rule [4,5,278,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 278) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_306") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_306") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_305") [Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_305") 2 Private (TVar (-42)) (Rule [5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (Pattern ("Prelude",":") [279,280]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_304") [Var 279,Var 280,Var 1]])]])),Func ("OracleFlatCurryXML","_case_304") 3 Private (TVar (-42)) (Rule [279,280,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 280) [Branch (Pattern ("Prelude",":") [281,282]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_303") [Var 279,Var 281,Var 282,Var 1]])]])),Func ("OracleFlatCurryXML","_case_303") 4 Private (TVar (-42)) (Rule [279,281,282,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 282) [Branch (Pattern ("Prelude","[]") []) (Let [(283,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 283,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("FlatCurry","Or") [Comb FuncCall ("OracleFlatCurryXML","flatx2exp") [Var 279,Var 1],Comb FuncCall ("OracleFlatCurryXML","flatx2exp") [Var 281,Var 283]]]))]])),Func ("OracleFlatCurryXML","_case_417") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [169,170]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_416") [Var 4,Var 5,Var 170,Var 169,Var 1]])]])),Func ("OracleFlatCurryXML","_case_416") 5 Private (TVar (-42)) (Rule [4,5,170,169,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 169) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_415") [Var 4,Var 5,Var 170,Var 1]]),Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_316") [Var 4,Var 5,Var 170,Var 1]])]])),Func ("OracleFlatCurryXML","_case_316") 4 Private (TVar (-42)) (Rule [4,5,170,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 170) [Branch (Pattern ("Prelude",":") [271,272]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_315") [Var 4,Var 5,Var 272,Var 271,Var 1]])]])),Func ("OracleFlatCurryXML","_case_315") 5 Private (TVar (-42)) (Rule [4,5,272,271,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 271) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_314") [Var 4,Var 5,Var 272,Var 1]])]])),Func ("OracleFlatCurryXML","_case_314") 4 Private (TVar (-42)) (Rule [4,5,272,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 272) [Branch (Pattern ("Prelude",":") [273,274]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_313") [Var 4,Var 5,Var 274,Var 273,Var 1]])]])),Func ("OracleFlatCurryXML","_case_313") 5 Private (TVar (-42)) (Rule [4,5,274,273,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 273) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_312") [Var 4,Var 5,Var 274,Var 1]])]])),Func ("OracleFlatCurryXML","_case_312") 4 Private (TVar (-42)) (Rule [4,5,274,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 274) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_311") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_311") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_310") [Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_310") 2 Private (TVar (-42)) (Rule [5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (Pattern ("Prelude",":") [275,276]) (Let [(277,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 277,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("FlatCurry","Case") [Comb ConsCall ("FlatCurry","Rigid") [],Comb FuncCall ("OracleFlatCurryXML","flatx2exp") [Var 275,Var 1],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatx2branch") []],Var 276,Var 277]]]))]])),Func ("OracleFlatCurryXML","_case_415") 4 Private (TVar (-42)) (Rule [4,5,170,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 170) [Branch (Pattern ("Prelude",":") [171,172]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_414") [Var 4,Var 5,Var 172,Var 171,Var 1]])]])),Func ("OracleFlatCurryXML","_case_414") 5 Private (TVar (-42)) (Rule [4,5,172,171,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 171) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_413") [Var 4,Var 5,Var 172,Var 1]])]])),Func ("OracleFlatCurryXML","_case_413") 4 Private (TVar (-42)) (Rule [4,5,172,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 172) [Branch (Pattern ("Prelude",":") [173,174]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_412") [Var 4,Var 5,Var 174,Var 173,Var 1]])]])),Func ("OracleFlatCurryXML","_case_412") 5 Private (TVar (-42)) (Rule [4,5,174,173,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 173) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_411") [Var 4,Var 5,Var 174,Var 1]])]])),Func ("OracleFlatCurryXML","_case_411") 4 Private (TVar (-42)) (Rule [4,5,174,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 174) [Branch (Pattern ("Prelude",":") [175,176]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_410") [Var 4,Var 5,Var 176,Var 175,Var 1]])]])),Func ("OracleFlatCurryXML","_case_410") 5 Private (TVar (-42)) (Rule [4,5,176,175,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 175) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_409") [Var 4,Var 5,Var 176,Var 1]]),Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_375") [Var 4,Var 5,Var 176,Var 1]])]])),Func ("OracleFlatCurryXML","_case_375") 4 Private (TVar (-42)) (Rule [4,5,176,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 176) [Branch (Pattern ("Prelude",":") [211,212]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_374") [Var 4,Var 5,Var 212,Var 211,Var 1]])]])),Func ("OracleFlatCurryXML","_case_374") 5 Private (TVar (-42)) (Rule [4,5,212,211,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 211) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_373") [Var 4,Var 5,Var 212,Var 1]])]])),Func ("OracleFlatCurryXML","_case_373") 4 Private (TVar (-42)) (Rule [4,5,212,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 212) [Branch (Pattern ("Prelude",":") [213,214]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_372") [Var 4,Var 5,Var 214,Var 213,Var 1]])]])),Func ("OracleFlatCurryXML","_case_372") 5 Private (TVar (-42)) (Rule [4,5,214,213,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 213) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_371") [Var 4,Var 5,Var 214,Var 1]])]])),Func ("OracleFlatCurryXML","_case_371") 4 Private (TVar (-42)) (Rule [4,5,214,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 214) [Branch (Pattern ("Prelude",":") [215,216]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_370") [Var 4,Var 5,Var 216,Var 215,Var 1]])]])),Func ("OracleFlatCurryXML","_case_370") 5 Private (TVar (-42)) (Rule [4,5,216,215,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 215) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_369") [Var 4,Var 5,Var 216,Var 1]])]])),Func ("OracleFlatCurryXML","_case_369") 4 Private (TVar (-42)) (Rule [4,5,216,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 216) [Branch (Pattern ("Prelude",":") [217,218]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_368") [Var 4,Var 5,Var 218,Var 217,Var 1]])]])),Func ("OracleFlatCurryXML","_case_368") 5 Private (TVar (-42)) (Rule [4,5,218,217,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 217) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_367") [Var 4,Var 5,Var 218,Var 1]])]])),Func ("OracleFlatCurryXML","_case_367") 4 Private (TVar (-42)) (Rule [4,5,218,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 218) [Branch (Pattern ("Prelude",":") [219,220]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_366") [Var 4,Var 5,Var 220,Var 219,Var 1]])]])),Func ("OracleFlatCurryXML","_case_366") 5 Private (TVar (-42)) (Rule [4,5,220,219,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 219) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_365") [Var 4,Var 5,Var 220,Var 1]])]])),Func ("OracleFlatCurryXML","_case_365") 4 Private (TVar (-42)) (Rule [4,5,220,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 220) [Branch (Pattern ("Prelude",":") [221,222]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_364") [Var 4,Var 5,Var 222,Var 221,Var 1]])]])),Func ("OracleFlatCurryXML","_case_364") 5 Private (TVar (-42)) (Rule [4,5,222,221,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 221) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_363") [Var 4,Var 5,Var 222,Var 1]])]])),Func ("OracleFlatCurryXML","_case_363") 4 Private (TVar (-42)) (Rule [4,5,222,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 222) [Branch (Pattern ("Prelude",":") [223,224]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_362") [Var 4,Var 5,Var 224,Var 223,Var 1]])]])),Func ("OracleFlatCurryXML","_case_362") 5 Private (TVar (-42)) (Rule [4,5,224,223,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 223) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_361") [Var 4,Var 5,Var 224,Var 1]])]])),Func ("OracleFlatCurryXML","_case_361") 4 Private (TVar (-42)) (Rule [4,5,224,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 224) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_360") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_360") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude",":") [225,226]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_359") [Var 5,Var 226,Var 225,Var 1]])]])),Func ("OracleFlatCurryXML","_case_359") 4 Private (TVar (-42)) (Rule [5,226,225,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 225) [Branch (Pattern ("Prelude","(,)") [227,228]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_358") [Var 5,Var 226,Var 228,Var 227,Var 1]])]])),Func ("OracleFlatCurryXML","_case_358") 5 Private (TVar (-42)) (Rule [5,226,228,227,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 227) [Branch (Pattern ("Prelude",":") [229,230]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_357") [Var 5,Var 226,Var 228,Var 230,Var 229,Var 1]])]])),Func ("OracleFlatCurryXML","_case_357") 6 Private (TVar (-42)) (Rule [5,226,228,230,229,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 229) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_356") [Var 5,Var 226,Var 228,Var 230,Var 1]])]])),Func ("OracleFlatCurryXML","_case_356") 5 Private (TVar (-42)) (Rule [5,226,228,230,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 230) [Branch (Pattern ("Prelude",":") [231,232]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_355") [Var 5,Var 226,Var 228,Var 232,Var 231,Var 1]])]])),Func ("OracleFlatCurryXML","_case_355") 6 Private (TVar (-42)) (Rule [5,226,228,232,231,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 231) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_354") [Var 5,Var 226,Var 228,Var 232,Var 1]])]])),Func ("OracleFlatCurryXML","_case_354") 5 Private (TVar (-42)) (Rule [5,226,228,232,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 232) [Branch (Pattern ("Prelude",":") [233,234]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_353") [Var 5,Var 226,Var 228,Var 234,Var 233,Var 1]])]])),Func ("OracleFlatCurryXML","_case_353") 6 Private (TVar (-42)) (Rule [5,226,228,234,233,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 233) [Branch (LPattern (Charc 'd')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_352") [Var 5,Var 226,Var 228,Var 234,Var 1]])]])),Func ("OracleFlatCurryXML","_case_352") 5 Private (TVar (-42)) (Rule [5,226,228,234,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 234) [Branch (Pattern ("Prelude",":") [235,236]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_351") [Var 5,Var 226,Var 228,Var 236,Var 235,Var 1]])]])),Func ("OracleFlatCurryXML","_case_351") 6 Private (TVar (-42)) (Rule [5,226,228,236,235,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 235) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_350") [Var 5,Var 226,Var 228,Var 236,Var 1]])]])),Func ("OracleFlatCurryXML","_case_350") 5 Private (TVar (-42)) (Rule [5,226,228,236,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 236) [Branch (Pattern ("Prelude",":") [237,238]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_349") [Var 5,Var 226,Var 228,Var 238,Var 237,Var 1]])]])),Func ("OracleFlatCurryXML","_case_349") 6 Private (TVar (-42)) (Rule [5,226,228,238,237,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 237) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_348") [Var 5,Var 226,Var 228,Var 238,Var 1]])]])),Func ("OracleFlatCurryXML","_case_348") 5 Private (TVar (-42)) (Rule [5,226,228,238,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 238) [Branch (Pattern ("Prelude",":") [239,240]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_347") [Var 5,Var 226,Var 228,Var 240,Var 239,Var 1]])]])),Func ("OracleFlatCurryXML","_case_347") 6 Private (TVar (-42)) (Rule [5,226,228,240,239,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 239) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_346") [Var 5,Var 226,Var 228,Var 240,Var 1]])]])),Func ("OracleFlatCurryXML","_case_346") 5 Private (TVar (-42)) (Rule [5,226,228,240,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 240) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_345") [Var 5,Var 228,Var 226,Var 1]])]])),Func ("OracleFlatCurryXML","_case_345") 4 Private (TVar (-42)) (Rule [5,228,226,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 226) [Branch (Pattern ("Prelude",":") [241,242]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_344") [Var 5,Var 228,Var 242,Var 241,Var 1]])]])),Func ("OracleFlatCurryXML","_case_344") 5 Private (TVar (-42)) (Rule [5,228,242,241,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 241) [Branch (Pattern ("Prelude","(,)") [243,244]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_343") [Var 5,Var 228,Var 242,Var 244,Var 243,Var 1]])]])),Func ("OracleFlatCurryXML","_case_343") 6 Private (TVar (-42)) (Rule [5,228,242,244,243,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 243) [Branch (Pattern ("Prelude",":") [245,246]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_342") [Var 5,Var 228,Var 242,Var 244,Var 246,Var 245,Var 1]])]])),Func ("OracleFlatCurryXML","_case_342") 7 Private (TVar (-42)) (Rule [5,228,242,244,246,245,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 245) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_341") [Var 5,Var 228,Var 242,Var 244,Var 246,Var 1]])]])),Func ("OracleFlatCurryXML","_case_341") 6 Private (TVar (-42)) (Rule [5,228,242,244,246,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 246) [Branch (Pattern ("Prelude",":") [247,248]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_340") [Var 5,Var 228,Var 242,Var 244,Var 248,Var 247,Var 1]])]])),Func ("OracleFlatCurryXML","_case_340") 7 Private (TVar (-42)) (Rule [5,228,242,244,248,247,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 247) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_339") [Var 5,Var 228,Var 242,Var 244,Var 248,Var 1]])]])),Func ("OracleFlatCurryXML","_case_339") 6 Private (TVar (-42)) (Rule [5,228,242,244,248,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 248) [Branch (Pattern ("Prelude",":") [249,250]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_338") [Var 5,Var 228,Var 242,Var 244,Var 250,Var 249,Var 1]])]])),Func ("OracleFlatCurryXML","_case_338") 7 Private (TVar (-42)) (Rule [5,228,242,244,250,249,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 249) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_337") [Var 5,Var 228,Var 242,Var 244,Var 250,Var 1]])]])),Func ("OracleFlatCurryXML","_case_337") 6 Private (TVar (-42)) (Rule [5,228,242,244,250,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 250) [Branch (Pattern ("Prelude",":") [251,252]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_336") [Var 5,Var 228,Var 242,Var 244,Var 252,Var 251,Var 1]])]])),Func ("OracleFlatCurryXML","_case_336") 7 Private (TVar (-42)) (Rule [5,228,242,244,252,251,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 251) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_335") [Var 5,Var 228,Var 242,Var 244,Var 252,Var 1]])]])),Func ("OracleFlatCurryXML","_case_335") 6 Private (TVar (-42)) (Rule [5,228,242,244,252,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 252) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_334") [Var 5,Var 228,Var 244,Var 242,Var 1]])]])),Func ("OracleFlatCurryXML","_case_334") 5 Private (TVar (-42)) (Rule [5,228,244,242,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 242) [Branch (Pattern ("Prelude",":") [253,254]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_333") [Var 5,Var 228,Var 244,Var 254,Var 253,Var 1]])]])),Func ("OracleFlatCurryXML","_case_333") 6 Private (TVar (-42)) (Rule [5,228,244,254,253,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 253) [Branch (Pattern ("Prelude","(,)") [255,256]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_332") [Var 5,Var 228,Var 244,Var 254,Var 256,Var 255,Var 1]])]])),Func ("OracleFlatCurryXML","_case_332") 7 Private (TVar (-42)) (Rule [5,228,244,254,256,255,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 255) [Branch (Pattern ("Prelude",":") [257,258]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_331") [Var 5,Var 228,Var 244,Var 254,Var 256,Var 258,Var 257,Var 1]])]])),Func ("OracleFlatCurryXML","_case_331") 8 Private (TVar (-42)) (Rule [5,228,244,254,256,258,257,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 257) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_330") [Var 5,Var 228,Var 244,Var 254,Var 256,Var 258,Var 1]])]])),Func ("OracleFlatCurryXML","_case_330") 7 Private (TVar (-42)) (Rule [5,228,244,254,256,258,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 258) [Branch (Pattern ("Prelude",":") [259,260]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_329") [Var 5,Var 228,Var 244,Var 254,Var 256,Var 260,Var 259,Var 1]])]])),Func ("OracleFlatCurryXML","_case_329") 8 Private (TVar (-42)) (Rule [5,228,244,254,256,260,259,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 259) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_328") [Var 5,Var 228,Var 244,Var 254,Var 256,Var 260,Var 1]])]])),Func ("OracleFlatCurryXML","_case_328") 7 Private (TVar (-42)) (Rule [5,228,244,254,256,260,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 260) [Branch (Pattern ("Prelude",":") [261,262]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_327") [Var 5,Var 228,Var 244,Var 254,Var 256,Var 262,Var 261,Var 1]])]])),Func ("OracleFlatCurryXML","_case_327") 8 Private (TVar (-42)) (Rule [5,228,244,254,256,262,261,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 261) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_326") [Var 5,Var 228,Var 244,Var 254,Var 256,Var 262,Var 1]])]])),Func ("OracleFlatCurryXML","_case_326") 7 Private (TVar (-42)) (Rule [5,228,244,254,256,262,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 262) [Branch (Pattern ("Prelude",":") [263,264]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_325") [Var 5,Var 228,Var 244,Var 254,Var 256,Var 264,Var 263,Var 1]])]])),Func ("OracleFlatCurryXML","_case_325") 8 Private (TVar (-42)) (Rule [5,228,244,254,256,264,263,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 263) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_324") [Var 5,Var 228,Var 244,Var 254,Var 256,Var 264,Var 1]])]])),Func ("OracleFlatCurryXML","_case_324") 7 Private (TVar (-42)) (Rule [5,228,244,254,256,264,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 264) [Branch (Pattern ("Prelude",":") [265,266]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_323") [Var 5,Var 228,Var 244,Var 254,Var 256,Var 266,Var 265,Var 1]])]])),Func ("OracleFlatCurryXML","_case_323") 8 Private (TVar (-42)) (Rule [5,228,244,254,256,266,265,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 265) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_322") [Var 5,Var 228,Var 244,Var 254,Var 256,Var 266,Var 1]])]])),Func ("OracleFlatCurryXML","_case_322") 7 Private (TVar (-42)) (Rule [5,228,244,254,256,266,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 266) [Branch (Pattern ("Prelude",":") [267,268]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_321") [Var 5,Var 228,Var 244,Var 254,Var 256,Var 268,Var 267,Var 1]])]])),Func ("OracleFlatCurryXML","_case_321") 8 Private (TVar (-42)) (Rule [5,228,244,254,256,268,267,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 267) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_320") [Var 5,Var 228,Var 244,Var 254,Var 256,Var 268,Var 1]])]])),Func ("OracleFlatCurryXML","_case_320") 7 Private (TVar (-42)) (Rule [5,228,244,254,256,268,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 268) [Branch (Pattern ("Prelude",":") [269,270]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_319") [Var 5,Var 228,Var 244,Var 254,Var 256,Var 270,Var 269,Var 1]])]])),Func ("OracleFlatCurryXML","_case_319") 8 Private (TVar (-42)) (Rule [5,228,244,254,256,270,269,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 269) [Branch (LPattern (Charc 'g')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_318") [Var 5,Var 228,Var 244,Var 254,Var 256,Var 270,Var 1]])]])),Func ("OracleFlatCurryXML","_case_318") 7 Private (TVar (-42)) (Rule [5,228,244,254,256,270,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 270) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_317") [Var 5,Var 228,Var 244,Var 256,Var 254,Var 1]])]])),Func ("OracleFlatCurryXML","_case_317") 6 Private (TVar (-42)) (Rule [5,228,244,256,254,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 254) [Branch (Pattern ("Prelude","[]") []) (Let [(257,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 257,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("FlatCurry","Comb") [Comb ConsCall ("FlatCurry","ConsPartCall") [Comb FuncCall ("OracleRead","readNat") [Var 256,Var 1]],Comb ConsCall ("Prelude","(,)") [Var 228,Var 244],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatx2exp") []],Var 5,Var 257]]]))]])),Func ("OracleFlatCurryXML","_case_409") 4 Private (TVar (-42)) (Rule [4,5,176,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 176) [Branch (Pattern ("Prelude",":") [177,178]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_408") [Var 4,Var 5,Var 178,Var 177,Var 1]])]])),Func ("OracleFlatCurryXML","_case_408") 5 Private (TVar (-42)) (Rule [4,5,178,177,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 177) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_407") [Var 4,Var 5,Var 178,Var 1]])]])),Func ("OracleFlatCurryXML","_case_407") 4 Private (TVar (-42)) (Rule [4,5,178,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 178) [Branch (Pattern ("Prelude",":") [179,180]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_406") [Var 4,Var 5,Var 180,Var 179,Var 1]])]])),Func ("OracleFlatCurryXML","_case_406") 5 Private (TVar (-42)) (Rule [4,5,180,179,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 179) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_405") [Var 4,Var 5,Var 180,Var 1]])]])),Func ("OracleFlatCurryXML","_case_405") 4 Private (TVar (-42)) (Rule [4,5,180,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 180) [Branch (Pattern ("Prelude",":") [181,182]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_404") [Var 4,Var 5,Var 182,Var 181,Var 1]])]])),Func ("OracleFlatCurryXML","_case_404") 5 Private (TVar (-42)) (Rule [4,5,182,181,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 181) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_403") [Var 4,Var 5,Var 182,Var 1]])]])),Func ("OracleFlatCurryXML","_case_403") 4 Private (TVar (-42)) (Rule [4,5,182,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 182) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_402") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_402") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude",":") [183,184]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_401") [Var 5,Var 184,Var 183,Var 1]])]])),Func ("OracleFlatCurryXML","_case_401") 4 Private (TVar (-42)) (Rule [5,184,183,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 183) [Branch (Pattern ("Prelude","(,)") [185,186]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_400") [Var 5,Var 184,Var 186,Var 185,Var 1]])]])),Func ("OracleFlatCurryXML","_case_400") 5 Private (TVar (-42)) (Rule [5,184,186,185,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 185) [Branch (Pattern ("Prelude",":") [187,188]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_399") [Var 5,Var 184,Var 186,Var 188,Var 187,Var 1]])]])),Func ("OracleFlatCurryXML","_case_399") 6 Private (TVar (-42)) (Rule [5,184,186,188,187,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 187) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_398") [Var 5,Var 184,Var 186,Var 188,Var 1]])]])),Func ("OracleFlatCurryXML","_case_398") 5 Private (TVar (-42)) (Rule [5,184,186,188,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 188) [Branch (Pattern ("Prelude",":") [189,190]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_397") [Var 5,Var 184,Var 186,Var 190,Var 189,Var 1]])]])),Func ("OracleFlatCurryXML","_case_397") 6 Private (TVar (-42)) (Rule [5,184,186,190,189,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 189) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_396") [Var 5,Var 184,Var 186,Var 190,Var 1]])]])),Func ("OracleFlatCurryXML","_case_396") 5 Private (TVar (-42)) (Rule [5,184,186,190,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 190) [Branch (Pattern ("Prelude",":") [191,192]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_395") [Var 5,Var 184,Var 186,Var 192,Var 191,Var 1]])]])),Func ("OracleFlatCurryXML","_case_395") 6 Private (TVar (-42)) (Rule [5,184,186,192,191,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 191) [Branch (LPattern (Charc 'd')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_394") [Var 5,Var 184,Var 186,Var 192,Var 1]])]])),Func ("OracleFlatCurryXML","_case_394") 5 Private (TVar (-42)) (Rule [5,184,186,192,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 192) [Branch (Pattern ("Prelude",":") [193,194]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_393") [Var 5,Var 184,Var 186,Var 194,Var 193,Var 1]])]])),Func ("OracleFlatCurryXML","_case_393") 6 Private (TVar (-42)) (Rule [5,184,186,194,193,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 193) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_392") [Var 5,Var 184,Var 186,Var 194,Var 1]])]])),Func ("OracleFlatCurryXML","_case_392") 5 Private (TVar (-42)) (Rule [5,184,186,194,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 194) [Branch (Pattern ("Prelude",":") [195,196]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_391") [Var 5,Var 184,Var 186,Var 196,Var 195,Var 1]])]])),Func ("OracleFlatCurryXML","_case_391") 6 Private (TVar (-42)) (Rule [5,184,186,196,195,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 195) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_390") [Var 5,Var 184,Var 186,Var 196,Var 1]])]])),Func ("OracleFlatCurryXML","_case_390") 5 Private (TVar (-42)) (Rule [5,184,186,196,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 196) [Branch (Pattern ("Prelude",":") [197,198]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_389") [Var 5,Var 184,Var 186,Var 198,Var 197,Var 1]])]])),Func ("OracleFlatCurryXML","_case_389") 6 Private (TVar (-42)) (Rule [5,184,186,198,197,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 197) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_388") [Var 5,Var 184,Var 186,Var 198,Var 1]])]])),Func ("OracleFlatCurryXML","_case_388") 5 Private (TVar (-42)) (Rule [5,184,186,198,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 198) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_387") [Var 5,Var 186,Var 184,Var 1]])]])),Func ("OracleFlatCurryXML","_case_387") 4 Private (TVar (-42)) (Rule [5,186,184,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 184) [Branch (Pattern ("Prelude",":") [199,200]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_386") [Var 5,Var 186,Var 200,Var 199,Var 1]])]])),Func ("OracleFlatCurryXML","_case_386") 5 Private (TVar (-42)) (Rule [5,186,200,199,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 199) [Branch (Pattern ("Prelude","(,)") [201,202]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_385") [Var 5,Var 186,Var 200,Var 202,Var 201,Var 1]])]])),Func ("OracleFlatCurryXML","_case_385") 6 Private (TVar (-42)) (Rule [5,186,200,202,201,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 201) [Branch (Pattern ("Prelude",":") [203,204]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_384") [Var 5,Var 186,Var 200,Var 202,Var 204,Var 203,Var 1]])]])),Func ("OracleFlatCurryXML","_case_384") 7 Private (TVar (-42)) (Rule [5,186,200,202,204,203,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 203) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_383") [Var 5,Var 186,Var 200,Var 202,Var 204,Var 1]])]])),Func ("OracleFlatCurryXML","_case_383") 6 Private (TVar (-42)) (Rule [5,186,200,202,204,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 204) [Branch (Pattern ("Prelude",":") [205,206]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_382") [Var 5,Var 186,Var 200,Var 202,Var 206,Var 205,Var 1]])]])),Func ("OracleFlatCurryXML","_case_382") 7 Private (TVar (-42)) (Rule [5,186,200,202,206,205,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 205) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_381") [Var 5,Var 186,Var 200,Var 202,Var 206,Var 1]])]])),Func ("OracleFlatCurryXML","_case_381") 6 Private (TVar (-42)) (Rule [5,186,200,202,206,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 206) [Branch (Pattern ("Prelude",":") [207,208]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_380") [Var 5,Var 186,Var 200,Var 202,Var 208,Var 207,Var 1]])]])),Func ("OracleFlatCurryXML","_case_380") 7 Private (TVar (-42)) (Rule [5,186,200,202,208,207,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 207) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_379") [Var 5,Var 186,Var 200,Var 202,Var 208,Var 1]])]])),Func ("OracleFlatCurryXML","_case_379") 6 Private (TVar (-42)) (Rule [5,186,200,202,208,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 208) [Branch (Pattern ("Prelude",":") [209,210]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_378") [Var 5,Var 186,Var 200,Var 202,Var 210,Var 209,Var 1]])]])),Func ("OracleFlatCurryXML","_case_378") 7 Private (TVar (-42)) (Rule [5,186,200,202,210,209,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 209) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_377") [Var 5,Var 186,Var 200,Var 202,Var 210,Var 1]])]])),Func ("OracleFlatCurryXML","_case_377") 6 Private (TVar (-42)) (Rule [5,186,200,202,210,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 210) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_376") [Var 5,Var 186,Var 202,Var 200,Var 1]])]])),Func ("OracleFlatCurryXML","_case_376") 5 Private (TVar (-42)) (Rule [5,186,202,200,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 200) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb ConsCall ("FlatCurry","Comb") [Comb ConsCall ("FlatCurry","ConsCall") [],Comb ConsCall ("Prelude","(,)") [Var 186,Var 202],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatx2exp") []],Var 5,Var 1]]])]])),Func ("OracleFlatCurryXML","_case_555") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [32,33]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_554") [Var 4,Var 5,Var 33,Var 32,Var 1]])]])),Func ("OracleFlatCurryXML","_case_554") 5 Private (TVar (-42)) (Rule [4,5,33,32,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 32) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_553") [Var 4,Var 5,Var 33,Var 1]]),Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_454") [Var 4,Var 5,Var 33,Var 1]]),Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_426") [Var 4,Var 5,Var 33,Var 1]])]])),Func ("OracleFlatCurryXML","_case_426") 4 Private (TVar (-42)) (Rule [4,5,33,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 33) [Branch (Pattern ("Prelude",":") [161,162]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_425") [Var 4,Var 5,Var 162,Var 161,Var 1]])]])),Func ("OracleFlatCurryXML","_case_425") 5 Private (TVar (-42)) (Rule [4,5,162,161,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 161) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_424") [Var 4,Var 5,Var 162,Var 1]])]])),Func ("OracleFlatCurryXML","_case_424") 4 Private (TVar (-42)) (Rule [4,5,162,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 162) [Branch (Pattern ("Prelude",":") [163,164]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_423") [Var 4,Var 5,Var 164,Var 163,Var 1]])]])),Func ("OracleFlatCurryXML","_case_423") 5 Private (TVar (-42)) (Rule [4,5,164,163,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 163) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_422") [Var 4,Var 5,Var 164,Var 1]])]])),Func ("OracleFlatCurryXML","_case_422") 4 Private (TVar (-42)) (Rule [4,5,164,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 164) [Branch (Pattern ("Prelude",":") [165,166]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_421") [Var 4,Var 5,Var 166,Var 165,Var 1]])]])),Func ("OracleFlatCurryXML","_case_421") 5 Private (TVar (-42)) (Rule [4,5,166,165,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 165) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_420") [Var 4,Var 5,Var 166,Var 1]])]])),Func ("OracleFlatCurryXML","_case_420") 4 Private (TVar (-42)) (Rule [4,5,166,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 166) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_419") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_419") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_418") [Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_418") 2 Private (TVar (-42)) (Rule [5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (Pattern ("Prelude",":") [167,168]) (Let [(169,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 169,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("FlatCurry","Case") [Comb ConsCall ("FlatCurry","Flex") [],Comb FuncCall ("OracleFlatCurryXML","flatx2exp") [Var 167,Var 1],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatx2branch") []],Var 168,Var 169]]]))]])),Func ("OracleFlatCurryXML","_case_454") 4 Private (TVar (-42)) (Rule [4,5,33,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 33) [Branch (Pattern ("Prelude",":") [134,135]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_453") [Var 4,Var 5,Var 135,Var 134,Var 1]])]])),Func ("OracleFlatCurryXML","_case_453") 5 Private (TVar (-42)) (Rule [4,5,135,134,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 134) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_452") [Var 4,Var 5,Var 135,Var 1]])]])),Func ("OracleFlatCurryXML","_case_452") 4 Private (TVar (-42)) (Rule [4,5,135,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 135) [Branch (Pattern ("Prelude",":") [136,137]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_451") [Var 4,Var 5,Var 137,Var 136,Var 1]])]])),Func ("OracleFlatCurryXML","_case_451") 5 Private (TVar (-42)) (Rule [4,5,137,136,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 136) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_450") [Var 4,Var 5,Var 137,Var 1]])]])),Func ("OracleFlatCurryXML","_case_450") 4 Private (TVar (-42)) (Rule [4,5,137,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 137) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_449") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_449") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_448") [Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_448") 2 Private (TVar (-42)) (Rule [5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (Pattern ("Prelude",":") [138,139]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_447") [Var 139,Var 138,Var 1]])]])),Func ("OracleFlatCurryXML","_case_447") 3 Private (TVar (-42)) (Rule [139,138,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 138) [Branch (Pattern ("XML","XElem") [140,141,142]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_446") [Var 139,Var 141,Var 142,Var 140,Var 1]])]])),Func ("OracleFlatCurryXML","_case_446") 5 Private (TVar (-42)) (Rule [139,141,142,140,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 140) [Branch (Pattern ("Prelude",":") [143,144]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_445") [Var 139,Var 141,Var 142,Var 144,Var 143,Var 1]])]])),Func ("OracleFlatCurryXML","_case_445") 6 Private (TVar (-42)) (Rule [139,141,142,144,143,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 143) [Branch (LPattern (Charc 'f')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_444") [Var 139,Var 141,Var 142,Var 144,Var 1]])]])),Func ("OracleFlatCurryXML","_case_444") 5 Private (TVar (-42)) (Rule [139,141,142,144,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 144) [Branch (Pattern ("Prelude",":") [145,146]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_443") [Var 139,Var 141,Var 142,Var 146,Var 145,Var 1]])]])),Func ("OracleFlatCurryXML","_case_443") 6 Private (TVar (-42)) (Rule [139,141,142,146,145,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 145) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_442") [Var 139,Var 141,Var 142,Var 146,Var 1]])]])),Func ("OracleFlatCurryXML","_case_442") 5 Private (TVar (-42)) (Rule [139,141,142,146,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 146) [Branch (Pattern ("Prelude",":") [147,148]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_441") [Var 139,Var 141,Var 142,Var 148,Var 147,Var 1]])]])),Func ("OracleFlatCurryXML","_case_441") 6 Private (TVar (-42)) (Rule [139,141,142,148,147,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 147) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_440") [Var 139,Var 141,Var 142,Var 148,Var 1]])]])),Func ("OracleFlatCurryXML","_case_440") 5 Private (TVar (-42)) (Rule [139,141,142,148,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 148) [Branch (Pattern ("Prelude",":") [149,150]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_439") [Var 139,Var 141,Var 142,Var 150,Var 149,Var 1]])]])),Func ("OracleFlatCurryXML","_case_439") 6 Private (TVar (-42)) (Rule [139,141,142,150,149,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 149) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_438") [Var 139,Var 141,Var 142,Var 150,Var 1]])]])),Func ("OracleFlatCurryXML","_case_438") 5 Private (TVar (-42)) (Rule [139,141,142,150,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 150) [Branch (Pattern ("Prelude",":") [151,152]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_437") [Var 139,Var 141,Var 142,Var 152,Var 151,Var 1]])]])),Func ("OracleFlatCurryXML","_case_437") 6 Private (TVar (-42)) (Rule [139,141,142,152,151,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 151) [Branch (LPattern (Charc 'v')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_436") [Var 139,Var 141,Var 142,Var 152,Var 1]])]])),Func ("OracleFlatCurryXML","_case_436") 5 Private (TVar (-42)) (Rule [139,141,142,152,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 152) [Branch (Pattern ("Prelude",":") [153,154]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_435") [Var 139,Var 141,Var 142,Var 154,Var 153,Var 1]])]])),Func ("OracleFlatCurryXML","_case_435") 6 Private (TVar (-42)) (Rule [139,141,142,154,153,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 153) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_434") [Var 139,Var 141,Var 142,Var 154,Var 1]])]])),Func ("OracleFlatCurryXML","_case_434") 5 Private (TVar (-42)) (Rule [139,141,142,154,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 154) [Branch (Pattern ("Prelude",":") [155,156]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_433") [Var 139,Var 141,Var 142,Var 156,Var 155,Var 1]])]])),Func ("OracleFlatCurryXML","_case_433") 6 Private (TVar (-42)) (Rule [139,141,142,156,155,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 155) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_432") [Var 139,Var 141,Var 142,Var 156,Var 1]])]])),Func ("OracleFlatCurryXML","_case_432") 5 Private (TVar (-42)) (Rule [139,141,142,156,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 156) [Branch (Pattern ("Prelude",":") [157,158]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_431") [Var 139,Var 141,Var 142,Var 158,Var 157,Var 1]])]])),Func ("OracleFlatCurryXML","_case_431") 6 Private (TVar (-42)) (Rule [139,141,142,158,157,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 157) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_430") [Var 139,Var 141,Var 142,Var 158,Var 1]])]])),Func ("OracleFlatCurryXML","_case_430") 5 Private (TVar (-42)) (Rule [139,141,142,158,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 158) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_429") [Var 139,Var 142,Var 141,Var 1]])]])),Func ("OracleFlatCurryXML","_case_429") 4 Private (TVar (-42)) (Rule [139,142,141,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 141) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_428") [Var 142,Var 139,Var 1]])]])),Func ("OracleFlatCurryXML","_case_428") 3 Private (TVar (-42)) (Rule [142,139,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 139) [Branch (Pattern ("Prelude",":") [159,160]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_427") [Var 142,Var 159,Var 160,Var 1]])]])),Func ("OracleFlatCurryXML","_case_427") 4 Private (TVar (-42)) (Rule [142,159,160,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 160) [Branch (Pattern ("Prelude","[]") []) (Let [(161,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 161,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("FlatCurry","Free") [Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatx2var") []],Var 142,Var 1],Comb FuncCall ("OracleFlatCurryXML","flatx2exp") [Var 159,Var 161]]]))]])),Func ("OracleFlatCurryXML","_case_553") 4 Private (TVar (-42)) (Rule [4,5,33,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 33) [Branch (Pattern ("Prelude",":") [34,35]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_552") [Var 4,Var 5,Var 35,Var 34,Var 1]])]])),Func ("OracleFlatCurryXML","_case_552") 5 Private (TVar (-42)) (Rule [4,5,35,34,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 34) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_551") [Var 4,Var 5,Var 35,Var 1]])]])),Func ("OracleFlatCurryXML","_case_551") 4 Private (TVar (-42)) (Rule [4,5,35,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 35) [Branch (Pattern ("Prelude",":") [36,37]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_550") [Var 4,Var 5,Var 37,Var 36,Var 1]])]])),Func ("OracleFlatCurryXML","_case_550") 5 Private (TVar (-42)) (Rule [4,5,37,36,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 36) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_549") [Var 4,Var 5,Var 37,Var 1]])]])),Func ("OracleFlatCurryXML","_case_549") 4 Private (TVar (-42)) (Rule [4,5,37,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 37) [Branch (Pattern ("Prelude",":") [38,39]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_548") [Var 4,Var 5,Var 39,Var 38,Var 1]])]])),Func ("OracleFlatCurryXML","_case_548") 5 Private (TVar (-42)) (Rule [4,5,39,38,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 38) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_547") [Var 4,Var 5,Var 39,Var 1]]),Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_513") [Var 4,Var 5,Var 39,Var 1]])]])),Func ("OracleFlatCurryXML","_case_513") 4 Private (TVar (-42)) (Rule [4,5,39,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 39) [Branch (Pattern ("Prelude",":") [74,75]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_512") [Var 4,Var 5,Var 75,Var 74,Var 1]])]])),Func ("OracleFlatCurryXML","_case_512") 5 Private (TVar (-42)) (Rule [4,5,75,74,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 74) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_511") [Var 4,Var 5,Var 75,Var 1]])]])),Func ("OracleFlatCurryXML","_case_511") 4 Private (TVar (-42)) (Rule [4,5,75,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 75) [Branch (Pattern ("Prelude",":") [76,77]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_510") [Var 4,Var 5,Var 77,Var 76,Var 1]])]])),Func ("OracleFlatCurryXML","_case_510") 5 Private (TVar (-42)) (Rule [4,5,77,76,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 76) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_509") [Var 4,Var 5,Var 77,Var 1]])]])),Func ("OracleFlatCurryXML","_case_509") 4 Private (TVar (-42)) (Rule [4,5,77,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 77) [Branch (Pattern ("Prelude",":") [78,79]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_508") [Var 4,Var 5,Var 79,Var 78,Var 1]])]])),Func ("OracleFlatCurryXML","_case_508") 5 Private (TVar (-42)) (Rule [4,5,79,78,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 78) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_507") [Var 4,Var 5,Var 79,Var 1]])]])),Func ("OracleFlatCurryXML","_case_507") 4 Private (TVar (-42)) (Rule [4,5,79,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 79) [Branch (Pattern ("Prelude",":") [80,81]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_506") [Var 4,Var 5,Var 81,Var 80,Var 1]])]])),Func ("OracleFlatCurryXML","_case_506") 5 Private (TVar (-42)) (Rule [4,5,81,80,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 80) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_505") [Var 4,Var 5,Var 81,Var 1]])]])),Func ("OracleFlatCurryXML","_case_505") 4 Private (TVar (-42)) (Rule [4,5,81,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 81) [Branch (Pattern ("Prelude",":") [82,83]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_504") [Var 4,Var 5,Var 83,Var 82,Var 1]])]])),Func ("OracleFlatCurryXML","_case_504") 5 Private (TVar (-42)) (Rule [4,5,83,82,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 82) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_503") [Var 4,Var 5,Var 83,Var 1]])]])),Func ("OracleFlatCurryXML","_case_503") 4 Private (TVar (-42)) (Rule [4,5,83,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 83) [Branch (Pattern ("Prelude",":") [84,85]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_502") [Var 4,Var 5,Var 85,Var 84,Var 1]])]])),Func ("OracleFlatCurryXML","_case_502") 5 Private (TVar (-42)) (Rule [4,5,85,84,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 84) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_501") [Var 4,Var 5,Var 85,Var 1]])]])),Func ("OracleFlatCurryXML","_case_501") 4 Private (TVar (-42)) (Rule [4,5,85,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 85) [Branch (Pattern ("Prelude",":") [86,87]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_500") [Var 4,Var 5,Var 87,Var 86,Var 1]])]])),Func ("OracleFlatCurryXML","_case_500") 5 Private (TVar (-42)) (Rule [4,5,87,86,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 86) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_499") [Var 4,Var 5,Var 87,Var 1]])]])),Func ("OracleFlatCurryXML","_case_499") 4 Private (TVar (-42)) (Rule [4,5,87,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 87) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_498") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_498") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude",":") [88,89]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_497") [Var 5,Var 89,Var 88,Var 1]])]])),Func ("OracleFlatCurryXML","_case_497") 4 Private (TVar (-42)) (Rule [5,89,88,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 88) [Branch (Pattern ("Prelude","(,)") [90,91]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_496") [Var 5,Var 89,Var 91,Var 90,Var 1]])]])),Func ("OracleFlatCurryXML","_case_496") 5 Private (TVar (-42)) (Rule [5,89,91,90,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 90) [Branch (Pattern ("Prelude",":") [92,93]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_495") [Var 5,Var 89,Var 91,Var 93,Var 92,Var 1]])]])),Func ("OracleFlatCurryXML","_case_495") 6 Private (TVar (-42)) (Rule [5,89,91,93,92,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 92) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_494") [Var 5,Var 89,Var 91,Var 93,Var 1]])]])),Func ("OracleFlatCurryXML","_case_494") 5 Private (TVar (-42)) (Rule [5,89,91,93,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 93) [Branch (Pattern ("Prelude",":") [94,95]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_493") [Var 5,Var 89,Var 91,Var 95,Var 94,Var 1]])]])),Func ("OracleFlatCurryXML","_case_493") 6 Private (TVar (-42)) (Rule [5,89,91,95,94,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 94) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_492") [Var 5,Var 89,Var 91,Var 95,Var 1]])]])),Func ("OracleFlatCurryXML","_case_492") 5 Private (TVar (-42)) (Rule [5,89,91,95,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 95) [Branch (Pattern ("Prelude",":") [96,97]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_491") [Var 5,Var 89,Var 91,Var 97,Var 96,Var 1]])]])),Func ("OracleFlatCurryXML","_case_491") 6 Private (TVar (-42)) (Rule [5,89,91,97,96,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 96) [Branch (LPattern (Charc 'd')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_490") [Var 5,Var 89,Var 91,Var 97,Var 1]])]])),Func ("OracleFlatCurryXML","_case_490") 5 Private (TVar (-42)) (Rule [5,89,91,97,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 97) [Branch (Pattern ("Prelude",":") [98,99]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_489") [Var 5,Var 89,Var 91,Var 99,Var 98,Var 1]])]])),Func ("OracleFlatCurryXML","_case_489") 6 Private (TVar (-42)) (Rule [5,89,91,99,98,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 98) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_488") [Var 5,Var 89,Var 91,Var 99,Var 1]])]])),Func ("OracleFlatCurryXML","_case_488") 5 Private (TVar (-42)) (Rule [5,89,91,99,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 99) [Branch (Pattern ("Prelude",":") [100,101]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_487") [Var 5,Var 89,Var 91,Var 101,Var 100,Var 1]])]])),Func ("OracleFlatCurryXML","_case_487") 6 Private (TVar (-42)) (Rule [5,89,91,101,100,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 100) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_486") [Var 5,Var 89,Var 91,Var 101,Var 1]])]])),Func ("OracleFlatCurryXML","_case_486") 5 Private (TVar (-42)) (Rule [5,89,91,101,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 101) [Branch (Pattern ("Prelude",":") [102,103]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_485") [Var 5,Var 89,Var 91,Var 103,Var 102,Var 1]])]])),Func ("OracleFlatCurryXML","_case_485") 6 Private (TVar (-42)) (Rule [5,89,91,103,102,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 102) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_484") [Var 5,Var 89,Var 91,Var 103,Var 1]])]])),Func ("OracleFlatCurryXML","_case_484") 5 Private (TVar (-42)) (Rule [5,89,91,103,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 103) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_483") [Var 5,Var 91,Var 89,Var 1]])]])),Func ("OracleFlatCurryXML","_case_483") 4 Private (TVar (-42)) (Rule [5,91,89,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 89) [Branch (Pattern ("Prelude",":") [104,105]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_482") [Var 5,Var 91,Var 105,Var 104,Var 1]])]])),Func ("OracleFlatCurryXML","_case_482") 5 Private (TVar (-42)) (Rule [5,91,105,104,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 104) [Branch (Pattern ("Prelude","(,)") [106,107]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_481") [Var 5,Var 91,Var 105,Var 107,Var 106,Var 1]])]])),Func ("OracleFlatCurryXML","_case_481") 6 Private (TVar (-42)) (Rule [5,91,105,107,106,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 106) [Branch (Pattern ("Prelude",":") [108,109]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_480") [Var 5,Var 91,Var 105,Var 107,Var 109,Var 108,Var 1]])]])),Func ("OracleFlatCurryXML","_case_480") 7 Private (TVar (-42)) (Rule [5,91,105,107,109,108,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 108) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_479") [Var 5,Var 91,Var 105,Var 107,Var 109,Var 1]])]])),Func ("OracleFlatCurryXML","_case_479") 6 Private (TVar (-42)) (Rule [5,91,105,107,109,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 109) [Branch (Pattern ("Prelude",":") [110,111]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_478") [Var 5,Var 91,Var 105,Var 107,Var 111,Var 110,Var 1]])]])),Func ("OracleFlatCurryXML","_case_478") 7 Private (TVar (-42)) (Rule [5,91,105,107,111,110,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 110) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_477") [Var 5,Var 91,Var 105,Var 107,Var 111,Var 1]])]])),Func ("OracleFlatCurryXML","_case_477") 6 Private (TVar (-42)) (Rule [5,91,105,107,111,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 111) [Branch (Pattern ("Prelude",":") [112,113]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_476") [Var 5,Var 91,Var 105,Var 107,Var 113,Var 112,Var 1]])]])),Func ("OracleFlatCurryXML","_case_476") 7 Private (TVar (-42)) (Rule [5,91,105,107,113,112,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 112) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_475") [Var 5,Var 91,Var 105,Var 107,Var 113,Var 1]])]])),Func ("OracleFlatCurryXML","_case_475") 6 Private (TVar (-42)) (Rule [5,91,105,107,113,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 113) [Branch (Pattern ("Prelude",":") [114,115]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_474") [Var 5,Var 91,Var 105,Var 107,Var 115,Var 114,Var 1]])]])),Func ("OracleFlatCurryXML","_case_474") 7 Private (TVar (-42)) (Rule [5,91,105,107,115,114,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 114) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_473") [Var 5,Var 91,Var 105,Var 107,Var 115,Var 1]])]])),Func ("OracleFlatCurryXML","_case_473") 6 Private (TVar (-42)) (Rule [5,91,105,107,115,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 115) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_472") [Var 5,Var 91,Var 107,Var 105,Var 1]])]])),Func ("OracleFlatCurryXML","_case_472") 5 Private (TVar (-42)) (Rule [5,91,107,105,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 105) [Branch (Pattern ("Prelude",":") [116,117]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_471") [Var 5,Var 91,Var 107,Var 117,Var 116,Var 1]])]])),Func ("OracleFlatCurryXML","_case_471") 6 Private (TVar (-42)) (Rule [5,91,107,117,116,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 116) [Branch (Pattern ("Prelude","(,)") [118,119]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_470") [Var 5,Var 91,Var 107,Var 117,Var 119,Var 118,Var 1]])]])),Func ("OracleFlatCurryXML","_case_470") 7 Private (TVar (-42)) (Rule [5,91,107,117,119,118,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 118) [Branch (Pattern ("Prelude",":") [120,121]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_469") [Var 5,Var 91,Var 107,Var 117,Var 119,Var 121,Var 120,Var 1]])]])),Func ("OracleFlatCurryXML","_case_469") 8 Private (TVar (-42)) (Rule [5,91,107,117,119,121,120,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 120) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_468") [Var 5,Var 91,Var 107,Var 117,Var 119,Var 121,Var 1]])]])),Func ("OracleFlatCurryXML","_case_468") 7 Private (TVar (-42)) (Rule [5,91,107,117,119,121,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 121) [Branch (Pattern ("Prelude",":") [122,123]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_467") [Var 5,Var 91,Var 107,Var 117,Var 119,Var 123,Var 122,Var 1]])]])),Func ("OracleFlatCurryXML","_case_467") 8 Private (TVar (-42)) (Rule [5,91,107,117,119,123,122,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 122) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_466") [Var 5,Var 91,Var 107,Var 117,Var 119,Var 123,Var 1]])]])),Func ("OracleFlatCurryXML","_case_466") 7 Private (TVar (-42)) (Rule [5,91,107,117,119,123,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 123) [Branch (Pattern ("Prelude",":") [124,125]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_465") [Var 5,Var 91,Var 107,Var 117,Var 119,Var 125,Var 124,Var 1]])]])),Func ("OracleFlatCurryXML","_case_465") 8 Private (TVar (-42)) (Rule [5,91,107,117,119,125,124,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 124) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_464") [Var 5,Var 91,Var 107,Var 117,Var 119,Var 125,Var 1]])]])),Func ("OracleFlatCurryXML","_case_464") 7 Private (TVar (-42)) (Rule [5,91,107,117,119,125,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 125) [Branch (Pattern ("Prelude",":") [126,127]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_463") [Var 5,Var 91,Var 107,Var 117,Var 119,Var 127,Var 126,Var 1]])]])),Func ("OracleFlatCurryXML","_case_463") 8 Private (TVar (-42)) (Rule [5,91,107,117,119,127,126,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 126) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_462") [Var 5,Var 91,Var 107,Var 117,Var 119,Var 127,Var 1]])]])),Func ("OracleFlatCurryXML","_case_462") 7 Private (TVar (-42)) (Rule [5,91,107,117,119,127,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 127) [Branch (Pattern ("Prelude",":") [128,129]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_461") [Var 5,Var 91,Var 107,Var 117,Var 119,Var 129,Var 128,Var 1]])]])),Func ("OracleFlatCurryXML","_case_461") 8 Private (TVar (-42)) (Rule [5,91,107,117,119,129,128,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 128) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_460") [Var 5,Var 91,Var 107,Var 117,Var 119,Var 129,Var 1]])]])),Func ("OracleFlatCurryXML","_case_460") 7 Private (TVar (-42)) (Rule [5,91,107,117,119,129,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 129) [Branch (Pattern ("Prelude",":") [130,131]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_459") [Var 5,Var 91,Var 107,Var 117,Var 119,Var 131,Var 130,Var 1]])]])),Func ("OracleFlatCurryXML","_case_459") 8 Private (TVar (-42)) (Rule [5,91,107,117,119,131,130,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 130) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_458") [Var 5,Var 91,Var 107,Var 117,Var 119,Var 131,Var 1]])]])),Func ("OracleFlatCurryXML","_case_458") 7 Private (TVar (-42)) (Rule [5,91,107,117,119,131,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 131) [Branch (Pattern ("Prelude",":") [132,133]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_457") [Var 5,Var 91,Var 107,Var 117,Var 119,Var 133,Var 132,Var 1]])]])),Func ("OracleFlatCurryXML","_case_457") 8 Private (TVar (-42)) (Rule [5,91,107,117,119,133,132,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 132) [Branch (LPattern (Charc 'g')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_456") [Var 5,Var 91,Var 107,Var 117,Var 119,Var 133,Var 1]])]])),Func ("OracleFlatCurryXML","_case_456") 7 Private (TVar (-42)) (Rule [5,91,107,117,119,133,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 133) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_455") [Var 5,Var 91,Var 107,Var 119,Var 117,Var 1]])]])),Func ("OracleFlatCurryXML","_case_455") 6 Private (TVar (-42)) (Rule [5,91,107,119,117,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 117) [Branch (Pattern ("Prelude","[]") []) (Let [(120,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 120,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("FlatCurry","Comb") [Comb ConsCall ("FlatCurry","FuncPartCall") [Comb FuncCall ("OracleRead","readNat") [Var 119,Var 1]],Comb ConsCall ("Prelude","(,)") [Var 91,Var 107],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatx2exp") []],Var 5,Var 120]]]))]])),Func ("OracleFlatCurryXML","_case_547") 4 Private (TVar (-42)) (Rule [4,5,39,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 39) [Branch (Pattern ("Prelude",":") [40,41]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_546") [Var 4,Var 5,Var 41,Var 40,Var 1]])]])),Func ("OracleFlatCurryXML","_case_546") 5 Private (TVar (-42)) (Rule [4,5,41,40,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 40) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_545") [Var 4,Var 5,Var 41,Var 1]])]])),Func ("OracleFlatCurryXML","_case_545") 4 Private (TVar (-42)) (Rule [4,5,41,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 41) [Branch (Pattern ("Prelude",":") [42,43]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_544") [Var 4,Var 5,Var 43,Var 42,Var 1]])]])),Func ("OracleFlatCurryXML","_case_544") 5 Private (TVar (-42)) (Rule [4,5,43,42,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 42) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_543") [Var 4,Var 5,Var 43,Var 1]])]])),Func ("OracleFlatCurryXML","_case_543") 4 Private (TVar (-42)) (Rule [4,5,43,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 43) [Branch (Pattern ("Prelude",":") [44,45]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_542") [Var 4,Var 5,Var 45,Var 44,Var 1]])]])),Func ("OracleFlatCurryXML","_case_542") 5 Private (TVar (-42)) (Rule [4,5,45,44,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 44) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_541") [Var 4,Var 5,Var 45,Var 1]])]])),Func ("OracleFlatCurryXML","_case_541") 4 Private (TVar (-42)) (Rule [4,5,45,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 45) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_540") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_540") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude",":") [46,47]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_539") [Var 5,Var 47,Var 46,Var 1]])]])),Func ("OracleFlatCurryXML","_case_539") 4 Private (TVar (-42)) (Rule [5,47,46,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 46) [Branch (Pattern ("Prelude","(,)") [48,49]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_538") [Var 5,Var 47,Var 49,Var 48,Var 1]])]])),Func ("OracleFlatCurryXML","_case_538") 5 Private (TVar (-42)) (Rule [5,47,49,48,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 48) [Branch (Pattern ("Prelude",":") [50,51]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_537") [Var 5,Var 47,Var 49,Var 51,Var 50,Var 1]])]])),Func ("OracleFlatCurryXML","_case_537") 6 Private (TVar (-42)) (Rule [5,47,49,51,50,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 50) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_536") [Var 5,Var 47,Var 49,Var 51,Var 1]])]])),Func ("OracleFlatCurryXML","_case_536") 5 Private (TVar (-42)) (Rule [5,47,49,51,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 51) [Branch (Pattern ("Prelude",":") [52,53]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_535") [Var 5,Var 47,Var 49,Var 53,Var 52,Var 1]])]])),Func ("OracleFlatCurryXML","_case_535") 6 Private (TVar (-42)) (Rule [5,47,49,53,52,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 52) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_534") [Var 5,Var 47,Var 49,Var 53,Var 1]])]])),Func ("OracleFlatCurryXML","_case_534") 5 Private (TVar (-42)) (Rule [5,47,49,53,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 53) [Branch (Pattern ("Prelude",":") [54,55]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_533") [Var 5,Var 47,Var 49,Var 55,Var 54,Var 1]])]])),Func ("OracleFlatCurryXML","_case_533") 6 Private (TVar (-42)) (Rule [5,47,49,55,54,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 54) [Branch (LPattern (Charc 'd')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_532") [Var 5,Var 47,Var 49,Var 55,Var 1]])]])),Func ("OracleFlatCurryXML","_case_532") 5 Private (TVar (-42)) (Rule [5,47,49,55,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 55) [Branch (Pattern ("Prelude",":") [56,57]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_531") [Var 5,Var 47,Var 49,Var 57,Var 56,Var 1]])]])),Func ("OracleFlatCurryXML","_case_531") 6 Private (TVar (-42)) (Rule [5,47,49,57,56,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 56) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_530") [Var 5,Var 47,Var 49,Var 57,Var 1]])]])),Func ("OracleFlatCurryXML","_case_530") 5 Private (TVar (-42)) (Rule [5,47,49,57,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 57) [Branch (Pattern ("Prelude",":") [58,59]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_529") [Var 5,Var 47,Var 49,Var 59,Var 58,Var 1]])]])),Func ("OracleFlatCurryXML","_case_529") 6 Private (TVar (-42)) (Rule [5,47,49,59,58,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 58) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_528") [Var 5,Var 47,Var 49,Var 59,Var 1]])]])),Func ("OracleFlatCurryXML","_case_528") 5 Private (TVar (-42)) (Rule [5,47,49,59,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 59) [Branch (Pattern ("Prelude",":") [60,61]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_527") [Var 5,Var 47,Var 49,Var 61,Var 60,Var 1]])]])),Func ("OracleFlatCurryXML","_case_527") 6 Private (TVar (-42)) (Rule [5,47,49,61,60,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 60) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_526") [Var 5,Var 47,Var 49,Var 61,Var 1]])]])),Func ("OracleFlatCurryXML","_case_526") 5 Private (TVar (-42)) (Rule [5,47,49,61,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 61) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_525") [Var 5,Var 49,Var 47,Var 1]])]])),Func ("OracleFlatCurryXML","_case_525") 4 Private (TVar (-42)) (Rule [5,49,47,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 47) [Branch (Pattern ("Prelude",":") [62,63]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_524") [Var 5,Var 49,Var 63,Var 62,Var 1]])]])),Func ("OracleFlatCurryXML","_case_524") 5 Private (TVar (-42)) (Rule [5,49,63,62,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 62) [Branch (Pattern ("Prelude","(,)") [64,65]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_523") [Var 5,Var 49,Var 63,Var 65,Var 64,Var 1]])]])),Func ("OracleFlatCurryXML","_case_523") 6 Private (TVar (-42)) (Rule [5,49,63,65,64,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 64) [Branch (Pattern ("Prelude",":") [66,67]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_522") [Var 5,Var 49,Var 63,Var 65,Var 67,Var 66,Var 1]])]])),Func ("OracleFlatCurryXML","_case_522") 7 Private (TVar (-42)) (Rule [5,49,63,65,67,66,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 66) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_521") [Var 5,Var 49,Var 63,Var 65,Var 67,Var 1]])]])),Func ("OracleFlatCurryXML","_case_521") 6 Private (TVar (-42)) (Rule [5,49,63,65,67,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 67) [Branch (Pattern ("Prelude",":") [68,69]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_520") [Var 5,Var 49,Var 63,Var 65,Var 69,Var 68,Var 1]])]])),Func ("OracleFlatCurryXML","_case_520") 7 Private (TVar (-42)) (Rule [5,49,63,65,69,68,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 68) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_519") [Var 5,Var 49,Var 63,Var 65,Var 69,Var 1]])]])),Func ("OracleFlatCurryXML","_case_519") 6 Private (TVar (-42)) (Rule [5,49,63,65,69,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 69) [Branch (Pattern ("Prelude",":") [70,71]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_518") [Var 5,Var 49,Var 63,Var 65,Var 71,Var 70,Var 1]])]])),Func ("OracleFlatCurryXML","_case_518") 7 Private (TVar (-42)) (Rule [5,49,63,65,71,70,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 70) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_517") [Var 5,Var 49,Var 63,Var 65,Var 71,Var 1]])]])),Func ("OracleFlatCurryXML","_case_517") 6 Private (TVar (-42)) (Rule [5,49,63,65,71,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 71) [Branch (Pattern ("Prelude",":") [72,73]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_516") [Var 5,Var 49,Var 63,Var 65,Var 73,Var 72,Var 1]])]])),Func ("OracleFlatCurryXML","_case_516") 7 Private (TVar (-42)) (Rule [5,49,63,65,73,72,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 72) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_515") [Var 5,Var 49,Var 63,Var 65,Var 73,Var 1]])]])),Func ("OracleFlatCurryXML","_case_515") 6 Private (TVar (-42)) (Rule [5,49,63,65,73,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 73) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_514") [Var 5,Var 49,Var 65,Var 63,Var 1]])]])),Func ("OracleFlatCurryXML","_case_514") 5 Private (TVar (-42)) (Rule [5,49,65,63,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 63) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb ConsCall ("FlatCurry","Comb") [Comb ConsCall ("FlatCurry","FuncCall") [],Comb ConsCall ("Prelude","(,)") [Var 49,Var 65],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatx2exp") []],Var 5,Var 1]]])]])),Func ("OracleFlatCurryXML","_case_574") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [12,13]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_573") [Var 4,Var 5,Var 13,Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_573") 5 Private (TVar (-42)) (Rule [4,5,13,12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_572") [Var 4,Var 5,Var 13,Var 1]]),Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_566") [Var 4,Var 5,Var 13,Var 1]])]])),Func ("OracleFlatCurryXML","_case_566") 4 Private (TVar (-42)) (Rule [4,5,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (Pattern ("Prelude",":") [18,19]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_565") [Var 4,Var 5,Var 19,Var 18,Var 1]])]])),Func ("OracleFlatCurryXML","_case_565") 5 Private (TVar (-42)) (Rule [4,5,19,18,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 18) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_564") [Var 4,Var 5,Var 19,Var 1]])]])),Func ("OracleFlatCurryXML","_case_564") 4 Private (TVar (-42)) (Rule [4,5,19,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 19) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_563") [Var 5,Var 4,Var 1]]),Branch (Pattern ("Prelude",":") [23,24]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_562") [Var 4,Var 5,Var 24,Var 23,Var 1]])]])),Func ("OracleFlatCurryXML","_case_562") 5 Private (TVar (-42)) (Rule [4,5,24,23,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 23) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_561") [Var 4,Var 5,Var 24,Var 1]])]])),Func ("OracleFlatCurryXML","_case_561") 4 Private (TVar (-42)) (Rule [4,5,24,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 24) [Branch (Pattern ("Prelude",":") [25,26]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_560") [Var 4,Var 5,Var 26,Var 25,Var 1]])]])),Func ("OracleFlatCurryXML","_case_560") 5 Private (TVar (-42)) (Rule [4,5,26,25,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 25) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_559") [Var 4,Var 5,Var 26,Var 1]])]])),Func ("OracleFlatCurryXML","_case_559") 4 Private (TVar (-42)) (Rule [4,5,26,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 26) [Branch (Pattern ("Prelude",":") [27,28]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_558") [Var 4,Var 5,Var 28,Var 27,Var 1]])]])),Func ("OracleFlatCurryXML","_case_558") 5 Private (TVar (-42)) (Rule [4,5,28,27,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 27) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_557") [Var 4,Var 5,Var 28,Var 1]])]])),Func ("OracleFlatCurryXML","_case_557") 4 Private (TVar (-42)) (Rule [4,5,28,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 28) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_556") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_556") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Let [(32,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 32,Comb ConsCall ("Prelude","[]") []],Let [(29,Comb FuncCall ("OracleFlatCurryXML","flatx2let") [Var 5,Var 1])] (Let [(33,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 32,Comb ConsCall ("Prelude",":") [Var 33,Comb ConsCall ("Prelude","[]") []],Let [(30,Comb FuncCall ("OracleFlatCurryXML","flatx2exp._#selFP6#bindings") [Var 29,Var 32])] (Let [(34,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 33,Comb ConsCall ("Prelude",":") [Var 34,Comb ConsCall ("Prelude","[]") []],Let [(31,Comb FuncCall ("OracleFlatCurryXML","flatx2exp._#selFP7#exp") [Var 29,Var 33])] (Comb FuncCall ("CEventOracle","collapse") [Var 34,Comb ConsCall ("FlatCurry","Let") [Var 30,Var 31]])]))]))]))]])),Func ("OracleFlatCurryXML","_case_563") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Let [(23,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 23,Comb ConsCall ("Prelude","[]") []],Let [(20,Comb FuncCall ("OracleFlatCurryXML","flatx2let") [Var 5,Var 1])] (Let [(24,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 23,Comb ConsCall ("Prelude",":") [Var 24,Comb ConsCall ("Prelude","[]") []],Let [(21,Comb FuncCall ("OracleFlatCurryXML","flatx2exp._#selFP3#bindings") [Var 20,Var 23])] (Let [(25,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 24,Comb ConsCall ("Prelude",":") [Var 25,Comb ConsCall ("Prelude","[]") []],Let [(22,Comb FuncCall ("OracleFlatCurryXML","flatx2exp._#selFP4#exp") [Var 20,Var 24])] (Comb FuncCall ("CEventOracle","collapse") [Var 25,Comb ConsCall ("FlatCurry","Let") [Var 21,Var 22]])]))]))]))]])),Func ("OracleFlatCurryXML","_case_572") 4 Private (TVar (-42)) (Rule [4,5,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (Pattern ("Prelude",":") [14,15]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_571") [Var 4,Var 5,Var 15,Var 14,Var 1]])]])),Func ("OracleFlatCurryXML","_case_571") 5 Private (TVar (-42)) (Rule [4,5,15,14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_570") [Var 4,Var 5,Var 15,Var 1]])]])),Func ("OracleFlatCurryXML","_case_570") 4 Private (TVar (-42)) (Rule [4,5,15,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 15) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_569") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_569") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_568") [Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_568") 2 Private (TVar (-42)) (Rule [5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (Pattern ("Prelude",":") [16,17]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_567") [Var 16,Var 17,Var 1]])]])),Func ("OracleFlatCurryXML","_case_567") 3 Private (TVar (-42)) (Rule [16,17,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 17) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb ConsCall ("FlatCurry","Lit") [Comb FuncCall ("OracleFlatCurryXML","flatx2lit") [Var 16,Var 1]]])]])),Func ("OracleFlatCurryXML","_case_580") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [8,9]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_579") [Var 4,Var 5,Var 9,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_579") 5 Private (TVar (-42)) (Rule [4,5,9,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_578") [Var 4,Var 5,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_578") 4 Private (TVar (-42)) (Rule [4,5,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude",":") [10,11]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_577") [Var 4,Var 5,Var 11,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_577") 5 Private (TVar (-42)) (Rule [4,5,11,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_576") [Var 4,Var 5,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_576") 4 Private (TVar (-42)) (Rule [4,5,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_575") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_575") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Let [(6,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 6,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("FlatCurry","Var") [Comb FuncCall ("OracleRead","readNat") [Comb FuncCall ("OracleXML","textOfXml") [Var 5,Var 1],Var 6]]]))]])),Func ("OracleFlatCurryXML","_case_592") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("XML","XElem") [3,4,5]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_591") [Var 4,Var 5,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_591") 4 Private (TVar (-42)) (Rule [4,5,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("Prelude",":") [6,7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_590") [Var 4,Var 5,Var 7,Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_590") 5 Private (TVar (-42)) (Rule [4,5,7,6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (LPattern (Charc 'v')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_589") [Var 4,Var 5,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_589") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [8,9]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_588") [Var 4,Var 5,Var 9,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_588") 5 Private (TVar (-42)) (Rule [4,5,9,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_587") [Var 4,Var 5,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_587") 4 Private (TVar (-42)) (Rule [4,5,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude",":") [10,11]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_586") [Var 4,Var 5,Var 11,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_586") 5 Private (TVar (-42)) (Rule [4,5,11,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_585") [Var 4,Var 5,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_585") 4 Private (TVar (-42)) (Rule [4,5,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_584") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_584") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Let [(6,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 6,Comb ConsCall ("Prelude","[]") []],Comb FuncCall ("OracleRead","readNat") [Comb FuncCall ("OracleXML","textOfXml") [Var 5,Var 1],Var 6]]))]])),Func ("OracleFlatCurryXML","_case_642") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("XML","XElem") [3,4,5]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_641") [Var 4,Var 5,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_641") 4 Private (TVar (-42)) (Rule [4,5,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("Prelude",":") [6,7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_640") [Var 4,Var 5,Var 7,Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_640") 5 Private (TVar (-42)) (Rule [4,5,7,6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_639") [Var 4,Var 5,Var 7,Var 1]]),Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_623") [Var 4,Var 5,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_623") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [22,23]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_622") [Var 4,Var 5,Var 23,Var 22,Var 1]])]])),Func ("OracleFlatCurryXML","_case_622") 5 Private (TVar (-42)) (Rule [4,5,23,22,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 22) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_621") [Var 4,Var 5,Var 23,Var 1]])]])),Func ("OracleFlatCurryXML","_case_621") 4 Private (TVar (-42)) (Rule [4,5,23,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 23) [Branch (Pattern ("Prelude",":") [24,25]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_620") [Var 4,Var 5,Var 25,Var 24,Var 1]])]])),Func ("OracleFlatCurryXML","_case_620") 5 Private (TVar (-42)) (Rule [4,5,25,24,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 24) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_619") [Var 4,Var 5,Var 25,Var 1]])]])),Func ("OracleFlatCurryXML","_case_619") 4 Private (TVar (-42)) (Rule [4,5,25,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 25) [Branch (Pattern ("Prelude",":") [26,27]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_618") [Var 4,Var 5,Var 27,Var 26,Var 1]])]])),Func ("OracleFlatCurryXML","_case_618") 5 Private (TVar (-42)) (Rule [4,5,27,26,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 26) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_617") [Var 4,Var 5,Var 27,Var 1]])]])),Func ("OracleFlatCurryXML","_case_617") 4 Private (TVar (-42)) (Rule [4,5,27,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 27) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_616") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_616") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_615") [Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_615") 2 Private (TVar (-42)) (Rule [5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (Pattern ("Prelude",":") [28,29]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_614") [Var 29,Var 28,Var 1]])]])),Func ("OracleFlatCurryXML","_case_614") 3 Private (TVar (-42)) (Rule [29,28,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 28) [Branch (Pattern ("XML","XElem") [30,31,32]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_613") [Var 29,Var 31,Var 32,Var 30,Var 1]])]])),Func ("OracleFlatCurryXML","_case_613") 5 Private (TVar (-42)) (Rule [29,31,32,30,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 30) [Branch (Pattern ("Prelude",":") [33,34]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_612") [Var 29,Var 31,Var 32,Var 34,Var 33,Var 1]])]])),Func ("OracleFlatCurryXML","_case_612") 6 Private (TVar (-42)) (Rule [29,31,32,34,33,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 33) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_611") [Var 29,Var 31,Var 32,Var 34,Var 1]])]])),Func ("OracleFlatCurryXML","_case_611") 5 Private (TVar (-42)) (Rule [29,31,32,34,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 34) [Branch (Pattern ("Prelude",":") [35,36]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_610") [Var 29,Var 31,Var 32,Var 36,Var 35,Var 1]])]])),Func ("OracleFlatCurryXML","_case_610") 6 Private (TVar (-42)) (Rule [29,31,32,36,35,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 35) [Branch (LPattern (Charc 'h')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_609") [Var 29,Var 31,Var 32,Var 36,Var 1]])]])),Func ("OracleFlatCurryXML","_case_609") 5 Private (TVar (-42)) (Rule [29,31,32,36,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 36) [Branch (Pattern ("Prelude",":") [37,38]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_608") [Var 29,Var 31,Var 32,Var 38,Var 37,Var 1]])]])),Func ("OracleFlatCurryXML","_case_608") 6 Private (TVar (-42)) (Rule [29,31,32,38,37,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 37) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_607") [Var 29,Var 31,Var 32,Var 38,Var 1]])]])),Func ("OracleFlatCurryXML","_case_607") 5 Private (TVar (-42)) (Rule [29,31,32,38,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 38) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_606") [Var 29,Var 32,Var 31,Var 1]])]])),Func ("OracleFlatCurryXML","_case_606") 4 Private (TVar (-42)) (Rule [29,32,31,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 31) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_605") [Var 32,Var 29,Var 1]])]])),Func ("OracleFlatCurryXML","_case_605") 3 Private (TVar (-42)) (Rule [32,29,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 29) [Branch (Pattern ("Prelude",":") [39,40]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_604") [Var 32,Var 40,Var 39,Var 1]])]])),Func ("OracleFlatCurryXML","_case_604") 4 Private (TVar (-42)) (Rule [32,40,39,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 39) [Branch (Pattern ("XML","XElem") [41,42,43]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_603") [Var 32,Var 40,Var 42,Var 43,Var 41,Var 1]])]])),Func ("OracleFlatCurryXML","_case_603") 6 Private (TVar (-42)) (Rule [32,40,42,43,41,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 41) [Branch (Pattern ("Prelude",":") [44,45]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_602") [Var 32,Var 40,Var 42,Var 43,Var 45,Var 44,Var 1]])]])),Func ("OracleFlatCurryXML","_case_602") 7 Private (TVar (-42)) (Rule [32,40,42,43,45,44,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 44) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_601") [Var 32,Var 40,Var 42,Var 43,Var 45,Var 1]])]])),Func ("OracleFlatCurryXML","_case_601") 6 Private (TVar (-42)) (Rule [32,40,42,43,45,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 45) [Branch (Pattern ("Prelude",":") [46,47]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_600") [Var 32,Var 40,Var 42,Var 43,Var 47,Var 46,Var 1]])]])),Func ("OracleFlatCurryXML","_case_600") 7 Private (TVar (-42)) (Rule [32,40,42,43,47,46,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 46) [Branch (LPattern (Charc 'h')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_599") [Var 32,Var 40,Var 42,Var 43,Var 47,Var 1]])]])),Func ("OracleFlatCurryXML","_case_599") 6 Private (TVar (-42)) (Rule [32,40,42,43,47,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 47) [Branch (Pattern ("Prelude",":") [48,49]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_598") [Var 32,Var 40,Var 42,Var 43,Var 49,Var 48,Var 1]])]])),Func ("OracleFlatCurryXML","_case_598") 7 Private (TVar (-42)) (Rule [32,40,42,43,49,48,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 48) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_597") [Var 32,Var 40,Var 42,Var 43,Var 49,Var 1]])]])),Func ("OracleFlatCurryXML","_case_597") 6 Private (TVar (-42)) (Rule [32,40,42,43,49,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 49) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_596") [Var 32,Var 40,Var 43,Var 42,Var 1]])]])),Func ("OracleFlatCurryXML","_case_596") 5 Private (TVar (-42)) (Rule [32,40,43,42,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 42) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_595") [Var 32,Var 40,Var 43,Var 1]])]])),Func ("OracleFlatCurryXML","_case_595") 4 Private (TVar (-42)) (Rule [32,40,43,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 43) [Branch (Pattern ("Prelude",":") [50,51]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_594") [Var 32,Var 40,Var 50,Var 51,Var 1]])]])),Func ("OracleFlatCurryXML","_case_594") 5 Private (TVar (-42)) (Rule [32,40,50,51,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 51) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_593") [Var 32,Var 50,Var 40,Var 1]])]])),Func ("OracleFlatCurryXML","_case_593") 4 Private (TVar (-42)) (Rule [32,50,40,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 40) [Branch (Pattern ("Prelude","[]") []) (Let [(51,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 51,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("FlatCurry","Rule") [Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatx2var") []],Var 32,Var 1],Comb FuncCall ("OracleFlatCurryXML","flatx2exp") [Var 50,Var 51]]]))]])),Func ("OracleFlatCurryXML","_case_639") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [8,9]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_638") [Var 4,Var 5,Var 9,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_638") 5 Private (TVar (-42)) (Rule [4,5,9,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (LPattern (Charc 'x')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_637") [Var 4,Var 5,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_637") 4 Private (TVar (-42)) (Rule [4,5,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude",":") [10,11]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_636") [Var 4,Var 5,Var 11,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_636") 5 Private (TVar (-42)) (Rule [4,5,11,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_635") [Var 4,Var 5,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_635") 4 Private (TVar (-42)) (Rule [4,5,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (Pattern ("Prelude",":") [12,13]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_634") [Var 4,Var 5,Var 13,Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_634") 5 Private (TVar (-42)) (Rule [4,5,13,12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_633") [Var 4,Var 5,Var 13,Var 1]])]])),Func ("OracleFlatCurryXML","_case_633") 4 Private (TVar (-42)) (Rule [4,5,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (Pattern ("Prelude",":") [14,15]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_632") [Var 4,Var 5,Var 15,Var 14,Var 1]])]])),Func ("OracleFlatCurryXML","_case_632") 5 Private (TVar (-42)) (Rule [4,5,15,14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_631") [Var 4,Var 5,Var 15,Var 1]])]])),Func ("OracleFlatCurryXML","_case_631") 4 Private (TVar (-42)) (Rule [4,5,15,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 15) [Branch (Pattern ("Prelude",":") [16,17]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_630") [Var 4,Var 5,Var 17,Var 16,Var 1]])]])),Func ("OracleFlatCurryXML","_case_630") 5 Private (TVar (-42)) (Rule [4,5,17,16,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 16) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_629") [Var 4,Var 5,Var 17,Var 1]])]])),Func ("OracleFlatCurryXML","_case_629") 4 Private (TVar (-42)) (Rule [4,5,17,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 17) [Branch (Pattern ("Prelude",":") [18,19]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_628") [Var 4,Var 5,Var 19,Var 18,Var 1]])]])),Func ("OracleFlatCurryXML","_case_628") 5 Private (TVar (-42)) (Rule [4,5,19,18,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 18) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_627") [Var 4,Var 5,Var 19,Var 1]])]])),Func ("OracleFlatCurryXML","_case_627") 4 Private (TVar (-42)) (Rule [4,5,19,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 19) [Branch (Pattern ("Prelude",":") [20,21]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_626") [Var 4,Var 5,Var 21,Var 20,Var 1]])]])),Func ("OracleFlatCurryXML","_case_626") 5 Private (TVar (-42)) (Rule [4,5,21,20,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 20) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_625") [Var 4,Var 5,Var 21,Var 1]])]])),Func ("OracleFlatCurryXML","_case_625") 4 Private (TVar (-42)) (Rule [4,5,21,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 21) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_624") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_624") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb ConsCall ("FlatCurry","External") [Comb FuncCall ("OracleXML","textOfXml") [Var 5,Var 1]]])]])),Func ("OracleFlatCurryXML","_case_653") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("XML","XElem") [3,4,5]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_652") [Var 4,Var 5,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_652") 4 Private (TVar (-42)) (Rule [4,5,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("Prelude",":") [6,7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_651") [Var 4,Var 5,Var 7,Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_651") 5 Private (TVar (-42)) (Rule [4,5,7,6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_650") [Var 4,Var 5,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_650") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [8,9]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_649") [Var 4,Var 5,Var 9,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_649") 5 Private (TVar (-42)) (Rule [4,5,9,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (LPattern (Charc 'v')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_648") [Var 4,Var 5,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_648") 4 Private (TVar (-42)) (Rule [4,5,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude",":") [10,11]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_647") [Var 4,Var 5,Var 11,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_647") 5 Private (TVar (-42)) (Rule [4,5,11,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_646") [Var 4,Var 5,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_646") 4 Private (TVar (-42)) (Rule [4,5,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (Pattern ("Prelude",":") [12,13]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_645") [Var 4,Var 5,Var 13,Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_645") 5 Private (TVar (-42)) (Rule [4,5,13,12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_644") [Var 4,Var 5,Var 13,Var 1]])]])),Func ("OracleFlatCurryXML","_case_644") 4 Private (TVar (-42)) (Rule [4,5,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_643") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_643") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Let [(6,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 6,Comb ConsCall ("Prelude","[]") []],Comb FuncCall ("OracleRead","readNat") [Comb FuncCall ("OracleXML","textOfXml") [Var 5,Var 1],Var 6]]))]])),Func ("OracleFlatCurryXML","_case_704") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("XML","XElem") [3,4,5]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_703") [Var 4,Var 5,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_703") 4 Private (TVar (-42)) (Rule [4,5,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("Prelude",":") [6,7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_702") [Var 4,Var 5,Var 7,Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_702") 5 Private (TVar (-42)) (Rule [4,5,7,6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_701") [Var 4,Var 5,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_701") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [8,9]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_700") [Var 4,Var 5,Var 9,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_700") 5 Private (TVar (-42)) (Rule [4,5,9,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_699") [Var 4,Var 5,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_699") 4 Private (TVar (-42)) (Rule [4,5,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude",":") [10,11]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_698") [Var 4,Var 5,Var 11,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_698") 5 Private (TVar (-42)) (Rule [4,5,11,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_697") [Var 4,Var 5,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_697") 4 Private (TVar (-42)) (Rule [4,5,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (Pattern ("Prelude",":") [12,13]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_696") [Var 4,Var 5,Var 13,Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_696") 5 Private (TVar (-42)) (Rule [4,5,13,12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_695") [Var 4,Var 5,Var 13,Var 1]])]])),Func ("OracleFlatCurryXML","_case_695") 4 Private (TVar (-42)) (Rule [4,5,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_694") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_694") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude",":") [14,15]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_693") [Var 5,Var 15,Var 14,Var 1]])]])),Func ("OracleFlatCurryXML","_case_693") 4 Private (TVar (-42)) (Rule [5,15,14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (Pattern ("Prelude","(,)") [16,17]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_692") [Var 5,Var 15,Var 17,Var 16,Var 1]])]])),Func ("OracleFlatCurryXML","_case_692") 5 Private (TVar (-42)) (Rule [5,15,17,16,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 16) [Branch (Pattern ("Prelude",":") [18,19]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_691") [Var 5,Var 15,Var 17,Var 19,Var 18,Var 1]])]])),Func ("OracleFlatCurryXML","_case_691") 6 Private (TVar (-42)) (Rule [5,15,17,19,18,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 18) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_690") [Var 5,Var 15,Var 17,Var 19,Var 1]])]])),Func ("OracleFlatCurryXML","_case_690") 5 Private (TVar (-42)) (Rule [5,15,17,19,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 19) [Branch (Pattern ("Prelude",":") [20,21]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_689") [Var 5,Var 15,Var 17,Var 21,Var 20,Var 1]])]])),Func ("OracleFlatCurryXML","_case_689") 6 Private (TVar (-42)) (Rule [5,15,17,21,20,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 20) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_688") [Var 5,Var 15,Var 17,Var 21,Var 1]])]])),Func ("OracleFlatCurryXML","_case_688") 5 Private (TVar (-42)) (Rule [5,15,17,21,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 21) [Branch (Pattern ("Prelude",":") [22,23]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_687") [Var 5,Var 15,Var 17,Var 23,Var 22,Var 1]])]])),Func ("OracleFlatCurryXML","_case_687") 6 Private (TVar (-42)) (Rule [5,15,17,23,22,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 22) [Branch (LPattern (Charc 'd')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_686") [Var 5,Var 15,Var 17,Var 23,Var 1]])]])),Func ("OracleFlatCurryXML","_case_686") 5 Private (TVar (-42)) (Rule [5,15,17,23,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 23) [Branch (Pattern ("Prelude",":") [24,25]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_685") [Var 5,Var 15,Var 17,Var 25,Var 24,Var 1]])]])),Func ("OracleFlatCurryXML","_case_685") 6 Private (TVar (-42)) (Rule [5,15,17,25,24,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 24) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_684") [Var 5,Var 15,Var 17,Var 25,Var 1]])]])),Func ("OracleFlatCurryXML","_case_684") 5 Private (TVar (-42)) (Rule [5,15,17,25,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 25) [Branch (Pattern ("Prelude",":") [26,27]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_683") [Var 5,Var 15,Var 17,Var 27,Var 26,Var 1]])]])),Func ("OracleFlatCurryXML","_case_683") 6 Private (TVar (-42)) (Rule [5,15,17,27,26,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 26) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_682") [Var 5,Var 15,Var 17,Var 27,Var 1]])]])),Func ("OracleFlatCurryXML","_case_682") 5 Private (TVar (-42)) (Rule [5,15,17,27,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 27) [Branch (Pattern ("Prelude",":") [28,29]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_681") [Var 5,Var 15,Var 17,Var 29,Var 28,Var 1]])]])),Func ("OracleFlatCurryXML","_case_681") 6 Private (TVar (-42)) (Rule [5,15,17,29,28,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 28) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_680") [Var 5,Var 15,Var 17,Var 29,Var 1]])]])),Func ("OracleFlatCurryXML","_case_680") 5 Private (TVar (-42)) (Rule [5,15,17,29,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 29) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_679") [Var 5,Var 17,Var 15,Var 1]])]])),Func ("OracleFlatCurryXML","_case_679") 4 Private (TVar (-42)) (Rule [5,17,15,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 15) [Branch (Pattern ("Prelude",":") [30,31]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_678") [Var 5,Var 17,Var 31,Var 30,Var 1]])]])),Func ("OracleFlatCurryXML","_case_678") 5 Private (TVar (-42)) (Rule [5,17,31,30,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 30) [Branch (Pattern ("Prelude","(,)") [32,33]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_677") [Var 5,Var 17,Var 31,Var 33,Var 32,Var 1]])]])),Func ("OracleFlatCurryXML","_case_677") 6 Private (TVar (-42)) (Rule [5,17,31,33,32,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 32) [Branch (Pattern ("Prelude",":") [34,35]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_676") [Var 5,Var 17,Var 31,Var 33,Var 35,Var 34,Var 1]])]])),Func ("OracleFlatCurryXML","_case_676") 7 Private (TVar (-42)) (Rule [5,17,31,33,35,34,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 34) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_675") [Var 5,Var 17,Var 31,Var 33,Var 35,Var 1]])]])),Func ("OracleFlatCurryXML","_case_675") 6 Private (TVar (-42)) (Rule [5,17,31,33,35,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 35) [Branch (Pattern ("Prelude",":") [36,37]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_674") [Var 5,Var 17,Var 31,Var 33,Var 37,Var 36,Var 1]])]])),Func ("OracleFlatCurryXML","_case_674") 7 Private (TVar (-42)) (Rule [5,17,31,33,37,36,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 36) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_673") [Var 5,Var 17,Var 31,Var 33,Var 37,Var 1]])]])),Func ("OracleFlatCurryXML","_case_673") 6 Private (TVar (-42)) (Rule [5,17,31,33,37,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 37) [Branch (Pattern ("Prelude",":") [38,39]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_672") [Var 5,Var 17,Var 31,Var 33,Var 39,Var 38,Var 1]])]])),Func ("OracleFlatCurryXML","_case_672") 7 Private (TVar (-42)) (Rule [5,17,31,33,39,38,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 38) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_671") [Var 5,Var 17,Var 31,Var 33,Var 39,Var 1]])]])),Func ("OracleFlatCurryXML","_case_671") 6 Private (TVar (-42)) (Rule [5,17,31,33,39,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 39) [Branch (Pattern ("Prelude",":") [40,41]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_670") [Var 5,Var 17,Var 31,Var 33,Var 41,Var 40,Var 1]])]])),Func ("OracleFlatCurryXML","_case_670") 7 Private (TVar (-42)) (Rule [5,17,31,33,41,40,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 40) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_669") [Var 5,Var 17,Var 31,Var 33,Var 41,Var 1]])]])),Func ("OracleFlatCurryXML","_case_669") 6 Private (TVar (-42)) (Rule [5,17,31,33,41,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 41) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_668") [Var 5,Var 17,Var 33,Var 31,Var 1]])]])),Func ("OracleFlatCurryXML","_case_668") 5 Private (TVar (-42)) (Rule [5,17,33,31,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 31) [Branch (Pattern ("Prelude",":") [42,43]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_667") [Var 5,Var 17,Var 33,Var 43,Var 42,Var 1]])]])),Func ("OracleFlatCurryXML","_case_667") 6 Private (TVar (-42)) (Rule [5,17,33,43,42,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 42) [Branch (Pattern ("Prelude","(,)") [44,45]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_666") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 44,Var 1]])]])),Func ("OracleFlatCurryXML","_case_666") 7 Private (TVar (-42)) (Rule [5,17,33,43,45,44,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 44) [Branch (Pattern ("Prelude",":") [46,47]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_665") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 47,Var 46,Var 1]])]])),Func ("OracleFlatCurryXML","_case_665") 8 Private (TVar (-42)) (Rule [5,17,33,43,45,47,46,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 46) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_664") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 47,Var 1]])]])),Func ("OracleFlatCurryXML","_case_664") 7 Private (TVar (-42)) (Rule [5,17,33,43,45,47,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 47) [Branch (Pattern ("Prelude",":") [48,49]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_663") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 49,Var 48,Var 1]])]])),Func ("OracleFlatCurryXML","_case_663") 8 Private (TVar (-42)) (Rule [5,17,33,43,45,49,48,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 48) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_662") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 49,Var 1]])]])),Func ("OracleFlatCurryXML","_case_662") 7 Private (TVar (-42)) (Rule [5,17,33,43,45,49,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 49) [Branch (Pattern ("Prelude",":") [50,51]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_661") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 51,Var 50,Var 1]])]])),Func ("OracleFlatCurryXML","_case_661") 8 Private (TVar (-42)) (Rule [5,17,33,43,45,51,50,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 50) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_660") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 51,Var 1]])]])),Func ("OracleFlatCurryXML","_case_660") 7 Private (TVar (-42)) (Rule [5,17,33,43,45,51,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 51) [Branch (Pattern ("Prelude",":") [52,53]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_659") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 53,Var 52,Var 1]])]])),Func ("OracleFlatCurryXML","_case_659") 8 Private (TVar (-42)) (Rule [5,17,33,43,45,53,52,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 52) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_658") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 53,Var 1]])]])),Func ("OracleFlatCurryXML","_case_658") 7 Private (TVar (-42)) (Rule [5,17,33,43,45,53,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 53) [Branch (Pattern ("Prelude",":") [54,55]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_657") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 55,Var 54,Var 1]])]])),Func ("OracleFlatCurryXML","_case_657") 8 Private (TVar (-42)) (Rule [5,17,33,43,45,55,54,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 54) [Branch (LPattern (Charc 'y')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_656") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 55,Var 1]])]])),Func ("OracleFlatCurryXML","_case_656") 7 Private (TVar (-42)) (Rule [5,17,33,43,45,55,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 55) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_655") [Var 5,Var 17,Var 33,Var 45,Var 43,Var 1]])]])),Func ("OracleFlatCurryXML","_case_655") 6 Private (TVar (-42)) (Rule [5,17,33,45,43,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 43) [Branch (Pattern ("Prelude",":") [56,57]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_654") [Var 5,Var 17,Var 33,Var 45,Var 56,Var 57,Var 1]])]])),Func ("OracleFlatCurryXML","_case_654") 7 Private (TVar (-42)) (Rule [5,17,33,45,56,57,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 57) [Branch (Pattern ("Prelude","[]") []) (Let [(58,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(59,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 58,Comb ConsCall ("Prelude",":") [Var 59,Comb ConsCall ("Prelude","[]") []]],Comb ConsCall ("FlatCurry","Cons") [Comb ConsCall ("Prelude","(,)") [Var 17,Var 33],Comb FuncCall ("OracleRead","readNat") [Var 45,Var 1],Comb FuncCall ("OracleFlatCurryXML","xvis2vis") [Var 56,Var 58],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatx2texp") []],Var 5,Var 59]]]))]])),Func ("OracleFlatCurryXML","_case_715") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("XML","XElem") [3,4,5]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_714") [Var 4,Var 5,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_714") 4 Private (TVar (-42)) (Rule [4,5,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("Prelude",":") [6,7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_713") [Var 4,Var 5,Var 7,Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_713") 5 Private (TVar (-42)) (Rule [4,5,7,6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_712") [Var 4,Var 5,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_712") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [8,9]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_711") [Var 4,Var 5,Var 9,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_711") 5 Private (TVar (-42)) (Rule [4,5,9,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (LPattern (Charc 'v')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_710") [Var 4,Var 5,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_710") 4 Private (TVar (-42)) (Rule [4,5,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude",":") [10,11]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_709") [Var 4,Var 5,Var 11,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_709") 5 Private (TVar (-42)) (Rule [4,5,11,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_708") [Var 4,Var 5,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_708") 4 Private (TVar (-42)) (Rule [4,5,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (Pattern ("Prelude",":") [12,13]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_707") [Var 4,Var 5,Var 13,Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_707") 5 Private (TVar (-42)) (Rule [4,5,13,12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_706") [Var 4,Var 5,Var 13,Var 1]])]])),Func ("OracleFlatCurryXML","_case_706") 4 Private (TVar (-42)) (Rule [4,5,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_705") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_705") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Let [(6,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 6,Comb ConsCall ("Prelude","[]") []],Comb FuncCall ("OracleRead","readNat") [Comb FuncCall ("OracleXML","textOfXml") [Var 5,Var 1],Var 6]]))]])),Func ("OracleFlatCurryXML","_case_821") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("XML","XElem") [3,4,5]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_820") [Var 4,Var 5,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_820") 4 Private (TVar (-42)) (Rule [4,5,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("Prelude",":") [6,7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_819") [Var 4,Var 5,Var 7,Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_819") 5 Private (TVar (-42)) (Rule [4,5,7,6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_818") [Var 4,Var 5,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_818") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [8,9]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_817") [Var 4,Var 5,Var 9,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_817") 5 Private (TVar (-42)) (Rule [4,5,9,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (LPattern (Charc 'y')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_816") [Var 4,Var 5,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_816") 4 Private (TVar (-42)) (Rule [4,5,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude",":") [10,11]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_815") [Var 4,Var 5,Var 11,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_815") 5 Private (TVar (-42)) (Rule [4,5,11,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_814") [Var 4,Var 5,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_814") 4 Private (TVar (-42)) (Rule [4,5,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (Pattern ("Prelude",":") [12,13]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_813") [Var 4,Var 5,Var 13,Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_813") 5 Private (TVar (-42)) (Rule [4,5,13,12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_812") [Var 4,Var 5,Var 13,Var 1]])]])),Func ("OracleFlatCurryXML","_case_812") 4 Private (TVar (-42)) (Rule [4,5,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_811") [Var 5,Var 4,Var 1]]),Branch (Pattern ("Prelude",":") [61,62]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_767") [Var 4,Var 5,Var 62,Var 61,Var 1]])]])),Func ("OracleFlatCurryXML","_case_767") 5 Private (TVar (-42)) (Rule [4,5,62,61,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 61) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_766") [Var 4,Var 5,Var 62,Var 1]])]])),Func ("OracleFlatCurryXML","_case_766") 4 Private (TVar (-42)) (Rule [4,5,62,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 62) [Branch (Pattern ("Prelude",":") [63,64]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_765") [Var 4,Var 5,Var 64,Var 63,Var 1]])]])),Func ("OracleFlatCurryXML","_case_765") 5 Private (TVar (-42)) (Rule [4,5,64,63,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 63) [Branch (LPattern (Charc 'y')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_764") [Var 4,Var 5,Var 64,Var 1]])]])),Func ("OracleFlatCurryXML","_case_764") 4 Private (TVar (-42)) (Rule [4,5,64,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 64) [Branch (Pattern ("Prelude",":") [65,66]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_763") [Var 4,Var 5,Var 66,Var 65,Var 1]])]])),Func ("OracleFlatCurryXML","_case_763") 5 Private (TVar (-42)) (Rule [4,5,66,65,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 65) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_762") [Var 4,Var 5,Var 66,Var 1]])]])),Func ("OracleFlatCurryXML","_case_762") 4 Private (TVar (-42)) (Rule [4,5,66,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 66) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_761") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_761") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude",":") [67,68]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_760") [Var 5,Var 68,Var 67,Var 1]])]])),Func ("OracleFlatCurryXML","_case_760") 4 Private (TVar (-42)) (Rule [5,68,67,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 67) [Branch (Pattern ("Prelude","(,)") [69,70]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_759") [Var 5,Var 68,Var 70,Var 69,Var 1]])]])),Func ("OracleFlatCurryXML","_case_759") 5 Private (TVar (-42)) (Rule [5,68,70,69,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 69) [Branch (Pattern ("Prelude",":") [71,72]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_758") [Var 5,Var 68,Var 70,Var 72,Var 71,Var 1]])]])),Func ("OracleFlatCurryXML","_case_758") 6 Private (TVar (-42)) (Rule [5,68,70,72,71,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 71) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_757") [Var 5,Var 68,Var 70,Var 72,Var 1]])]])),Func ("OracleFlatCurryXML","_case_757") 5 Private (TVar (-42)) (Rule [5,68,70,72,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 72) [Branch (Pattern ("Prelude",":") [73,74]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_756") [Var 5,Var 68,Var 70,Var 74,Var 73,Var 1]])]])),Func ("OracleFlatCurryXML","_case_756") 6 Private (TVar (-42)) (Rule [5,68,70,74,73,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 73) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_755") [Var 5,Var 68,Var 70,Var 74,Var 1]])]])),Func ("OracleFlatCurryXML","_case_755") 5 Private (TVar (-42)) (Rule [5,68,70,74,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 74) [Branch (Pattern ("Prelude",":") [75,76]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_754") [Var 5,Var 68,Var 70,Var 76,Var 75,Var 1]])]])),Func ("OracleFlatCurryXML","_case_754") 6 Private (TVar (-42)) (Rule [5,68,70,76,75,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 75) [Branch (LPattern (Charc 'd')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_753") [Var 5,Var 68,Var 70,Var 76,Var 1]])]])),Func ("OracleFlatCurryXML","_case_753") 5 Private (TVar (-42)) (Rule [5,68,70,76,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 76) [Branch (Pattern ("Prelude",":") [77,78]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_752") [Var 5,Var 68,Var 70,Var 78,Var 77,Var 1]])]])),Func ("OracleFlatCurryXML","_case_752") 6 Private (TVar (-42)) (Rule [5,68,70,78,77,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 77) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_751") [Var 5,Var 68,Var 70,Var 78,Var 1]])]])),Func ("OracleFlatCurryXML","_case_751") 5 Private (TVar (-42)) (Rule [5,68,70,78,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 78) [Branch (Pattern ("Prelude",":") [79,80]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_750") [Var 5,Var 68,Var 70,Var 80,Var 79,Var 1]])]])),Func ("OracleFlatCurryXML","_case_750") 6 Private (TVar (-42)) (Rule [5,68,70,80,79,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 79) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_749") [Var 5,Var 68,Var 70,Var 80,Var 1]])]])),Func ("OracleFlatCurryXML","_case_749") 5 Private (TVar (-42)) (Rule [5,68,70,80,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 80) [Branch (Pattern ("Prelude",":") [81,82]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_748") [Var 5,Var 68,Var 70,Var 82,Var 81,Var 1]])]])),Func ("OracleFlatCurryXML","_case_748") 6 Private (TVar (-42)) (Rule [5,68,70,82,81,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 81) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_747") [Var 5,Var 68,Var 70,Var 82,Var 1]])]])),Func ("OracleFlatCurryXML","_case_747") 5 Private (TVar (-42)) (Rule [5,68,70,82,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 82) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_746") [Var 5,Var 70,Var 68,Var 1]])]])),Func ("OracleFlatCurryXML","_case_746") 4 Private (TVar (-42)) (Rule [5,70,68,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 68) [Branch (Pattern ("Prelude",":") [83,84]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_745") [Var 5,Var 70,Var 84,Var 83,Var 1]])]])),Func ("OracleFlatCurryXML","_case_745") 5 Private (TVar (-42)) (Rule [5,70,84,83,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 83) [Branch (Pattern ("Prelude","(,)") [85,86]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_744") [Var 5,Var 70,Var 84,Var 86,Var 85,Var 1]])]])),Func ("OracleFlatCurryXML","_case_744") 6 Private (TVar (-42)) (Rule [5,70,84,86,85,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 85) [Branch (Pattern ("Prelude",":") [87,88]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_743") [Var 5,Var 70,Var 84,Var 86,Var 88,Var 87,Var 1]])]])),Func ("OracleFlatCurryXML","_case_743") 7 Private (TVar (-42)) (Rule [5,70,84,86,88,87,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 87) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_742") [Var 5,Var 70,Var 84,Var 86,Var 88,Var 1]])]])),Func ("OracleFlatCurryXML","_case_742") 6 Private (TVar (-42)) (Rule [5,70,84,86,88,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 88) [Branch (Pattern ("Prelude",":") [89,90]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_741") [Var 5,Var 70,Var 84,Var 86,Var 90,Var 89,Var 1]])]])),Func ("OracleFlatCurryXML","_case_741") 7 Private (TVar (-42)) (Rule [5,70,84,86,90,89,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 89) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_740") [Var 5,Var 70,Var 84,Var 86,Var 90,Var 1]])]])),Func ("OracleFlatCurryXML","_case_740") 6 Private (TVar (-42)) (Rule [5,70,84,86,90,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 90) [Branch (Pattern ("Prelude",":") [91,92]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_739") [Var 5,Var 70,Var 84,Var 86,Var 92,Var 91,Var 1]])]])),Func ("OracleFlatCurryXML","_case_739") 7 Private (TVar (-42)) (Rule [5,70,84,86,92,91,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 91) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_738") [Var 5,Var 70,Var 84,Var 86,Var 92,Var 1]])]])),Func ("OracleFlatCurryXML","_case_738") 6 Private (TVar (-42)) (Rule [5,70,84,86,92,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 92) [Branch (Pattern ("Prelude",":") [93,94]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_737") [Var 5,Var 70,Var 84,Var 86,Var 94,Var 93,Var 1]])]])),Func ("OracleFlatCurryXML","_case_737") 7 Private (TVar (-42)) (Rule [5,70,84,86,94,93,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 93) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_736") [Var 5,Var 70,Var 84,Var 86,Var 94,Var 1]])]])),Func ("OracleFlatCurryXML","_case_736") 6 Private (TVar (-42)) (Rule [5,70,84,86,94,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 94) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_735") [Var 5,Var 70,Var 86,Var 84,Var 1]])]])),Func ("OracleFlatCurryXML","_case_735") 5 Private (TVar (-42)) (Rule [5,70,86,84,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 84) [Branch (Pattern ("Prelude",":") [95,96]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_734") [Var 5,Var 70,Var 86,Var 95,Var 96,Var 1]])]])),Func ("OracleFlatCurryXML","_case_734") 6 Private (TVar (-42)) (Rule [5,70,86,95,96,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 96) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_733") [Var 70,Var 86,Var 95,Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_733") 5 Private (TVar (-42)) (Rule [70,86,95,5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (Pattern ("Prelude",":") [97,98]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_732") [Var 70,Var 86,Var 95,Var 98,Var 97,Var 1]])]])),Func ("OracleFlatCurryXML","_case_732") 6 Private (TVar (-42)) (Rule [70,86,95,98,97,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 97) [Branch (Pattern ("XML","XElem") [99,100,101]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_731") [Var 70,Var 86,Var 95,Var 98,Var 100,Var 101,Var 99,Var 1]])]])),Func ("OracleFlatCurryXML","_case_731") 8 Private (TVar (-42)) (Rule [70,86,95,98,100,101,99,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 99) [Branch (Pattern ("Prelude",":") [102,103]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_730") [Var 70,Var 86,Var 95,Var 98,Var 100,Var 101,Var 103,Var 102,Var 1]])]])),Func ("OracleFlatCurryXML","_case_730") 9 Private (TVar (-42)) (Rule [70,86,95,98,100,101,103,102,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 102) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_729") [Var 70,Var 86,Var 95,Var 98,Var 100,Var 101,Var 103,Var 1]])]])),Func ("OracleFlatCurryXML","_case_729") 8 Private (TVar (-42)) (Rule [70,86,95,98,100,101,103,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 103) [Branch (Pattern ("Prelude",":") [104,105]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_728") [Var 70,Var 86,Var 95,Var 98,Var 100,Var 101,Var 105,Var 104,Var 1]])]])),Func ("OracleFlatCurryXML","_case_728") 9 Private (TVar (-42)) (Rule [70,86,95,98,100,101,105,104,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 104) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_727") [Var 70,Var 86,Var 95,Var 98,Var 100,Var 101,Var 105,Var 1]])]])),Func ("OracleFlatCurryXML","_case_727") 8 Private (TVar (-42)) (Rule [70,86,95,98,100,101,105,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 105) [Branch (Pattern ("Prelude",":") [106,107]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_726") [Var 70,Var 86,Var 95,Var 98,Var 100,Var 101,Var 107,Var 106,Var 1]])]])),Func ("OracleFlatCurryXML","_case_726") 9 Private (TVar (-42)) (Rule [70,86,95,98,100,101,107,106,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 106) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_725") [Var 70,Var 86,Var 95,Var 98,Var 100,Var 101,Var 107,Var 1]])]])),Func ("OracleFlatCurryXML","_case_725") 8 Private (TVar (-42)) (Rule [70,86,95,98,100,101,107,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 107) [Branch (Pattern ("Prelude",":") [108,109]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_724") [Var 70,Var 86,Var 95,Var 98,Var 100,Var 101,Var 109,Var 108,Var 1]])]])),Func ("OracleFlatCurryXML","_case_724") 9 Private (TVar (-42)) (Rule [70,86,95,98,100,101,109,108,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 108) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_723") [Var 70,Var 86,Var 95,Var 98,Var 100,Var 101,Var 109,Var 1]])]])),Func ("OracleFlatCurryXML","_case_723") 8 Private (TVar (-42)) (Rule [70,86,95,98,100,101,109,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 109) [Branch (Pattern ("Prelude",":") [110,111]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_722") [Var 70,Var 86,Var 95,Var 98,Var 100,Var 101,Var 111,Var 110,Var 1]])]])),Func ("OracleFlatCurryXML","_case_722") 9 Private (TVar (-42)) (Rule [70,86,95,98,100,101,111,110,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 110) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_721") [Var 70,Var 86,Var 95,Var 98,Var 100,Var 101,Var 111,Var 1]])]])),Func ("OracleFlatCurryXML","_case_721") 8 Private (TVar (-42)) (Rule [70,86,95,98,100,101,111,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 111) [Branch (Pattern ("Prelude",":") [112,113]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_720") [Var 70,Var 86,Var 95,Var 98,Var 100,Var 101,Var 113,Var 112,Var 1]])]])),Func ("OracleFlatCurryXML","_case_720") 9 Private (TVar (-42)) (Rule [70,86,95,98,100,101,113,112,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 112) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_719") [Var 70,Var 86,Var 95,Var 98,Var 100,Var 101,Var 113,Var 1]])]])),Func ("OracleFlatCurryXML","_case_719") 8 Private (TVar (-42)) (Rule [70,86,95,98,100,101,113,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 113) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_718") [Var 70,Var 86,Var 95,Var 98,Var 101,Var 100,Var 1]])]])),Func ("OracleFlatCurryXML","_case_718") 7 Private (TVar (-42)) (Rule [70,86,95,98,101,100,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 100) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_717") [Var 70,Var 86,Var 95,Var 101,Var 98,Var 1]])]])),Func ("OracleFlatCurryXML","_case_717") 6 Private (TVar (-42)) (Rule [70,86,95,101,98,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 98) [Branch (Pattern ("Prelude",":") [114,115]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_716") [Var 70,Var 86,Var 95,Var 101,Var 114,Var 115,Var 1]])]])),Func ("OracleFlatCurryXML","_case_716") 7 Private (TVar (-42)) (Rule [70,86,95,101,114,115,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 115) [Branch (Pattern ("Prelude","[]") []) (Let [(116,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(117,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 116,Comb ConsCall ("Prelude",":") [Var 117,Comb ConsCall ("Prelude","[]") []]],Comb ConsCall ("FlatCurry","TypeSyn") [Comb ConsCall ("Prelude","(,)") [Var 70,Var 86],Comb FuncCall ("OracleFlatCurryXML","xvis2vis") [Var 95,Var 1],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatx2typedecl._#lambda10") []],Var 101,Var 116],Comb FuncCall ("OracleFlatCurryXML","flatx2texp") [Var 114,Var 117]]]))]])),Func ("OracleFlatCurryXML","_case_811") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude",":") [14,15]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_810") [Var 5,Var 15,Var 14,Var 1]])]])),Func ("OracleFlatCurryXML","_case_810") 4 Private (TVar (-42)) (Rule [5,15,14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (Pattern ("Prelude","(,)") [16,17]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_809") [Var 5,Var 15,Var 17,Var 16,Var 1]])]])),Func ("OracleFlatCurryXML","_case_809") 5 Private (TVar (-42)) (Rule [5,15,17,16,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 16) [Branch (Pattern ("Prelude",":") [18,19]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_808") [Var 5,Var 15,Var 17,Var 19,Var 18,Var 1]])]])),Func ("OracleFlatCurryXML","_case_808") 6 Private (TVar (-42)) (Rule [5,15,17,19,18,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 18) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_807") [Var 5,Var 15,Var 17,Var 19,Var 1]])]])),Func ("OracleFlatCurryXML","_case_807") 5 Private (TVar (-42)) (Rule [5,15,17,19,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 19) [Branch (Pattern ("Prelude",":") [20,21]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_806") [Var 5,Var 15,Var 17,Var 21,Var 20,Var 1]])]])),Func ("OracleFlatCurryXML","_case_806") 6 Private (TVar (-42)) (Rule [5,15,17,21,20,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 20) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_805") [Var 5,Var 15,Var 17,Var 21,Var 1]])]])),Func ("OracleFlatCurryXML","_case_805") 5 Private (TVar (-42)) (Rule [5,15,17,21,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 21) [Branch (Pattern ("Prelude",":") [22,23]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_804") [Var 5,Var 15,Var 17,Var 23,Var 22,Var 1]])]])),Func ("OracleFlatCurryXML","_case_804") 6 Private (TVar (-42)) (Rule [5,15,17,23,22,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 22) [Branch (LPattern (Charc 'd')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_803") [Var 5,Var 15,Var 17,Var 23,Var 1]])]])),Func ("OracleFlatCurryXML","_case_803") 5 Private (TVar (-42)) (Rule [5,15,17,23,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 23) [Branch (Pattern ("Prelude",":") [24,25]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_802") [Var 5,Var 15,Var 17,Var 25,Var 24,Var 1]])]])),Func ("OracleFlatCurryXML","_case_802") 6 Private (TVar (-42)) (Rule [5,15,17,25,24,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 24) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_801") [Var 5,Var 15,Var 17,Var 25,Var 1]])]])),Func ("OracleFlatCurryXML","_case_801") 5 Private (TVar (-42)) (Rule [5,15,17,25,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 25) [Branch (Pattern ("Prelude",":") [26,27]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_800") [Var 5,Var 15,Var 17,Var 27,Var 26,Var 1]])]])),Func ("OracleFlatCurryXML","_case_800") 6 Private (TVar (-42)) (Rule [5,15,17,27,26,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 26) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_799") [Var 5,Var 15,Var 17,Var 27,Var 1]])]])),Func ("OracleFlatCurryXML","_case_799") 5 Private (TVar (-42)) (Rule [5,15,17,27,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 27) [Branch (Pattern ("Prelude",":") [28,29]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_798") [Var 5,Var 15,Var 17,Var 29,Var 28,Var 1]])]])),Func ("OracleFlatCurryXML","_case_798") 6 Private (TVar (-42)) (Rule [5,15,17,29,28,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 28) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_797") [Var 5,Var 15,Var 17,Var 29,Var 1]])]])),Func ("OracleFlatCurryXML","_case_797") 5 Private (TVar (-42)) (Rule [5,15,17,29,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 29) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_796") [Var 5,Var 17,Var 15,Var 1]])]])),Func ("OracleFlatCurryXML","_case_796") 4 Private (TVar (-42)) (Rule [5,17,15,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 15) [Branch (Pattern ("Prelude",":") [30,31]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_795") [Var 5,Var 17,Var 31,Var 30,Var 1]])]])),Func ("OracleFlatCurryXML","_case_795") 5 Private (TVar (-42)) (Rule [5,17,31,30,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 30) [Branch (Pattern ("Prelude","(,)") [32,33]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_794") [Var 5,Var 17,Var 31,Var 33,Var 32,Var 1]])]])),Func ("OracleFlatCurryXML","_case_794") 6 Private (TVar (-42)) (Rule [5,17,31,33,32,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 32) [Branch (Pattern ("Prelude",":") [34,35]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_793") [Var 5,Var 17,Var 31,Var 33,Var 35,Var 34,Var 1]])]])),Func ("OracleFlatCurryXML","_case_793") 7 Private (TVar (-42)) (Rule [5,17,31,33,35,34,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 34) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_792") [Var 5,Var 17,Var 31,Var 33,Var 35,Var 1]])]])),Func ("OracleFlatCurryXML","_case_792") 6 Private (TVar (-42)) (Rule [5,17,31,33,35,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 35) [Branch (Pattern ("Prelude",":") [36,37]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_791") [Var 5,Var 17,Var 31,Var 33,Var 37,Var 36,Var 1]])]])),Func ("OracleFlatCurryXML","_case_791") 7 Private (TVar (-42)) (Rule [5,17,31,33,37,36,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 36) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_790") [Var 5,Var 17,Var 31,Var 33,Var 37,Var 1]])]])),Func ("OracleFlatCurryXML","_case_790") 6 Private (TVar (-42)) (Rule [5,17,31,33,37,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 37) [Branch (Pattern ("Prelude",":") [38,39]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_789") [Var 5,Var 17,Var 31,Var 33,Var 39,Var 38,Var 1]])]])),Func ("OracleFlatCurryXML","_case_789") 7 Private (TVar (-42)) (Rule [5,17,31,33,39,38,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 38) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_788") [Var 5,Var 17,Var 31,Var 33,Var 39,Var 1]])]])),Func ("OracleFlatCurryXML","_case_788") 6 Private (TVar (-42)) (Rule [5,17,31,33,39,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 39) [Branch (Pattern ("Prelude",":") [40,41]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_787") [Var 5,Var 17,Var 31,Var 33,Var 41,Var 40,Var 1]])]])),Func ("OracleFlatCurryXML","_case_787") 7 Private (TVar (-42)) (Rule [5,17,31,33,41,40,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 40) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_786") [Var 5,Var 17,Var 31,Var 33,Var 41,Var 1]])]])),Func ("OracleFlatCurryXML","_case_786") 6 Private (TVar (-42)) (Rule [5,17,31,33,41,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 41) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_785") [Var 5,Var 17,Var 33,Var 31,Var 1]])]])),Func ("OracleFlatCurryXML","_case_785") 5 Private (TVar (-42)) (Rule [5,17,33,31,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 31) [Branch (Pattern ("Prelude",":") [42,43]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_784") [Var 5,Var 17,Var 33,Var 42,Var 43,Var 1]])]])),Func ("OracleFlatCurryXML","_case_784") 6 Private (TVar (-42)) (Rule [5,17,33,42,43,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 43) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_783") [Var 17,Var 33,Var 42,Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_783") 5 Private (TVar (-42)) (Rule [17,33,42,5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (Pattern ("Prelude",":") [44,45]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_782") [Var 17,Var 33,Var 42,Var 45,Var 44,Var 1]])]])),Func ("OracleFlatCurryXML","_case_782") 6 Private (TVar (-42)) (Rule [17,33,42,45,44,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 44) [Branch (Pattern ("XML","XElem") [46,47,48]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_781") [Var 17,Var 33,Var 42,Var 45,Var 47,Var 48,Var 46,Var 1]])]])),Func ("OracleFlatCurryXML","_case_781") 8 Private (TVar (-42)) (Rule [17,33,42,45,47,48,46,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 46) [Branch (Pattern ("Prelude",":") [49,50]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_780") [Var 17,Var 33,Var 42,Var 45,Var 47,Var 48,Var 50,Var 49,Var 1]])]])),Func ("OracleFlatCurryXML","_case_780") 9 Private (TVar (-42)) (Rule [17,33,42,45,47,48,50,49,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 49) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_779") [Var 17,Var 33,Var 42,Var 45,Var 47,Var 48,Var 50,Var 1]])]])),Func ("OracleFlatCurryXML","_case_779") 8 Private (TVar (-42)) (Rule [17,33,42,45,47,48,50,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 50) [Branch (Pattern ("Prelude",":") [51,52]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_778") [Var 17,Var 33,Var 42,Var 45,Var 47,Var 48,Var 52,Var 51,Var 1]])]])),Func ("OracleFlatCurryXML","_case_778") 9 Private (TVar (-42)) (Rule [17,33,42,45,47,48,52,51,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 51) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_777") [Var 17,Var 33,Var 42,Var 45,Var 47,Var 48,Var 52,Var 1]])]])),Func ("OracleFlatCurryXML","_case_777") 8 Private (TVar (-42)) (Rule [17,33,42,45,47,48,52,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 52) [Branch (Pattern ("Prelude",":") [53,54]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_776") [Var 17,Var 33,Var 42,Var 45,Var 47,Var 48,Var 54,Var 53,Var 1]])]])),Func ("OracleFlatCurryXML","_case_776") 9 Private (TVar (-42)) (Rule [17,33,42,45,47,48,54,53,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 53) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_775") [Var 17,Var 33,Var 42,Var 45,Var 47,Var 48,Var 54,Var 1]])]])),Func ("OracleFlatCurryXML","_case_775") 8 Private (TVar (-42)) (Rule [17,33,42,45,47,48,54,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 54) [Branch (Pattern ("Prelude",":") [55,56]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_774") [Var 17,Var 33,Var 42,Var 45,Var 47,Var 48,Var 56,Var 55,Var 1]])]])),Func ("OracleFlatCurryXML","_case_774") 9 Private (TVar (-42)) (Rule [17,33,42,45,47,48,56,55,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 55) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_773") [Var 17,Var 33,Var 42,Var 45,Var 47,Var 48,Var 56,Var 1]])]])),Func ("OracleFlatCurryXML","_case_773") 8 Private (TVar (-42)) (Rule [17,33,42,45,47,48,56,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 56) [Branch (Pattern ("Prelude",":") [57,58]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_772") [Var 17,Var 33,Var 42,Var 45,Var 47,Var 48,Var 58,Var 57,Var 1]])]])),Func ("OracleFlatCurryXML","_case_772") 9 Private (TVar (-42)) (Rule [17,33,42,45,47,48,58,57,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 57) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_771") [Var 17,Var 33,Var 42,Var 45,Var 47,Var 48,Var 58,Var 1]])]])),Func ("OracleFlatCurryXML","_case_771") 8 Private (TVar (-42)) (Rule [17,33,42,45,47,48,58,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 58) [Branch (Pattern ("Prelude",":") [59,60]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_770") [Var 17,Var 33,Var 42,Var 45,Var 47,Var 48,Var 60,Var 59,Var 1]])]])),Func ("OracleFlatCurryXML","_case_770") 9 Private (TVar (-42)) (Rule [17,33,42,45,47,48,60,59,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 59) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_769") [Var 17,Var 33,Var 42,Var 45,Var 47,Var 48,Var 60,Var 1]])]])),Func ("OracleFlatCurryXML","_case_769") 8 Private (TVar (-42)) (Rule [17,33,42,45,47,48,60,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 60) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_768") [Var 17,Var 33,Var 42,Var 45,Var 48,Var 47,Var 1]])]])),Func ("OracleFlatCurryXML","_case_768") 7 Private (TVar (-42)) (Rule [17,33,42,45,48,47,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 47) [Branch (Pattern ("Prelude","[]") []) (Let [(49,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(50,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 49,Comb ConsCall ("Prelude",":") [Var 50,Comb ConsCall ("Prelude","[]") []]],Comb ConsCall ("FlatCurry","Type") [Comb ConsCall ("Prelude","(,)") [Var 17,Var 33],Comb FuncCall ("OracleFlatCurryXML","xvis2vis") [Var 42,Var 1],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatx2typedecl._#lambda8") []],Var 48,Var 49],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatx2typedecl._#lambda9") []],Var 45,Var 50]]]))]])),Func ("OracleFlatCurryXML","_case_881") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("XML","XElem") [3,4,5]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_880") [Var 4,Var 5,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_880") 4 Private (TVar (-42)) (Rule [4,5,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("Prelude",":") [6,7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_879") [Var 4,Var 5,Var 7,Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_879") 5 Private (TVar (-42)) (Rule [4,5,7,6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_878") [Var 4,Var 5,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_878") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [8,9]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_877") [Var 4,Var 5,Var 9,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_877") 5 Private (TVar (-42)) (Rule [4,5,9,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_876") [Var 4,Var 5,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_876") 4 Private (TVar (-42)) (Rule [4,5,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_875") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_875") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude",":") [10,11]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_874") [Var 5,Var 11,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_874") 4 Private (TVar (-42)) (Rule [5,11,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (Pattern ("Prelude","(,)") [12,13]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_873") [Var 5,Var 11,Var 13,Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_873") 5 Private (TVar (-42)) (Rule [5,11,13,12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (Pattern ("Prelude",":") [14,15]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_872") [Var 5,Var 11,Var 13,Var 15,Var 14,Var 1]])]])),Func ("OracleFlatCurryXML","_case_872") 6 Private (TVar (-42)) (Rule [5,11,13,15,14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_871") [Var 5,Var 11,Var 13,Var 15,Var 1]])]])),Func ("OracleFlatCurryXML","_case_871") 5 Private (TVar (-42)) (Rule [5,11,13,15,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 15) [Branch (Pattern ("Prelude",":") [16,17]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_870") [Var 5,Var 11,Var 13,Var 17,Var 16,Var 1]])]])),Func ("OracleFlatCurryXML","_case_870") 6 Private (TVar (-42)) (Rule [5,11,13,17,16,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 16) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_869") [Var 5,Var 11,Var 13,Var 17,Var 1]])]])),Func ("OracleFlatCurryXML","_case_869") 5 Private (TVar (-42)) (Rule [5,11,13,17,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 17) [Branch (Pattern ("Prelude",":") [18,19]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_868") [Var 5,Var 11,Var 13,Var 19,Var 18,Var 1]])]])),Func ("OracleFlatCurryXML","_case_868") 6 Private (TVar (-42)) (Rule [5,11,13,19,18,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 18) [Branch (LPattern (Charc 'd')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_867") [Var 5,Var 11,Var 13,Var 19,Var 1]])]])),Func ("OracleFlatCurryXML","_case_867") 5 Private (TVar (-42)) (Rule [5,11,13,19,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 19) [Branch (Pattern ("Prelude",":") [20,21]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_866") [Var 5,Var 11,Var 13,Var 21,Var 20,Var 1]])]])),Func ("OracleFlatCurryXML","_case_866") 6 Private (TVar (-42)) (Rule [5,11,13,21,20,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 20) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_865") [Var 5,Var 11,Var 13,Var 21,Var 1]])]])),Func ("OracleFlatCurryXML","_case_865") 5 Private (TVar (-42)) (Rule [5,11,13,21,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 21) [Branch (Pattern ("Prelude",":") [22,23]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_864") [Var 5,Var 11,Var 13,Var 23,Var 22,Var 1]])]])),Func ("OracleFlatCurryXML","_case_864") 6 Private (TVar (-42)) (Rule [5,11,13,23,22,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 22) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_863") [Var 5,Var 11,Var 13,Var 23,Var 1]])]])),Func ("OracleFlatCurryXML","_case_863") 5 Private (TVar (-42)) (Rule [5,11,13,23,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 23) [Branch (Pattern ("Prelude",":") [24,25]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_862") [Var 5,Var 11,Var 13,Var 25,Var 24,Var 1]])]])),Func ("OracleFlatCurryXML","_case_862") 6 Private (TVar (-42)) (Rule [5,11,13,25,24,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 24) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_861") [Var 5,Var 11,Var 13,Var 25,Var 1]])]])),Func ("OracleFlatCurryXML","_case_861") 5 Private (TVar (-42)) (Rule [5,11,13,25,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 25) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_860") [Var 5,Var 13,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_860") 4 Private (TVar (-42)) (Rule [5,13,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (Pattern ("Prelude",":") [26,27]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_859") [Var 5,Var 13,Var 27,Var 26,Var 1]])]])),Func ("OracleFlatCurryXML","_case_859") 5 Private (TVar (-42)) (Rule [5,13,27,26,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 26) [Branch (Pattern ("Prelude","(,)") [28,29]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_858") [Var 5,Var 13,Var 27,Var 29,Var 28,Var 1]])]])),Func ("OracleFlatCurryXML","_case_858") 6 Private (TVar (-42)) (Rule [5,13,27,29,28,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 28) [Branch (Pattern ("Prelude",":") [30,31]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_857") [Var 5,Var 13,Var 27,Var 29,Var 31,Var 30,Var 1]])]])),Func ("OracleFlatCurryXML","_case_857") 7 Private (TVar (-42)) (Rule [5,13,27,29,31,30,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 30) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_856") [Var 5,Var 13,Var 27,Var 29,Var 31,Var 1]])]])),Func ("OracleFlatCurryXML","_case_856") 6 Private (TVar (-42)) (Rule [5,13,27,29,31,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 31) [Branch (Pattern ("Prelude",":") [32,33]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_855") [Var 5,Var 13,Var 27,Var 29,Var 33,Var 32,Var 1]])]])),Func ("OracleFlatCurryXML","_case_855") 7 Private (TVar (-42)) (Rule [5,13,27,29,33,32,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 32) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_854") [Var 5,Var 13,Var 27,Var 29,Var 33,Var 1]])]])),Func ("OracleFlatCurryXML","_case_854") 6 Private (TVar (-42)) (Rule [5,13,27,29,33,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 33) [Branch (Pattern ("Prelude",":") [34,35]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_853") [Var 5,Var 13,Var 27,Var 29,Var 35,Var 34,Var 1]])]])),Func ("OracleFlatCurryXML","_case_853") 7 Private (TVar (-42)) (Rule [5,13,27,29,35,34,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 34) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_852") [Var 5,Var 13,Var 27,Var 29,Var 35,Var 1]])]])),Func ("OracleFlatCurryXML","_case_852") 6 Private (TVar (-42)) (Rule [5,13,27,29,35,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 35) [Branch (Pattern ("Prelude",":") [36,37]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_851") [Var 5,Var 13,Var 27,Var 29,Var 37,Var 36,Var 1]])]])),Func ("OracleFlatCurryXML","_case_851") 7 Private (TVar (-42)) (Rule [5,13,27,29,37,36,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 36) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_850") [Var 5,Var 13,Var 27,Var 29,Var 37,Var 1]])]])),Func ("OracleFlatCurryXML","_case_850") 6 Private (TVar (-42)) (Rule [5,13,27,29,37,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 37) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_849") [Var 5,Var 13,Var 29,Var 27,Var 1]])]])),Func ("OracleFlatCurryXML","_case_849") 5 Private (TVar (-42)) (Rule [5,13,29,27,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 27) [Branch (Pattern ("Prelude",":") [38,39]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_848") [Var 5,Var 13,Var 29,Var 39,Var 38,Var 1]])]])),Func ("OracleFlatCurryXML","_case_848") 6 Private (TVar (-42)) (Rule [5,13,29,39,38,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 38) [Branch (Pattern ("Prelude","(,)") [40,41]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_847") [Var 5,Var 13,Var 29,Var 39,Var 41,Var 40,Var 1]])]])),Func ("OracleFlatCurryXML","_case_847") 7 Private (TVar (-42)) (Rule [5,13,29,39,41,40,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 40) [Branch (Pattern ("Prelude",":") [42,43]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_846") [Var 5,Var 13,Var 29,Var 39,Var 41,Var 43,Var 42,Var 1]])]])),Func ("OracleFlatCurryXML","_case_846") 8 Private (TVar (-42)) (Rule [5,13,29,39,41,43,42,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 42) [Branch (LPattern (Charc 'f')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_845") [Var 5,Var 13,Var 29,Var 39,Var 41,Var 43,Var 1]])]])),Func ("OracleFlatCurryXML","_case_845") 7 Private (TVar (-42)) (Rule [5,13,29,39,41,43,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 43) [Branch (Pattern ("Prelude",":") [44,45]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_844") [Var 5,Var 13,Var 29,Var 39,Var 41,Var 45,Var 44,Var 1]])]])),Func ("OracleFlatCurryXML","_case_844") 8 Private (TVar (-42)) (Rule [5,13,29,39,41,45,44,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 44) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_843") [Var 5,Var 13,Var 29,Var 39,Var 41,Var 45,Var 1]])]])),Func ("OracleFlatCurryXML","_case_843") 7 Private (TVar (-42)) (Rule [5,13,29,39,41,45,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 45) [Branch (Pattern ("Prelude",":") [46,47]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_842") [Var 5,Var 13,Var 29,Var 39,Var 41,Var 47,Var 46,Var 1]])]])),Func ("OracleFlatCurryXML","_case_842") 8 Private (TVar (-42)) (Rule [5,13,29,39,41,47,46,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 46) [Branch (LPattern (Charc 'x')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_841") [Var 5,Var 13,Var 29,Var 39,Var 41,Var 47,Var 1]])]])),Func ("OracleFlatCurryXML","_case_841") 7 Private (TVar (-42)) (Rule [5,13,29,39,41,47,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 47) [Branch (Pattern ("Prelude",":") [48,49]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_840") [Var 5,Var 13,Var 29,Var 39,Var 41,Var 49,Var 48,Var 1]])]])),Func ("OracleFlatCurryXML","_case_840") 8 Private (TVar (-42)) (Rule [5,13,29,39,41,49,48,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 48) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_839") [Var 5,Var 13,Var 29,Var 39,Var 41,Var 49,Var 1]])]])),Func ("OracleFlatCurryXML","_case_839") 7 Private (TVar (-42)) (Rule [5,13,29,39,41,49,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 49) [Branch (Pattern ("Prelude",":") [50,51]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_838") [Var 5,Var 13,Var 29,Var 39,Var 41,Var 51,Var 50,Var 1]])]])),Func ("OracleFlatCurryXML","_case_838") 8 Private (TVar (-42)) (Rule [5,13,29,39,41,51,50,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 50) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_837") [Var 5,Var 13,Var 29,Var 39,Var 41,Var 51,Var 1]])]])),Func ("OracleFlatCurryXML","_case_837") 7 Private (TVar (-42)) (Rule [5,13,29,39,41,51,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 51) [Branch (Pattern ("Prelude",":") [52,53]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_836") [Var 5,Var 13,Var 29,Var 39,Var 41,Var 53,Var 52,Var 1]])]])),Func ("OracleFlatCurryXML","_case_836") 8 Private (TVar (-42)) (Rule [5,13,29,39,41,53,52,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 52) [Branch (LPattern (Charc 'y')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_835") [Var 5,Var 13,Var 29,Var 39,Var 41,Var 53,Var 1]])]])),Func ("OracleFlatCurryXML","_case_835") 7 Private (TVar (-42)) (Rule [5,13,29,39,41,53,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 53) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_834") [Var 5,Var 13,Var 29,Var 41,Var 39,Var 1]])]])),Func ("OracleFlatCurryXML","_case_834") 6 Private (TVar (-42)) (Rule [5,13,29,41,39,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 39) [Branch (Pattern ("Prelude",":") [54,55]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_833") [Var 5,Var 13,Var 29,Var 41,Var 55,Var 54,Var 1]])]])),Func ("OracleFlatCurryXML","_case_833") 7 Private (TVar (-42)) (Rule [5,13,29,41,55,54,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 54) [Branch (Pattern ("Prelude","(,)") [56,57]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_832") [Var 5,Var 13,Var 29,Var 41,Var 55,Var 57,Var 56,Var 1]])]])),Func ("OracleFlatCurryXML","_case_832") 8 Private (TVar (-42)) (Rule [5,13,29,41,55,57,56,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 56) [Branch (Pattern ("Prelude",":") [58,59]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_831") [Var 5,Var 13,Var 29,Var 41,Var 55,Var 57,Var 59,Var 58,Var 1]])]])),Func ("OracleFlatCurryXML","_case_831") 9 Private (TVar (-42)) (Rule [5,13,29,41,55,57,59,58,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 58) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_830") [Var 5,Var 13,Var 29,Var 41,Var 55,Var 57,Var 59,Var 1]])]])),Func ("OracleFlatCurryXML","_case_830") 8 Private (TVar (-42)) (Rule [5,13,29,41,55,57,59,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 59) [Branch (Pattern ("Prelude",":") [60,61]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_829") [Var 5,Var 13,Var 29,Var 41,Var 55,Var 57,Var 61,Var 60,Var 1]])]])),Func ("OracleFlatCurryXML","_case_829") 9 Private (TVar (-42)) (Rule [5,13,29,41,55,57,61,60,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 60) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_828") [Var 5,Var 13,Var 29,Var 41,Var 55,Var 57,Var 61,Var 1]])]])),Func ("OracleFlatCurryXML","_case_828") 8 Private (TVar (-42)) (Rule [5,13,29,41,55,57,61,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 61) [Branch (Pattern ("Prelude",":") [62,63]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_827") [Var 5,Var 13,Var 29,Var 41,Var 55,Var 57,Var 63,Var 62,Var 1]])]])),Func ("OracleFlatCurryXML","_case_827") 9 Private (TVar (-42)) (Rule [5,13,29,41,55,57,63,62,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 62) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_826") [Var 5,Var 13,Var 29,Var 41,Var 55,Var 57,Var 63,Var 1]])]])),Func ("OracleFlatCurryXML","_case_826") 8 Private (TVar (-42)) (Rule [5,13,29,41,55,57,63,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 63) [Branch (Pattern ("Prelude",":") [64,65]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_825") [Var 5,Var 13,Var 29,Var 41,Var 55,Var 57,Var 65,Var 64,Var 1]])]])),Func ("OracleFlatCurryXML","_case_825") 9 Private (TVar (-42)) (Rule [5,13,29,41,55,57,65,64,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 64) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_824") [Var 5,Var 13,Var 29,Var 41,Var 55,Var 57,Var 65,Var 1]])]])),Func ("OracleFlatCurryXML","_case_824") 8 Private (TVar (-42)) (Rule [5,13,29,41,55,57,65,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 65) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_823") [Var 5,Var 13,Var 29,Var 41,Var 57,Var 55,Var 1]])]])),Func ("OracleFlatCurryXML","_case_823") 7 Private (TVar (-42)) (Rule [5,13,29,41,57,55,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 55) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_822") [Var 13,Var 29,Var 41,Var 57,Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_822") 6 Private (TVar (-42)) (Rule [13,29,41,57,5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (Pattern ("Prelude","[]") []) (Let [(58,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 58,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("FlatCurry","Op") [Comb ConsCall ("Prelude","(,)") [Var 13,Var 29],Comb FuncCall ("OracleFlatCurryXML","flatx2Fixity") [Var 41,Var 1],Comb FuncCall ("OracleRead","readNat") [Var 57,Var 58]]]))]])),Func ("OracleFlatCurryXML","_case_935") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("XML","XElem") [3,4,5]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_934") [Var 4,Var 5,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_934") 4 Private (TVar (-42)) (Rule [4,5,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("Prelude",":") [6,7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_933") [Var 4,Var 5,Var 7,Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_933") 5 Private (TVar (-42)) (Rule [4,5,7,6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (LPattern (Charc 'f')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_932") [Var 4,Var 5,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_932") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [8,9]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_931") [Var 4,Var 5,Var 9,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_931") 5 Private (TVar (-42)) (Rule [4,5,9,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_930") [Var 4,Var 5,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_930") 4 Private (TVar (-42)) (Rule [4,5,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude",":") [10,11]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_929") [Var 4,Var 5,Var 11,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_929") 5 Private (TVar (-42)) (Rule [4,5,11,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_928") [Var 4,Var 5,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_928") 4 Private (TVar (-42)) (Rule [4,5,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (Pattern ("Prelude",":") [12,13]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_927") [Var 4,Var 5,Var 13,Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_927") 5 Private (TVar (-42)) (Rule [4,5,13,12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_926") [Var 4,Var 5,Var 13,Var 1]])]])),Func ("OracleFlatCurryXML","_case_926") 4 Private (TVar (-42)) (Rule [4,5,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_925") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_925") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude",":") [14,15]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_924") [Var 5,Var 15,Var 14,Var 1]])]])),Func ("OracleFlatCurryXML","_case_924") 4 Private (TVar (-42)) (Rule [5,15,14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (Pattern ("Prelude","(,)") [16,17]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_923") [Var 5,Var 15,Var 17,Var 16,Var 1]])]])),Func ("OracleFlatCurryXML","_case_923") 5 Private (TVar (-42)) (Rule [5,15,17,16,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 16) [Branch (Pattern ("Prelude",":") [18,19]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_922") [Var 5,Var 15,Var 17,Var 19,Var 18,Var 1]])]])),Func ("OracleFlatCurryXML","_case_922") 6 Private (TVar (-42)) (Rule [5,15,17,19,18,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 18) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_921") [Var 5,Var 15,Var 17,Var 19,Var 1]])]])),Func ("OracleFlatCurryXML","_case_921") 5 Private (TVar (-42)) (Rule [5,15,17,19,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 19) [Branch (Pattern ("Prelude",":") [20,21]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_920") [Var 5,Var 15,Var 17,Var 21,Var 20,Var 1]])]])),Func ("OracleFlatCurryXML","_case_920") 6 Private (TVar (-42)) (Rule [5,15,17,21,20,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 20) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_919") [Var 5,Var 15,Var 17,Var 21,Var 1]])]])),Func ("OracleFlatCurryXML","_case_919") 5 Private (TVar (-42)) (Rule [5,15,17,21,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 21) [Branch (Pattern ("Prelude",":") [22,23]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_918") [Var 5,Var 15,Var 17,Var 23,Var 22,Var 1]])]])),Func ("OracleFlatCurryXML","_case_918") 6 Private (TVar (-42)) (Rule [5,15,17,23,22,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 22) [Branch (LPattern (Charc 'd')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_917") [Var 5,Var 15,Var 17,Var 23,Var 1]])]])),Func ("OracleFlatCurryXML","_case_917") 5 Private (TVar (-42)) (Rule [5,15,17,23,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 23) [Branch (Pattern ("Prelude",":") [24,25]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_916") [Var 5,Var 15,Var 17,Var 25,Var 24,Var 1]])]])),Func ("OracleFlatCurryXML","_case_916") 6 Private (TVar (-42)) (Rule [5,15,17,25,24,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 24) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_915") [Var 5,Var 15,Var 17,Var 25,Var 1]])]])),Func ("OracleFlatCurryXML","_case_915") 5 Private (TVar (-42)) (Rule [5,15,17,25,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 25) [Branch (Pattern ("Prelude",":") [26,27]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_914") [Var 5,Var 15,Var 17,Var 27,Var 26,Var 1]])]])),Func ("OracleFlatCurryXML","_case_914") 6 Private (TVar (-42)) (Rule [5,15,17,27,26,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 26) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_913") [Var 5,Var 15,Var 17,Var 27,Var 1]])]])),Func ("OracleFlatCurryXML","_case_913") 5 Private (TVar (-42)) (Rule [5,15,17,27,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 27) [Branch (Pattern ("Prelude",":") [28,29]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_912") [Var 5,Var 15,Var 17,Var 29,Var 28,Var 1]])]])),Func ("OracleFlatCurryXML","_case_912") 6 Private (TVar (-42)) (Rule [5,15,17,29,28,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 28) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_911") [Var 5,Var 15,Var 17,Var 29,Var 1]])]])),Func ("OracleFlatCurryXML","_case_911") 5 Private (TVar (-42)) (Rule [5,15,17,29,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 29) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_910") [Var 5,Var 17,Var 15,Var 1]])]])),Func ("OracleFlatCurryXML","_case_910") 4 Private (TVar (-42)) (Rule [5,17,15,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 15) [Branch (Pattern ("Prelude",":") [30,31]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_909") [Var 5,Var 17,Var 31,Var 30,Var 1]])]])),Func ("OracleFlatCurryXML","_case_909") 5 Private (TVar (-42)) (Rule [5,17,31,30,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 30) [Branch (Pattern ("Prelude","(,)") [32,33]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_908") [Var 5,Var 17,Var 31,Var 33,Var 32,Var 1]])]])),Func ("OracleFlatCurryXML","_case_908") 6 Private (TVar (-42)) (Rule [5,17,31,33,32,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 32) [Branch (Pattern ("Prelude",":") [34,35]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_907") [Var 5,Var 17,Var 31,Var 33,Var 35,Var 34,Var 1]])]])),Func ("OracleFlatCurryXML","_case_907") 7 Private (TVar (-42)) (Rule [5,17,31,33,35,34,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 34) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_906") [Var 5,Var 17,Var 31,Var 33,Var 35,Var 1]])]])),Func ("OracleFlatCurryXML","_case_906") 6 Private (TVar (-42)) (Rule [5,17,31,33,35,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 35) [Branch (Pattern ("Prelude",":") [36,37]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_905") [Var 5,Var 17,Var 31,Var 33,Var 37,Var 36,Var 1]])]])),Func ("OracleFlatCurryXML","_case_905") 7 Private (TVar (-42)) (Rule [5,17,31,33,37,36,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 36) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_904") [Var 5,Var 17,Var 31,Var 33,Var 37,Var 1]])]])),Func ("OracleFlatCurryXML","_case_904") 6 Private (TVar (-42)) (Rule [5,17,31,33,37,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 37) [Branch (Pattern ("Prelude",":") [38,39]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_903") [Var 5,Var 17,Var 31,Var 33,Var 39,Var 38,Var 1]])]])),Func ("OracleFlatCurryXML","_case_903") 7 Private (TVar (-42)) (Rule [5,17,31,33,39,38,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 38) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_902") [Var 5,Var 17,Var 31,Var 33,Var 39,Var 1]])]])),Func ("OracleFlatCurryXML","_case_902") 6 Private (TVar (-42)) (Rule [5,17,31,33,39,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 39) [Branch (Pattern ("Prelude",":") [40,41]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_901") [Var 5,Var 17,Var 31,Var 33,Var 41,Var 40,Var 1]])]])),Func ("OracleFlatCurryXML","_case_901") 7 Private (TVar (-42)) (Rule [5,17,31,33,41,40,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 40) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_900") [Var 5,Var 17,Var 31,Var 33,Var 41,Var 1]])]])),Func ("OracleFlatCurryXML","_case_900") 6 Private (TVar (-42)) (Rule [5,17,31,33,41,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 41) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_899") [Var 5,Var 17,Var 33,Var 31,Var 1]])]])),Func ("OracleFlatCurryXML","_case_899") 5 Private (TVar (-42)) (Rule [5,17,33,31,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 31) [Branch (Pattern ("Prelude",":") [42,43]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_898") [Var 5,Var 17,Var 33,Var 43,Var 42,Var 1]])]])),Func ("OracleFlatCurryXML","_case_898") 6 Private (TVar (-42)) (Rule [5,17,33,43,42,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 42) [Branch (Pattern ("Prelude","(,)") [44,45]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_897") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 44,Var 1]])]])),Func ("OracleFlatCurryXML","_case_897") 7 Private (TVar (-42)) (Rule [5,17,33,43,45,44,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 44) [Branch (Pattern ("Prelude",":") [46,47]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_896") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 47,Var 46,Var 1]])]])),Func ("OracleFlatCurryXML","_case_896") 8 Private (TVar (-42)) (Rule [5,17,33,43,45,47,46,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 46) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_895") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 47,Var 1]])]])),Func ("OracleFlatCurryXML","_case_895") 7 Private (TVar (-42)) (Rule [5,17,33,43,45,47,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 47) [Branch (Pattern ("Prelude",":") [48,49]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_894") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 49,Var 48,Var 1]])]])),Func ("OracleFlatCurryXML","_case_894") 8 Private (TVar (-42)) (Rule [5,17,33,43,45,49,48,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 48) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_893") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 49,Var 1]])]])),Func ("OracleFlatCurryXML","_case_893") 7 Private (TVar (-42)) (Rule [5,17,33,43,45,49,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 49) [Branch (Pattern ("Prelude",":") [50,51]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_892") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 51,Var 50,Var 1]])]])),Func ("OracleFlatCurryXML","_case_892") 8 Private (TVar (-42)) (Rule [5,17,33,43,45,51,50,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 50) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_891") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 51,Var 1]])]])),Func ("OracleFlatCurryXML","_case_891") 7 Private (TVar (-42)) (Rule [5,17,33,43,45,51,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 51) [Branch (Pattern ("Prelude",":") [52,53]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_890") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 53,Var 52,Var 1]])]])),Func ("OracleFlatCurryXML","_case_890") 8 Private (TVar (-42)) (Rule [5,17,33,43,45,53,52,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 52) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_889") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 53,Var 1]])]])),Func ("OracleFlatCurryXML","_case_889") 7 Private (TVar (-42)) (Rule [5,17,33,43,45,53,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 53) [Branch (Pattern ("Prelude",":") [54,55]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_888") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 55,Var 54,Var 1]])]])),Func ("OracleFlatCurryXML","_case_888") 8 Private (TVar (-42)) (Rule [5,17,33,43,45,55,54,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 54) [Branch (LPattern (Charc 'y')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_887") [Var 5,Var 17,Var 33,Var 43,Var 45,Var 55,Var 1]])]])),Func ("OracleFlatCurryXML","_case_887") 7 Private (TVar (-42)) (Rule [5,17,33,43,45,55,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 55) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_886") [Var 5,Var 17,Var 33,Var 45,Var 43,Var 1]])]])),Func ("OracleFlatCurryXML","_case_886") 6 Private (TVar (-42)) (Rule [5,17,33,45,43,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 43) [Branch (Pattern ("Prelude",":") [56,57]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_885") [Var 5,Var 17,Var 33,Var 45,Var 56,Var 57,Var 1]])]])),Func ("OracleFlatCurryXML","_case_885") 7 Private (TVar (-42)) (Rule [5,17,33,45,56,57,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 57) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_884") [Var 17,Var 33,Var 45,Var 56,Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_884") 6 Private (TVar (-42)) (Rule [17,33,45,56,5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (Pattern ("Prelude",":") [58,59]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_883") [Var 17,Var 33,Var 45,Var 56,Var 58,Var 59,Var 1]])]])),Func ("OracleFlatCurryXML","_case_883") 7 Private (TVar (-42)) (Rule [17,33,45,56,58,59,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 59) [Branch (Pattern ("Prelude",":") [60,61]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_882") [Var 17,Var 33,Var 45,Var 56,Var 58,Var 60,Var 61,Var 1]])]])),Func ("OracleFlatCurryXML","_case_882") 8 Private (TVar (-42)) (Rule [17,33,45,56,58,60,61,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 61) [Branch (Pattern ("Prelude","[]") []) (Let [(62,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(63,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(64,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 62,Comb ConsCall ("Prelude",":") [Var 63,Comb ConsCall ("Prelude",":") [Var 64,Comb ConsCall ("Prelude","[]") []]]],Comb ConsCall ("FlatCurry","Func") [Comb ConsCall ("Prelude","(,)") [Var 17,Var 33],Comb FuncCall ("OracleRead","readNat") [Var 45,Var 1],Comb FuncCall ("OracleFlatCurryXML","xvis2vis") [Var 56,Var 62],Comb FuncCall ("OracleFlatCurryXML","flatx2texp") [Var 58,Var 63],Comb FuncCall ("OracleFlatCurryXML","flatx2FunBody") [Var 60,Var 64]]]))]])),Func ("OracleFlatCurryXML","_case_950") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("XML","XElem") [3,4,5]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_949") [Var 4,Var 5,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_949") 4 Private (TVar (-42)) (Rule [4,5,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("Prelude",":") [6,7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_948") [Var 4,Var 5,Var 7,Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_948") 5 Private (TVar (-42)) (Rule [4,5,7,6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_947") [Var 4,Var 5,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_947") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [8,9]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_946") [Var 4,Var 5,Var 9,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_946") 5 Private (TVar (-42)) (Rule [4,5,9,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_945") [Var 4,Var 5,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_945") 4 Private (TVar (-42)) (Rule [4,5,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude",":") [10,11]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_944") [Var 4,Var 5,Var 11,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_944") 5 Private (TVar (-42)) (Rule [4,5,11,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (LPattern (Charc 'd')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_943") [Var 4,Var 5,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_943") 4 Private (TVar (-42)) (Rule [4,5,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (Pattern ("Prelude",":") [12,13]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_942") [Var 4,Var 5,Var 13,Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_942") 5 Private (TVar (-42)) (Rule [4,5,13,12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_941") [Var 4,Var 5,Var 13,Var 1]])]])),Func ("OracleFlatCurryXML","_case_941") 4 Private (TVar (-42)) (Rule [4,5,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (Pattern ("Prelude",":") [14,15]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_940") [Var 4,Var 5,Var 15,Var 14,Var 1]])]])),Func ("OracleFlatCurryXML","_case_940") 5 Private (TVar (-42)) (Rule [4,5,15,14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_939") [Var 4,Var 5,Var 15,Var 1]])]])),Func ("OracleFlatCurryXML","_case_939") 4 Private (TVar (-42)) (Rule [4,5,15,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 15) [Branch (Pattern ("Prelude",":") [16,17]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_938") [Var 4,Var 5,Var 17,Var 16,Var 1]])]])),Func ("OracleFlatCurryXML","_case_938") 5 Private (TVar (-42)) (Rule [4,5,17,16,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 16) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_937") [Var 4,Var 5,Var 17,Var 1]])]])),Func ("OracleFlatCurryXML","_case_937") 4 Private (TVar (-42)) (Rule [4,5,17,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 17) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_936") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_936") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleXML","textOfXml") [Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1052") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("XML","XElem") [3,4,5]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1051") [Var 4,Var 5,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1051") 4 Private (TVar (-42)) (Rule [4,5,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("Prelude",":") [6,7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1050") [Var 4,Var 5,Var 7,Var 6,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1050") 5 Private (TVar (-42)) (Rule [4,5,7,6,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 6) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1049") [Var 4,Var 5,Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1049") 4 Private (TVar (-42)) (Rule [4,5,7,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 7) [Branch (Pattern ("Prelude",":") [8,9]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1048") [Var 4,Var 5,Var 9,Var 8,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1048") 5 Private (TVar (-42)) (Rule [4,5,9,8,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 8) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1047") [Var 4,Var 5,Var 9,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1047") 4 Private (TVar (-42)) (Rule [4,5,9,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 9) [Branch (Pattern ("Prelude",":") [10,11]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1046") [Var 4,Var 5,Var 11,Var 10,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1046") 5 Private (TVar (-42)) (Rule [4,5,11,10,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 10) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1045") [Var 4,Var 5,Var 11,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1045") 4 Private (TVar (-42)) (Rule [4,5,11,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 11) [Branch (Pattern ("Prelude",":") [12,13]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1044") [Var 4,Var 5,Var 13,Var 12,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1044") 5 Private (TVar (-42)) (Rule [4,5,13,12,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 12) [Branch (LPattern (Charc 'g')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1043") [Var 4,Var 5,Var 13,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1043") 4 Private (TVar (-42)) (Rule [4,5,13,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 13) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1042") [Var 5,Var 4,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1042") 3 Private (TVar (-42)) (Rule [5,4,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 4) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1041") [Var 5,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1041") 2 Private (TVar (-42)) (Rule [5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (Pattern ("Prelude",":") [14,15]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1040") [Var 15,Var 14,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1040") 3 Private (TVar (-42)) (Rule [15,14,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 14) [Branch (Pattern ("XML","XElem") [16,17,18]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1039") [Var 15,Var 17,Var 18,Var 16,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1039") 5 Private (TVar (-42)) (Rule [15,17,18,16,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 16) [Branch (Pattern ("Prelude",":") [19,20]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1038") [Var 15,Var 17,Var 18,Var 20,Var 19,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1038") 6 Private (TVar (-42)) (Rule [15,17,18,20,19,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 19) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1037") [Var 15,Var 17,Var 18,Var 20,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1037") 5 Private (TVar (-42)) (Rule [15,17,18,20,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 20) [Branch (Pattern ("Prelude",":") [21,22]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1036") [Var 15,Var 17,Var 18,Var 22,Var 21,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1036") 6 Private (TVar (-42)) (Rule [15,17,18,22,21,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 21) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1035") [Var 15,Var 17,Var 18,Var 22,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1035") 5 Private (TVar (-42)) (Rule [15,17,18,22,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 22) [Branch (Pattern ("Prelude",":") [23,24]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1034") [Var 15,Var 17,Var 18,Var 24,Var 23,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1034") 6 Private (TVar (-42)) (Rule [15,17,18,24,23,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 23) [Branch (LPattern (Charc 'd')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1033") [Var 15,Var 17,Var 18,Var 24,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1033") 5 Private (TVar (-42)) (Rule [15,17,18,24,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 24) [Branch (Pattern ("Prelude",":") [25,26]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1032") [Var 15,Var 17,Var 18,Var 26,Var 25,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1032") 6 Private (TVar (-42)) (Rule [15,17,18,26,25,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 25) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1031") [Var 15,Var 17,Var 18,Var 26,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1031") 5 Private (TVar (-42)) (Rule [15,17,18,26,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 26) [Branch (Pattern ("Prelude",":") [27,28]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1030") [Var 15,Var 17,Var 18,Var 28,Var 27,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1030") 6 Private (TVar (-42)) (Rule [15,17,18,28,27,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 27) [Branch (LPattern (Charc 'l')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1029") [Var 15,Var 17,Var 18,Var 28,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1029") 5 Private (TVar (-42)) (Rule [15,17,18,28,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 28) [Branch (Pattern ("Prelude",":") [29,30]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1028") [Var 15,Var 17,Var 18,Var 30,Var 29,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1028") 6 Private (TVar (-42)) (Rule [15,17,18,30,29,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 29) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1027") [Var 15,Var 17,Var 18,Var 30,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1027") 5 Private (TVar (-42)) (Rule [15,17,18,30,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 30) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1026") [Var 15,Var 18,Var 17,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1026") 4 Private (TVar (-42)) (Rule [15,18,17,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 17) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1025") [Var 18,Var 15,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1025") 3 Private (TVar (-42)) (Rule [18,15,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 15) [Branch (Pattern ("Prelude",":") [31,32]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1024") [Var 18,Var 32,Var 31,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1024") 4 Private (TVar (-42)) (Rule [18,32,31,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 31) [Branch (Pattern ("XML","XElem") [33,34,35]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1023") [Var 18,Var 32,Var 34,Var 35,Var 33,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1023") 6 Private (TVar (-42)) (Rule [18,32,34,35,33,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 33) [Branch (Pattern ("Prelude",":") [36,37]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1022") [Var 18,Var 32,Var 34,Var 35,Var 37,Var 36,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1022") 7 Private (TVar (-42)) (Rule [18,32,34,35,37,36,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 36) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1021") [Var 18,Var 32,Var 34,Var 35,Var 37,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1021") 6 Private (TVar (-42)) (Rule [18,32,34,35,37,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 37) [Branch (Pattern ("Prelude",":") [38,39]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1020") [Var 18,Var 32,Var 34,Var 35,Var 39,Var 38,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1020") 7 Private (TVar (-42)) (Rule [18,32,34,35,39,38,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 38) [Branch (LPattern (Charc 'm')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1019") [Var 18,Var 32,Var 34,Var 35,Var 39,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1019") 6 Private (TVar (-42)) (Rule [18,32,34,35,39,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 39) [Branch (Pattern ("Prelude",":") [40,41]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1018") [Var 18,Var 32,Var 34,Var 35,Var 41,Var 40,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1018") 7 Private (TVar (-42)) (Rule [18,32,34,35,41,40,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 40) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1017") [Var 18,Var 32,Var 34,Var 35,Var 41,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1017") 6 Private (TVar (-42)) (Rule [18,32,34,35,41,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 41) [Branch (Pattern ("Prelude",":") [42,43]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1016") [Var 18,Var 32,Var 34,Var 35,Var 43,Var 42,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1016") 7 Private (TVar (-42)) (Rule [18,32,34,35,43,42,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 42) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1015") [Var 18,Var 32,Var 34,Var 35,Var 43,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1015") 6 Private (TVar (-42)) (Rule [18,32,34,35,43,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 43) [Branch (Pattern ("Prelude",":") [44,45]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1014") [Var 18,Var 32,Var 34,Var 35,Var 45,Var 44,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1014") 7 Private (TVar (-42)) (Rule [18,32,34,35,45,44,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 44) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1013") [Var 18,Var 32,Var 34,Var 35,Var 45,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1013") 6 Private (TVar (-42)) (Rule [18,32,34,35,45,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 45) [Branch (Pattern ("Prelude",":") [46,47]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1012") [Var 18,Var 32,Var 34,Var 35,Var 47,Var 46,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1012") 7 Private (TVar (-42)) (Rule [18,32,34,35,47,46,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 46) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1011") [Var 18,Var 32,Var 34,Var 35,Var 47,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1011") 6 Private (TVar (-42)) (Rule [18,32,34,35,47,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 47) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1010") [Var 18,Var 32,Var 35,Var 34,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1010") 5 Private (TVar (-42)) (Rule [18,32,35,34,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 34) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1009") [Var 18,Var 35,Var 32,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1009") 4 Private (TVar (-42)) (Rule [18,35,32,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 32) [Branch (Pattern ("Prelude",":") [48,49]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1008") [Var 18,Var 35,Var 49,Var 48,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1008") 5 Private (TVar (-42)) (Rule [18,35,49,48,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 48) [Branch (Pattern ("XML","XElem") [50,51,52]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1007") [Var 18,Var 35,Var 49,Var 51,Var 52,Var 50,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1007") 7 Private (TVar (-42)) (Rule [18,35,49,51,52,50,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 50) [Branch (Pattern ("Prelude",":") [53,54]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1006") [Var 18,Var 35,Var 49,Var 51,Var 52,Var 54,Var 53,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1006") 8 Private (TVar (-42)) (Rule [18,35,49,51,52,54,53,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 53) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1005") [Var 18,Var 35,Var 49,Var 51,Var 52,Var 54,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1005") 7 Private (TVar (-42)) (Rule [18,35,49,51,52,54,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 54) [Branch (Pattern ("Prelude",":") [55,56]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1004") [Var 18,Var 35,Var 49,Var 51,Var 52,Var 56,Var 55,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1004") 8 Private (TVar (-42)) (Rule [18,35,49,51,52,56,55,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 55) [Branch (LPattern (Charc 'y')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1003") [Var 18,Var 35,Var 49,Var 51,Var 52,Var 56,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1003") 7 Private (TVar (-42)) (Rule [18,35,49,51,52,56,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 56) [Branch (Pattern ("Prelude",":") [57,58]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1002") [Var 18,Var 35,Var 49,Var 51,Var 52,Var 58,Var 57,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1002") 8 Private (TVar (-42)) (Rule [18,35,49,51,52,58,57,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 57) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1001") [Var 18,Var 35,Var 49,Var 51,Var 52,Var 58,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1001") 7 Private (TVar (-42)) (Rule [18,35,49,51,52,58,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 58) [Branch (Pattern ("Prelude",":") [59,60]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1000") [Var 18,Var 35,Var 49,Var 51,Var 52,Var 60,Var 59,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1000") 8 Private (TVar (-42)) (Rule [18,35,49,51,52,60,59,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 59) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_999") [Var 18,Var 35,Var 49,Var 51,Var 52,Var 60,Var 1]])]])),Func ("OracleFlatCurryXML","_case_999") 7 Private (TVar (-42)) (Rule [18,35,49,51,52,60,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 60) [Branch (Pattern ("Prelude",":") [61,62]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_998") [Var 18,Var 35,Var 49,Var 51,Var 52,Var 62,Var 61,Var 1]])]])),Func ("OracleFlatCurryXML","_case_998") 8 Private (TVar (-42)) (Rule [18,35,49,51,52,62,61,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 61) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_997") [Var 18,Var 35,Var 49,Var 51,Var 52,Var 62,Var 1]])]])),Func ("OracleFlatCurryXML","_case_997") 7 Private (TVar (-42)) (Rule [18,35,49,51,52,62,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 62) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_996") [Var 18,Var 35,Var 49,Var 52,Var 51,Var 1]])]])),Func ("OracleFlatCurryXML","_case_996") 6 Private (TVar (-42)) (Rule [18,35,49,52,51,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 51) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_995") [Var 18,Var 35,Var 52,Var 49,Var 1]])]])),Func ("OracleFlatCurryXML","_case_995") 5 Private (TVar (-42)) (Rule [18,35,52,49,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 49) [Branch (Pattern ("Prelude",":") [63,64]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_994") [Var 18,Var 35,Var 52,Var 64,Var 63,Var 1]])]])),Func ("OracleFlatCurryXML","_case_994") 6 Private (TVar (-42)) (Rule [18,35,52,64,63,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 63) [Branch (Pattern ("XML","XElem") [65,66,67]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_993") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 65,Var 1]])]])),Func ("OracleFlatCurryXML","_case_993") 8 Private (TVar (-42)) (Rule [18,35,52,64,66,67,65,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 65) [Branch (Pattern ("Prelude",":") [68,69]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_992") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 69,Var 68,Var 1]])]])),Func ("OracleFlatCurryXML","_case_992") 9 Private (TVar (-42)) (Rule [18,35,52,64,66,67,69,68,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 68) [Branch (LPattern (Charc 'f')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_991") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 69,Var 1]])]])),Func ("OracleFlatCurryXML","_case_991") 8 Private (TVar (-42)) (Rule [18,35,52,64,66,67,69,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 69) [Branch (Pattern ("Prelude",":") [70,71]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_990") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 71,Var 70,Var 1]])]])),Func ("OracleFlatCurryXML","_case_990") 9 Private (TVar (-42)) (Rule [18,35,52,64,66,67,71,70,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 70) [Branch (LPattern (Charc 'u')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_989") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 71,Var 1]])]])),Func ("OracleFlatCurryXML","_case_989") 8 Private (TVar (-42)) (Rule [18,35,52,64,66,67,71,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 71) [Branch (Pattern ("Prelude",":") [72,73]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_988") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 73,Var 72,Var 1]])]])),Func ("OracleFlatCurryXML","_case_988") 9 Private (TVar (-42)) (Rule [18,35,52,64,66,67,73,72,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 72) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_987") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 73,Var 1]])]])),Func ("OracleFlatCurryXML","_case_987") 8 Private (TVar (-42)) (Rule [18,35,52,64,66,67,73,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 73) [Branch (Pattern ("Prelude",":") [74,75]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_986") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 75,Var 74,Var 1]])]])),Func ("OracleFlatCurryXML","_case_986") 9 Private (TVar (-42)) (Rule [18,35,52,64,66,67,75,74,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 74) [Branch (LPattern (Charc 'c')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_985") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 75,Var 1]])]])),Func ("OracleFlatCurryXML","_case_985") 8 Private (TVar (-42)) (Rule [18,35,52,64,66,67,75,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 75) [Branch (Pattern ("Prelude",":") [76,77]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_984") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 77,Var 76,Var 1]])]])),Func ("OracleFlatCurryXML","_case_984") 9 Private (TVar (-42)) (Rule [18,35,52,64,66,67,77,76,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 76) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_983") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 77,Var 1]])]])),Func ("OracleFlatCurryXML","_case_983") 8 Private (TVar (-42)) (Rule [18,35,52,64,66,67,77,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 77) [Branch (Pattern ("Prelude",":") [78,79]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_982") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 79,Var 78,Var 1]])]])),Func ("OracleFlatCurryXML","_case_982") 9 Private (TVar (-42)) (Rule [18,35,52,64,66,67,79,78,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 78) [Branch (LPattern (Charc 'i')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_981") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 79,Var 1]])]])),Func ("OracleFlatCurryXML","_case_981") 8 Private (TVar (-42)) (Rule [18,35,52,64,66,67,79,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 79) [Branch (Pattern ("Prelude",":") [80,81]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_980") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 81,Var 80,Var 1]])]])),Func ("OracleFlatCurryXML","_case_980") 9 Private (TVar (-42)) (Rule [18,35,52,64,66,67,81,80,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 80) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_979") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 81,Var 1]])]])),Func ("OracleFlatCurryXML","_case_979") 8 Private (TVar (-42)) (Rule [18,35,52,64,66,67,81,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 81) [Branch (Pattern ("Prelude",":") [82,83]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_978") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 83,Var 82,Var 1]])]])),Func ("OracleFlatCurryXML","_case_978") 9 Private (TVar (-42)) (Rule [18,35,52,64,66,67,83,82,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 82) [Branch (LPattern (Charc 'n')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_977") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 83,Var 1]])]])),Func ("OracleFlatCurryXML","_case_977") 8 Private (TVar (-42)) (Rule [18,35,52,64,66,67,83,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 83) [Branch (Pattern ("Prelude",":") [84,85]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_976") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 85,Var 84,Var 1]])]])),Func ("OracleFlatCurryXML","_case_976") 9 Private (TVar (-42)) (Rule [18,35,52,64,66,67,85,84,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 84) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_975") [Var 18,Var 35,Var 52,Var 64,Var 66,Var 67,Var 85,Var 1]])]])),Func ("OracleFlatCurryXML","_case_975") 8 Private (TVar (-42)) (Rule [18,35,52,64,66,67,85,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 85) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_974") [Var 18,Var 35,Var 52,Var 64,Var 67,Var 66,Var 1]])]])),Func ("OracleFlatCurryXML","_case_974") 7 Private (TVar (-42)) (Rule [18,35,52,64,67,66,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 66) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_973") [Var 18,Var 35,Var 52,Var 67,Var 64,Var 1]])]])),Func ("OracleFlatCurryXML","_case_973") 6 Private (TVar (-42)) (Rule [18,35,52,67,64,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 64) [Branch (Pattern ("Prelude",":") [86,87]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_972") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 86,Var 1]])]])),Func ("OracleFlatCurryXML","_case_972") 7 Private (TVar (-42)) (Rule [18,35,52,67,87,86,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 86) [Branch (Pattern ("XML","XElem") [88,89,90]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_971") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 88,Var 1]])]])),Func ("OracleFlatCurryXML","_case_971") 9 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,88,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 88) [Branch (Pattern ("Prelude",":") [91,92]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_970") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 92,Var 91,Var 1]])]])),Func ("OracleFlatCurryXML","_case_970") 10 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,92,91,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 91) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_969") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 92,Var 1]])]])),Func ("OracleFlatCurryXML","_case_969") 9 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,92,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 92) [Branch (Pattern ("Prelude",":") [93,94]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_968") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 94,Var 93,Var 1]])]])),Func ("OracleFlatCurryXML","_case_968") 10 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,94,93,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 93) [Branch (LPattern (Charc 'p')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_967") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 94,Var 1]])]])),Func ("OracleFlatCurryXML","_case_967") 9 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,94,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 94) [Branch (Pattern ("Prelude",":") [95,96]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_966") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 96,Var 95,Var 1]])]])),Func ("OracleFlatCurryXML","_case_966") 10 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,96,95,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 95) [Branch (LPattern (Charc 'e')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_965") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 96,Var 1]])]])),Func ("OracleFlatCurryXML","_case_965") 9 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,96,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 96) [Branch (Pattern ("Prelude",":") [97,98]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_964") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 98,Var 97,Var 1]])]])),Func ("OracleFlatCurryXML","_case_964") 10 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,98,97,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 97) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_963") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 98,Var 1]])]])),Func ("OracleFlatCurryXML","_case_963") 9 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,98,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 98) [Branch (Pattern ("Prelude",":") [99,100]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_962") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 100,Var 99,Var 1]])]])),Func ("OracleFlatCurryXML","_case_962") 10 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,100,99,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 99) [Branch (LPattern (Charc 'a')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_961") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 100,Var 1]])]])),Func ("OracleFlatCurryXML","_case_961") 9 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,100,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 100) [Branch (Pattern ("Prelude",":") [101,102]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_960") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 102,Var 101,Var 1]])]])),Func ("OracleFlatCurryXML","_case_960") 10 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,102,101,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 101) [Branch (LPattern (Charc 't')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_959") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 102,Var 1]])]])),Func ("OracleFlatCurryXML","_case_959") 9 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,102,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 102) [Branch (Pattern ("Prelude",":") [103,104]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_958") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 104,Var 103,Var 1]])]])),Func ("OracleFlatCurryXML","_case_958") 10 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,104,103,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 103) [Branch (LPattern (Charc 'o')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_957") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 104,Var 1]])]])),Func ("OracleFlatCurryXML","_case_957") 9 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,104,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 104) [Branch (Pattern ("Prelude",":") [105,106]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_956") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 106,Var 105,Var 1]])]])),Func ("OracleFlatCurryXML","_case_956") 10 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,106,105,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 105) [Branch (LPattern (Charc 'r')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_955") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 106,Var 1]])]])),Func ("OracleFlatCurryXML","_case_955") 9 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,106,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 106) [Branch (Pattern ("Prelude",":") [107,108]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_954") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 108,Var 107,Var 1]])]])),Func ("OracleFlatCurryXML","_case_954") 10 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,108,107,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 107) [Branch (LPattern (Charc 's')) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_953") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 89,Var 90,Var 108,Var 1]])]])),Func ("OracleFlatCurryXML","_case_953") 9 Private (TVar (-42)) (Rule [18,35,52,67,87,89,90,108,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 108) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_952") [Var 18,Var 35,Var 52,Var 67,Var 87,Var 90,Var 89,Var 1]])]])),Func ("OracleFlatCurryXML","_case_952") 8 Private (TVar (-42)) (Rule [18,35,52,67,87,90,89,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 89) [Branch (Pattern ("Prelude","[]") []) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_951") [Var 18,Var 35,Var 52,Var 67,Var 90,Var 87,Var 1]])]])),Func ("OracleFlatCurryXML","_case_951") 7 Private (TVar (-42)) (Rule [18,35,52,67,90,87,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 87) [Branch (Pattern ("Prelude","[]") []) (Let [(91,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(92,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(93,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(94,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 91,Comb ConsCall ("Prelude",":") [Var 92,Comb ConsCall ("Prelude",":") [Var 93,Comb ConsCall ("Prelude",":") [Var 94,Comb ConsCall ("Prelude","[]") []]]]],Comb ConsCall ("FlatCurry","Prog") [Comb FuncCall ("OracleXML","textOfXml") [Var 18,Var 1],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xml2FlatCurry._#lambda5") []],Var 35,Var 91],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatx2typedecl") []],Var 52,Var 92],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xml2FlatCurry._#lambda6") []],Var 67,Var 93],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xml2FlatCurry._#lambda7") []],Var 90,Var 94]]]))]])),Func ("OracleFlatCurryXML","_case_1053") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("FlatCurry","Op") [3,4,5]) (Let [(6,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(7,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(8,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 6,Comb ConsCall ("Prelude",":") [Var 7,Comb ConsCall ("Prelude",":") [Var 8,Comb ConsCall ("Prelude","[]") []]]],Comb ConsCall ("XML","XElem") [Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude","[]") []]],Comb FuncCall ("OraclePrelude","++") [Comb FuncCall ("OracleFlatCurryXML","qname2xmlattrs") [Var 3,Var 1],Comb ConsCall ("Prelude",":") [Comb ConsCall ("Prelude","(,)") [Comb ConsCall ("Prelude",":") [Lit (Charc 'f'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'x'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'y'),Comb ConsCall ("Prelude","[]") []]]]]]],Comb FuncCall ("OraclePrelude","show") [Var 4,Var 6]],Comb ConsCall ("Prelude",":") [Comb ConsCall ("Prelude","(,)") [Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude","[]") []]]]],Comb FuncCall ("OraclePrelude","show") [Var 5,Var 7]],Comb ConsCall ("Prelude","[]") []]],Var 8],Comb ConsCall ("Prelude","[]") []]]))]])),Func ("OracleFlatCurryXML","_case_1055") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("FlatCurry","Branch") [3,4]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1054") [Var 4,Var 3,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1054") 3 Private (TVar (-42)) (Rule [4,3,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 3) [Branch (Pattern ("FlatCurry","Pattern") [5,6]) (Let [(8,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(9,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(10,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 8,Comb ConsCall ("Prelude",":") [Var 9,Comb ConsCall ("Prelude",":") [Var 10,Comb ConsCall ("Prelude","[]") []]]],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'b'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'h'),Comb ConsCall ("Prelude","[]") []]]]]]],Comb ConsCall ("Prelude",":") [Comb ConsCall ("XML","XElem") [Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude","[]") []]]]]]]],Comb FuncCall ("OracleFlatCurryXML","qname2xmlattrs") [Var 5,Var 1],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowVar") []],Var 6,Var 8]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowExpr") [Var 4,Var 9],Comb ConsCall ("Prelude","[]") []]],Var 10]])),Branch (Pattern ("FlatCurry","LPattern") [7]) (Let [(11,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(12,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(13,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 11,Comb ConsCall ("Prelude",":") [Var 12,Comb ConsCall ("Prelude",":") [Var 13,Comb ConsCall ("Prelude","[]") []]]],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'b'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'h'),Comb ConsCall ("Prelude","[]") []]]]]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude","[]") []]]]]]]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowLit") [Var 7,Var 1],Comb ConsCall ("Prelude","[]") []],Var 11],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowExpr") [Var 4,Var 12],Comb ConsCall ("Prelude","[]") []]],Var 13]]))]])),Func ("OracleFlatCurryXML","_case_1056") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("FlatCurry","Intc") [3]) (Let [(6,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(7,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 6,Comb ConsCall ("Prelude",":") [Var 7,Comb ConsCall ("Prelude","[]") []]],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude","[]") []]]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xtxt") [Comb FuncCall ("OraclePrelude","show") [Var 3,Var 1],Var 6],Comb ConsCall ("Prelude","[]") []],Var 7]])),Branch (Pattern ("FlatCurry","Floatc") [4]) (Let [(8,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(9,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 8,Comb ConsCall ("Prelude",":") [Var 9,Comb ConsCall ("Prelude","[]") []]],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'f'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude","[]") []]]]]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xtxt") [Comb FuncCall ("OraclePrelude","show") [Var 4,Var 1],Var 8],Comb ConsCall ("Prelude","[]") []],Var 9]])),Branch (Pattern ("FlatCurry","Charc") [5]) (Let [(10,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(11,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(12,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 10,Comb ConsCall ("Prelude",":") [Var 11,Comb ConsCall ("Prelude",":") [Var 12,Comb ConsCall ("Prelude","[]") []]]],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'h'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude","[]") []]]]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xtxt") [Comb FuncCall ("OraclePrelude","show") [Comb FuncCall ("OraclePrelude","ord") [Var 5,Var 1],Var 10],Var 11],Comb ConsCall ("Prelude","[]") []],Var 12]]))]])),Func ("OracleFlatCurryXML","_case_1057") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("Prelude","(,)") [3,4]) (Let [(5,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(6,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 5,Comb ConsCall ("Prelude",":") [Var 6,Comb ConsCall ("Prelude","[]") []]],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'b'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'd'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'g'),Comb ConsCall ("Prelude","[]") []]]]]]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowVar") [Var 3,Var 1],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowExpr") [Var 4,Var 5],Comb ConsCall ("Prelude","[]") []]],Var 6]]))]])),Func ("OracleFlatCurryXML","_case_1060") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("FlatCurry","Var") [3]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","xmlShowVar") [Var 3,Var 1]]),Branch (Pattern ("FlatCurry","Lit") [4]) (Let [(19,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 19,Comb ConsCall ("Prelude","[]") []],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude","[]") []]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowLit") [Var 4,Var 1],Comb ConsCall ("Prelude","[]") []],Var 19]])),Branch (Pattern ("FlatCurry","Comb") [5,6,7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","_case_1059") [Var 6,Var 7,Var 5,Var 1]]),Branch (Pattern ("FlatCurry","Free") [10,11]) (Let [(20,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(21,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(22,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 20,Comb ConsCall ("Prelude",":") [Var 21,Comb ConsCall ("Prelude",":") [Var 22,Comb ConsCall ("Prelude","[]") []]]],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'f'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude","[]") []]]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'f'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'v'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude","[]") []]]]]]]]],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowVar") []],Var 10,Var 1],Var 20],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowExpr") [Var 11,Var 21],Comb ConsCall ("Prelude","[]") []]],Var 22]])),Branch (Pattern ("FlatCurry","Or") [12,13]) (Let [(23,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(24,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 23,Comb ConsCall ("Prelude",":") [Var 24,Comb ConsCall ("Prelude","[]") []]],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude","[]") []]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowExpr") [Var 12,Var 1],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowExpr") [Var 13,Var 23],Comb ConsCall ("Prelude","[]") []]],Var 24]])),Branch (Pattern ("FlatCurry","Case") [14,15,16]) (Let [(25,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(26,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(27,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(28,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 25,Comb ConsCall ("Prelude",":") [Var 26,Comb ConsCall ("Prelude",":") [Var 27,Comb ConsCall ("Prelude",":") [Var 28,Comb ConsCall ("Prelude","[]") []]]]],Comb ConsCall ("XML","XElem") [Comb FuncCall ("OracleFlatCurryXML","_case_1058") [Var 14,Comb FuncCall ("OraclePrelude","==") [Var 14,Comb ConsCall ("FlatCurry","Flex") [],Var 1],Var 25],Comb ConsCall ("Prelude","[]") [],Comb FuncCall ("OraclePrelude","++") [Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowExpr") [Var 15,Var 26],Comb ConsCall ("Prelude","[]") []],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowBranch") []],Var 16,Var 27],Var 28]]])),Branch (Pattern ("FlatCurry","Let") [17,18]) (Let [(29,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(30,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(31,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 29,Comb ConsCall ("Prelude",":") [Var 30,Comb ConsCall ("Prelude",":") [Var 31,Comb ConsCall ("Prelude","[]") []]]],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude","[]") []]]]]]],Comb FuncCall ("OraclePrelude","++") [Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowExpr._#lambda3") []],Var 17,Var 1],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowExpr") [Var 18,Var 29],Comb ConsCall ("Prelude","[]") []],Var 30],Var 31]]))]])),Func ("OracleFlatCurryXML","_case_1058") 3 Private (TVar (-42)) (Rule [14,15,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Rigid (Var 15) [Branch (Pattern ("Prelude","True") []) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Comb ConsCall ("Prelude",":") [Lit (Charc 'f'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude","[]") []]]]]]]),Branch (Pattern ("Prelude","False") []) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude","[]") []]]]]])]])),Func ("OracleFlatCurryXML","_case_1059") 4 Private (TVar (-42)) (Rule [6,7,5,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 5) [Branch (Pattern ("FlatCurry","FuncCall") []) (Let [(10,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 10,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("XML","XElem") [Comb ConsCall ("Prelude",":") [Lit (Charc 'f'),Comb ConsCall ("Prelude",":") [Lit (Charc 'u'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude","[]") []]]]]]]]],Comb FuncCall ("OracleFlatCurryXML","qname2xmlattrs") [Var 6,Var 1],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowExpr") []],Var 7,Var 10]]])),Branch (Pattern ("FlatCurry","ConsCall") []) (Let [(11,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 11,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("XML","XElem") [Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude","[]") []]]]]]]]],Comb FuncCall ("OracleFlatCurryXML","qname2xmlattrs") [Var 6,Var 1],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowExpr") []],Var 7,Var 11]]])),Branch (Pattern ("FlatCurry","FuncPartCall") [8]) (Let [(12,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(13,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(14,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 12,Comb ConsCall ("Prelude",":") [Var 13,Comb ConsCall ("Prelude",":") [Var 14,Comb ConsCall ("Prelude","[]") []]]],Comb ConsCall ("XML","XElem") [Comb ConsCall ("Prelude",":") [Lit (Charc 'f'),Comb ConsCall ("Prelude",":") [Lit (Charc 'u'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude","[]") []]]]]]]]]]]]],Comb FuncCall ("OraclePrelude","++") [Comb FuncCall ("OracleFlatCurryXML","qname2xmlattrs") [Var 6,Var 1],Comb ConsCall ("Prelude",":") [Comb ConsCall ("Prelude","(,)") [Comb ConsCall ("Prelude",":") [Lit (Charc 'm'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'g'),Comb ConsCall ("Prelude","[]") []]]]]]]],Comb FuncCall ("OraclePrelude","show") [Var 8,Var 12]],Comb ConsCall ("Prelude","[]") []],Var 13],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowExpr") []],Var 7,Var 14]]])),Branch (Pattern ("FlatCurry","ConsPartCall") [9]) (Let [(15,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(16,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(17,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 15,Comb ConsCall ("Prelude",":") [Var 16,Comb ConsCall ("Prelude",":") [Var 17,Comb ConsCall ("Prelude","[]") []]]],Comb ConsCall ("XML","XElem") [Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude","[]") []]]]]]]]]]]]],Comb FuncCall ("OraclePrelude","++") [Comb FuncCall ("OracleFlatCurryXML","qname2xmlattrs") [Var 6,Var 1],Comb ConsCall ("Prelude",":") [Comb ConsCall ("Prelude","(,)") [Comb ConsCall ("Prelude",":") [Lit (Charc 'm'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'g'),Comb ConsCall ("Prelude","[]") []]]]]]]],Comb FuncCall ("OraclePrelude","show") [Var 9,Var 15]],Comb ConsCall ("Prelude","[]") []],Var 16],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowExpr") []],Var 7,Var 17]]]))]])),Func ("OracleFlatCurryXML","_case_1061") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("FlatCurry","Rule") [3,4]) (Let [(6,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(7,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(8,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(9,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 6,Comb ConsCall ("Prelude",":") [Var 7,Comb ConsCall ("Prelude",":") [Var 8,Comb ConsCall ("Prelude",":") [Var 9,Comb ConsCall ("Prelude","[]") []]]]],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'u'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude","[]") []]]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'h'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude","[]") []]]],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowVar") []],Var 3,Var 1],Var 6],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'h'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude","[]") []]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowExpr") [Var 4,Var 7],Comb ConsCall ("Prelude","[]") []],Var 8],Comb ConsCall ("Prelude","[]") []]],Var 9]])),Branch (Pattern ("FlatCurry","External") [5]) (Let [(10,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 10,Comb ConsCall ("Prelude","[]") []],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'x'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude","[]") []]]]]]]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xtxt") [Var 5,Var 1],Comb ConsCall ("Prelude","[]") []],Var 10]]))]])),Func ("OracleFlatCurryXML","_case_1062") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("FlatCurry","Func") [3,4,5,6,7]) (Let [(8,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(9,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(10,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(11,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(12,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(13,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 8,Comb ConsCall ("Prelude",":") [Var 9,Comb ConsCall ("Prelude",":") [Var 10,Comb ConsCall ("Prelude",":") [Var 11,Comb ConsCall ("Prelude",":") [Var 12,Comb ConsCall ("Prelude",":") [Var 13,Comb ConsCall ("Prelude","[]") []]]]]]],Comb ConsCall ("XML","XElem") [Comb ConsCall ("Prelude",":") [Lit (Charc 'f'),Comb ConsCall ("Prelude",":") [Lit (Charc 'u'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude","[]") []]]]],Comb FuncCall ("OraclePrelude","++") [Comb FuncCall ("OracleFlatCurryXML","qname2xmlattrs") [Var 3,Var 1],Comb FuncCall ("OraclePrelude","++") [Comb ConsCall ("Prelude",":") [Comb ConsCall ("Prelude","(,)") [Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'y'),Comb ConsCall ("Prelude","[]") []]]]]],Comb FuncCall ("OraclePrelude","show") [Var 4,Var 8]],Comb ConsCall ("Prelude","[]") []],Comb FuncCall ("OracleFlatCurryXML","xmlShowVisibity") [Var 5,Var 9],Var 10],Var 11],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowTypeExpr") [Var 6,Var 12],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowRule") [Var 7,Var 13],Comb ConsCall ("Prelude","[]") []]]]]))]])),Func ("OracleFlatCurryXML","_case_1063") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("FlatCurry","FuncType") [3,4]) (Let [(8,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(9,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 8,Comb ConsCall ("Prelude",":") [Var 9,Comb ConsCall ("Prelude","[]") []]],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'f'),Comb ConsCall ("Prelude",":") [Lit (Charc 'u'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'y'),Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude","[]") []]]]]]]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowTypeExpr") [Var 3,Var 1],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowTypeExpr") [Var 4,Var 8],Comb ConsCall ("Prelude","[]") []]],Var 9]])),Branch (Pattern ("FlatCurry","TCons") [5,6]) (Let [(10,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 10,Comb ConsCall ("Prelude","[]") []],Comb ConsCall ("XML","XElem") [Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude","[]") []]]]]],Comb FuncCall ("OracleFlatCurryXML","qname2xmlattrs") [Var 5,Var 1],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowTypeExpr") []],Var 6,Var 10]]])),Branch (Pattern ("FlatCurry","TVar") [7]) (Comb FuncCall ("CEventOracle","replace") [Var 1,Comb FuncCall ("OracleFlatCurryXML","xmlShowTVar") [Var 7,Var 1]])]])),Func ("OracleFlatCurryXML","_case_1064") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("FlatCurry","Cons") [3,4,5,6]) (Let [(7,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(8,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(9,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(10,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(11,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 7,Comb ConsCall ("Prelude",":") [Var 8,Comb ConsCall ("Prelude",":") [Var 9,Comb ConsCall ("Prelude",":") [Var 10,Comb ConsCall ("Prelude",":") [Var 11,Comb ConsCall ("Prelude","[]") []]]]]],Comb ConsCall ("XML","XElem") [Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude","[]") []]]]],Comb FuncCall ("OraclePrelude","++") [Comb FuncCall ("OracleFlatCurryXML","qname2xmlattrs") [Var 3,Var 1],Comb FuncCall ("OraclePrelude","++") [Comb ConsCall ("Prelude",":") [Comb ConsCall ("Prelude","(,)") [Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'y'),Comb ConsCall ("Prelude","[]") []]]]]],Comb FuncCall ("OraclePrelude","show") [Var 4,Var 7]],Comb ConsCall ("Prelude","[]") []],Comb FuncCall ("OracleFlatCurryXML","xmlShowVisibity") [Var 5,Var 8],Var 9],Var 10],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowTypeExpr") []],Var 6,Var 11]]]))]])),Func ("OracleFlatCurryXML","_case_1065") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("FlatCurry","Type") [3,4,5,6]) (Let [(11,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(12,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(13,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(14,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(15,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(16,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 11,Comb ConsCall ("Prelude",":") [Var 12,Comb ConsCall ("Prelude",":") [Var 13,Comb ConsCall ("Prelude",":") [Var 14,Comb ConsCall ("Prelude",":") [Var 15,Comb ConsCall ("Prelude",":") [Var 16,Comb ConsCall ("Prelude","[]") []]]]]]],Comb ConsCall ("XML","XElem") [Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'y'),Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude","[]") []]]]],Comb FuncCall ("OraclePrelude","++") [Comb FuncCall ("OracleFlatCurryXML","qname2xmlattrs") [Var 3,Var 1],Comb FuncCall ("OracleFlatCurryXML","xmlShowVisibity") [Var 4,Var 11],Var 12],Comb FuncCall ("OraclePrelude","++") [Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'm'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude","[]") []]]]]]],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowTVar") []],Var 5,Var 13],Var 14],Comb ConsCall ("Prelude","[]") []],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowCons") []],Var 6,Var 15],Var 16]]])),Branch (Pattern ("FlatCurry","TypeSyn") [7,8,9,10]) (Let [(17,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(18,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(19,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(20,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(21,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 17,Comb ConsCall ("Prelude",":") [Var 18,Comb ConsCall ("Prelude",":") [Var 19,Comb ConsCall ("Prelude",":") [Var 20,Comb ConsCall ("Prelude",":") [Var 21,Comb ConsCall ("Prelude","[]") []]]]]],Comb ConsCall ("XML","XElem") [Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'y'),Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc 'y'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude","[]") []]]]]]]],Comb FuncCall ("OraclePrelude","++") [Comb FuncCall ("OracleFlatCurryXML","qname2xmlattrs") [Var 7,Var 1],Comb FuncCall ("OracleFlatCurryXML","xmlShowVisibity") [Var 8,Var 17],Var 18],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'm'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude","[]") []]]]]]],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowTVar") []],Var 9,Var 19],Var 20],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleFlatCurryXML","xmlShowTypeExpr") [Var 10,Var 21],Comb ConsCall ("Prelude","[]") []]]]]))]])),Func ("OracleFlatCurryXML","_case_1066") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("FlatCurry","Public") []) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Comb ConsCall ("Prelude",":") [Comb ConsCall ("Prelude","(,)") [Comb ConsCall ("Prelude",":") [Lit (Charc 'v'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'b'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'y'),Comb ConsCall ("Prelude","[]") []]]]]]]]]]],Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'u'),Comb ConsCall ("Prelude",":") [Lit (Charc 'b'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude","[]") []]]]]]]],Comb ConsCall ("Prelude","[]") []]]),Branch (Pattern ("FlatCurry","Private") []) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Comb ConsCall ("Prelude",":") [Comb ConsCall ("Prelude","(,)") [Comb ConsCall ("Prelude",":") [Lit (Charc 'v'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'b'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'y'),Comb ConsCall ("Prelude","[]") []]]]]]]]]]],Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'v'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude","[]") []]]]]]]]],Comb ConsCall ("Prelude","[]") []]])]])),Func ("OracleFlatCurryXML","_case_1067") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("Prelude","(,)") [3,4]) (Comb FuncCall ("CEventOracle","collapse") [Var 1,Comb ConsCall ("Prelude",":") [Comb ConsCall ("Prelude","(,)") [Comb ConsCall ("Prelude",":") [Lit (Charc 'm'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'd'),Comb ConsCall ("Prelude",":") [Lit (Charc 'u'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude","[]") []]]]]]],Var 3],Comb ConsCall ("Prelude",":") [Comb ConsCall ("Prelude","(,)") [Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 'm'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude","[]") []]]]],Var 4],Comb ConsCall ("Prelude","[]") []]]])]])),Func ("OracleFlatCurryXML","_case_1068") 2 Private (TVar (-42)) (Rule [2,1] (Comb FuncCall ("CEventOracle","replace") [Var 1,Case Flex (Var 2) [Branch (Pattern ("FlatCurry","Prog") [3,4,5,6,7]) (Let [(8,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(9,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(10,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(11,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(12,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(13,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(14,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(15,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(16,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []]),(17,Comb FuncCall ("CEventOracle","fresh") [Comb ConsCall ("Prelude","()") []])] (Comb FuncCall ("CEventOracle","expand") [Var 1,Comb ConsCall ("Prelude",":") [Var 8,Comb ConsCall ("Prelude",":") [Var 9,Comb ConsCall ("Prelude",":") [Var 10,Comb ConsCall ("Prelude",":") [Var 11,Comb ConsCall ("Prelude",":") [Var 12,Comb ConsCall ("Prelude",":") [Var 13,Comb ConsCall ("Prelude",":") [Var 14,Comb ConsCall ("Prelude",":") [Var 15,Comb ConsCall ("Prelude",":") [Var 16,Comb ConsCall ("Prelude",":") [Var 17,Comb ConsCall ("Prelude","[]") []]]]]]]]]]],Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'g'),Comb ConsCall ("Prelude","[]") []]]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'm'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'd'),Comb ConsCall ("Prelude",":") [Lit (Charc 'u'),Comb ConsCall ("Prelude",":") [Lit (Charc 'l'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude","[]") []]]]]]],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xtxt") [Var 3,Var 1],Comb ConsCall ("Prelude","[]") []],Var 8],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'm'),Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude","[]") []]]]]]],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","flatCurry2Xml._#lambda2") []],Var 4,Var 9],Var 10],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'y'),Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude","[]") []]]]]],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowType") []],Var 5,Var 11],Var 12],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'f'),Comb ConsCall ("Prelude",":") [Lit (Charc 'u'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 'c'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'i'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'n'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude","[]") []]]]]]]]]],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowFunc") []],Var 6,Var 13],Var 14],Comb ConsCall ("Prelude",":") [Comb FuncCall ("OracleXML","xml") [Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'p'),Comb ConsCall ("Prelude",":") [Lit (Charc 'e'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 'a'),Comb ConsCall ("Prelude",":") [Lit (Charc 't'),Comb ConsCall ("Prelude",":") [Lit (Charc 'o'),Comb ConsCall ("Prelude",":") [Lit (Charc 'r'),Comb ConsCall ("Prelude",":") [Lit (Charc 's'),Comb ConsCall ("Prelude","[]") []]]]]]]]]],Comb FuncCall ("OraclePrelude","map") [Comb (FuncPartCall 2) ("Oracle","partFunc") [Comb (FuncPartCall 2) ("OracleFlatCurryXML","xmlShowOp") []],Var 7,Var 15],Var 16],Comb ConsCall ("Prelude","[]") []]]]]],Var 17]]))]]))] []