src/Tools/isac/Knowledge/Inverse_Z_Transform.thy
changeset 59603 30cd47104ad7
parent 59592 99c8d2ff63eb
child 59635 9fc1bb69813c
     1.1 --- a/src/Tools/isac/Knowledge/Inverse_Z_Transform.thy	Thu Aug 29 13:52:47 2019 +0200
     1.2 +++ b/src/Tools/isac/Knowledge/Inverse_Z_Transform.thy	Tue Sep 03 12:40:27 2019 +0200
     1.3 @@ -122,16 +122,16 @@
     1.4                preconds = [], rew_ord = ("termlessI",termlessI),
     1.5                erls = Rule.append_rls "erls_in_srls_partial_fraction" Rule.e_rls
     1.6                    [(*for asm in NTH_CONS ...*)
     1.7 -                    Rule.Calc ("Orderings.ord_class.less",eval_equ "#less_"),
     1.8 +                    Rule.Calc ("Orderings.ord_class.less", Prog_Expr.eval_equ "#less_"),
     1.9                      (*2nd NTH_CONS pushes n+-1 into asms*)
    1.10 -                    Rule.Calc("Groups.plus_class.plus", eval_binop "#add_")], 
    1.11 +                    Rule.Calc("Groups.plus_class.plus", (**)eval_binop "#add_")], 
    1.12                srls = Rule.Erls, calc = [], errpatts = [],
    1.13                rules = [Rule.Thm ("NTH_CONS", @{thm NTH_CONS}),
    1.14 -                  Rule.Calc ("Groups.plus_class.plus", eval_binop "#add_"),
    1.15 +                  Rule.Calc ("Groups.plus_class.plus", (**)eval_binop "#add_"),
    1.16                    Rule.Thm ("NTH_NIL", @{thm NTH_NIL}),
    1.17 -                  Rule.Calc ("Tools.lhs", Tools.eval_lhs "eval_lhs_"),
    1.18 -                  Rule.Calc ("Tools.rhs", Tools.eval_rhs"eval_rhs_"),
    1.19 -                  Rule.Calc ("Atools.argument'_in", eval_argument_in "Atools.argument'_in"),
    1.20 +                  Rule.Calc ("Prog_Expr.lhs", Prog_Expr.eval_lhs "eval_lhs_"),
    1.21 +                  Rule.Calc ("Prog_Expr.rhs", Prog_Expr.eval_rhs"eval_rhs_"),
    1.22 +                  Rule.Calc ("Prog_Expr.argument'_in", Prog_Expr.eval_argument_in "Prog_Expr.argument'_in"),
    1.23                    Rule.Calc ("Rational.get_denominator", eval_get_denominator "#get_denominator"),
    1.24                    Rule.Calc ("Rational.get_numerator", eval_get_numerator "#get_numerator"),
    1.25                    Rule.Calc ("Partial_Fractions.factors_from_solution",