; @origtpdbfilename ./TRS/TRCSR/PALINDROME_complete_iGM.trs
; @xtcfilename "./TRS_Standard/Transformed_CSR_04/PALINDROME_complete_iGM.xml"
(format TRS)
(fun active 1)
(fun __ 2)
(fun mark 1)
(fun nil 0)
(fun U11 2)
(fun tt 0)
(fun U12 1)
(fun isNeList 1)
(fun U21 3)
(fun U22 2)
(fun isList 1)
(fun U23 1)
(fun U31 2)
(fun U32 1)
(fun isQid 1)
(fun U41 3)
(fun U42 2)
(fun U43 1)
(fun U51 3)
(fun U52 2)
(fun U53 1)
(fun U61 2)
(fun U62 1)
(fun U71 2)
(fun U72 1)
(fun isNePal 1)
(fun and 2)
(fun isPalListKind 1)
(fun isPal 1)
(fun a 0)
(fun e 0)
(fun i 0)
(fun o 0)
(fun u 0)
(rule (active (__ (__ X Y) Z)) (mark (__ X (__ Y Z))))
(rule (active (__ X nil)) (mark X))
(rule (active (__ nil X)) (mark X))
(rule (active (U11 tt V)) (mark (U12 (isNeList V))))
(rule (active (U12 tt)) (mark tt))
(rule (active (U21 tt V1 V2)) (mark (U22 (isList V1) V2)))
(rule (active (U22 tt V2)) (mark (U23 (isList V2))))
(rule (active (U23 tt)) (mark tt))
(rule (active (U31 tt V)) (mark (U32 (isQid V))))
(rule (active (U32 tt)) (mark tt))
(rule (active (U41 tt V1 V2)) (mark (U42 (isList V1) V2)))
(rule (active (U42 tt V2)) (mark (U43 (isNeList V2))))
(rule (active (U43 tt)) (mark tt))
(rule (active (U51 tt V1 V2)) (mark (U52 (isNeList V1) V2)))
(rule (active (U52 tt V2)) (mark (U53 (isList V2))))
(rule (active (U53 tt)) (mark tt))
(rule (active (U61 tt V)) (mark (U62 (isQid V))))
(rule (active (U62 tt)) (mark tt))
(rule (active (U71 tt V)) (mark (U72 (isNePal V))))
(rule (active (U72 tt)) (mark tt))
(rule (active (and tt X)) (mark X))
(rule (active (isList V)) (mark (U11 (isPalListKind V) V)))
(rule (active (isList nil)) (mark tt))
(rule (active (isList (__ V1 V2))) (mark (U21 (and (isPalListKind V1) (isPalListKind V2)) V1 V2)))
(rule (active (isNeList V)) (mark (U31 (isPalListKind V) V)))
(rule (active (isNeList (__ V1 V2))) (mark (U41 (and (isPalListKind V1) (isPalListKind V2)) V1 V2)))
(rule (active (isNeList (__ V1 V2))) (mark (U51 (and (isPalListKind V1) (isPalListKind V2)) V1 V2)))
(rule (active (isNePal V)) (mark (U61 (isPalListKind V) V)))
(rule (active (isNePal (__ I (__ P I)))) (mark (and (and (isQid I) (isPalListKind I)) (and (isPal P) (isPalListKind P)))))
(rule (active (isPal V)) (mark (U71 (isPalListKind V) V)))
(rule (active (isPal nil)) (mark tt))
(rule (active (isPalListKind a)) (mark tt))
(rule (active (isPalListKind e)) (mark tt))
(rule (active (isPalListKind i)) (mark tt))
(rule (active (isPalListKind nil)) (mark tt))
(rule (active (isPalListKind o)) (mark tt))
(rule (active (isPalListKind u)) (mark tt))
(rule (active (isPalListKind (__ V1 V2))) (mark (and (isPalListKind V1) (isPalListKind V2))))
(rule (active (isQid a)) (mark tt))
(rule (active (isQid e)) (mark tt))
(rule (active (isQid i)) (mark tt))
(rule (active (isQid o)) (mark tt))
(rule (active (isQid u)) (mark tt))
(rule (mark (__ X1 X2)) (active (__ (mark X1) (mark X2))))
(rule (mark nil) (active nil))
(rule (mark (U11 X1 X2)) (active (U11 (mark X1) X2)))
(rule (mark tt) (active tt))
(rule (mark (U12 X)) (active (U12 (mark X))))
(rule (mark (isNeList X)) (active (isNeList X)))
(rule (mark (U21 X1 X2 X3)) (active (U21 (mark X1) X2 X3)))
(rule (mark (U22 X1 X2)) (active (U22 (mark X1) X2)))
(rule (mark (isList X)) (active (isList X)))
(rule (mark (U23 X)) (active (U23 (mark X))))
(rule (mark (U31 X1 X2)) (active (U31 (mark X1) X2)))
(rule (mark (U32 X)) (active (U32 (mark X))))
(rule (mark (isQid X)) (active (isQid X)))
(rule (mark (U41 X1 X2 X3)) (active (U41 (mark X1) X2 X3)))
(rule (mark (U42 X1 X2)) (active (U42 (mark X1) X2)))
(rule (mark (U43 X)) (active (U43 (mark X))))
(rule (mark (U51 X1 X2 X3)) (active (U51 (mark X1) X2 X3)))
(rule (mark (U52 X1 X2)) (active (U52 (mark X1) X2)))
(rule (mark (U53 X)) (active (U53 (mark X))))
(rule (mark (U61 X1 X2)) (active (U61 (mark X1) X2)))
(rule (mark (U62 X)) (active (U62 (mark X))))
(rule (mark (U71 X1 X2)) (active (U71 (mark X1) X2)))
(rule (mark (U72 X)) (active (U72 (mark X))))
(rule (mark (isNePal X)) (active (isNePal X)))
(rule (mark (and X1 X2)) (active (and (mark X1) X2)))
(rule (mark (isPalListKind X)) (active (isPalListKind X)))
(rule (mark (isPal X)) (active (isPal X)))
(rule (mark a) (active a))
(rule (mark e) (active e))
(rule (mark i) (active i))
(rule (mark o) (active o))
(rule (mark u) (active u))
(rule (__ (mark X1) X2) (__ X1 X2))
(rule (__ X1 (mark X2)) (__ X1 X2))
(rule (__ (active X1) X2) (__ X1 X2))
(rule (__ X1 (active X2)) (__ X1 X2))
(rule (U11 (mark X1) X2) (U11 X1 X2))
(rule (U11 X1 (mark X2)) (U11 X1 X2))
(rule (U11 (active X1) X2) (U11 X1 X2))
(rule (U11 X1 (active X2)) (U11 X1 X2))
(rule (U12 (mark X)) (U12 X))
(rule (U12 (active X)) (U12 X))
(rule (isNeList (mark X)) (isNeList X))
(rule (isNeList (active X)) (isNeList X))
(rule (U21 (mark X1) X2 X3) (U21 X1 X2 X3))
(rule (U21 X1 (mark X2) X3) (U21 X1 X2 X3))
(rule (U21 X1 X2 (mark X3)) (U21 X1 X2 X3))
(rule (U21 (active X1) X2 X3) (U21 X1 X2 X3))
(rule (U21 X1 (active X2) X3) (U21 X1 X2 X3))
(rule (U21 X1 X2 (active X3)) (U21 X1 X2 X3))
(rule (U22 (mark X1) X2) (U22 X1 X2))
(rule (U22 X1 (mark X2)) (U22 X1 X2))
(rule (U22 (active X1) X2) (U22 X1 X2))
(rule (U22 X1 (active X2)) (U22 X1 X2))
(rule (isList (mark X)) (isList X))
(rule (isList (active X)) (isList X))
(rule (U23 (mark X)) (U23 X))
(rule (U23 (active X)) (U23 X))
(rule (U31 (mark X1) X2) (U31 X1 X2))
(rule (U31 X1 (mark X2)) (U31 X1 X2))
(rule (U31 (active X1) X2) (U31 X1 X2))
(rule (U31 X1 (active X2)) (U31 X1 X2))
(rule (U32 (mark X)) (U32 X))
(rule (U32 (active X)) (U32 X))
(rule (isQid (mark X)) (isQid X))
(rule (isQid (active X)) (isQid X))
(rule (U41 (mark X1) X2 X3) (U41 X1 X2 X3))
(rule (U41 X1 (mark X2) X3) (U41 X1 X2 X3))
(rule (U41 X1 X2 (mark X3)) (U41 X1 X2 X3))
(rule (U41 (active X1) X2 X3) (U41 X1 X2 X3))
(rule (U41 X1 (active X2) X3) (U41 X1 X2 X3))
(rule (U41 X1 X2 (active X3)) (U41 X1 X2 X3))
(rule (U42 (mark X1) X2) (U42 X1 X2))
(rule (U42 X1 (mark X2)) (U42 X1 X2))
(rule (U42 (active X1) X2) (U42 X1 X2))
(rule (U42 X1 (active X2)) (U42 X1 X2))
(rule (U43 (mark X)) (U43 X))
(rule (U43 (active X)) (U43 X))
(rule (U51 (mark X1) X2 X3) (U51 X1 X2 X3))
(rule (U51 X1 (mark X2) X3) (U51 X1 X2 X3))
(rule (U51 X1 X2 (mark X3)) (U51 X1 X2 X3))
(rule (U51 (active X1) X2 X3) (U51 X1 X2 X3))
(rule (U51 X1 (active X2) X3) (U51 X1 X2 X3))
(rule (U51 X1 X2 (active X3)) (U51 X1 X2 X3))
(rule (U52 (mark X1) X2) (U52 X1 X2))
(rule (U52 X1 (mark X2)) (U52 X1 X2))
(rule (U52 (active X1) X2) (U52 X1 X2))
(rule (U52 X1 (active X2)) (U52 X1 X2))
(rule (U53 (mark X)) (U53 X))
(rule (U53 (active X)) (U53 X))
(rule (U61 (mark X1) X2) (U61 X1 X2))
(rule (U61 X1 (mark X2)) (U61 X1 X2))
(rule (U61 (active X1) X2) (U61 X1 X2))
(rule (U61 X1 (active X2)) (U61 X1 X2))
(rule (U62 (mark X)) (U62 X))
(rule (U62 (active X)) (U62 X))
(rule (U71 (mark X1) X2) (U71 X1 X2))
(rule (U71 X1 (mark X2)) (U71 X1 X2))
(rule (U71 (active X1) X2) (U71 X1 X2))
(rule (U71 X1 (active X2)) (U71 X1 X2))
(rule (U72 (mark X)) (U72 X))
(rule (U72 (active X)) (U72 X))
(rule (isNePal (mark X)) (isNePal X))
(rule (isNePal (active X)) (isNePal X))
(rule (and (mark X1) X2) (and X1 X2))
(rule (and X1 (mark X2)) (and X1 X2))
(rule (and (active X1) X2) (and X1 X2))
(rule (and X1 (active X2)) (and X1 X2))
(rule (isPalListKind (mark X)) (isPalListKind X))
(rule (isPalListKind (active X)) (isPalListKind X))
(rule (isPal (mark X)) (isPal X))
(rule (isPal (active X)) (isPal X))