test/Tools/isac/Knowledge/build_thydata.sml
author Walther Neuper <neuper@ist.tugraz.at>
Wed, 17 Jul 2013 07:32:53 +0200
changeset 52062 b3f18f0d55d9
parent 48895 35751d90365e
child 52105 2786cc9704c8
permissions -rw-r--r--
--- heap image for Isac on Isabelle2013 builds

This required introduction of 'session'.
NOTE: building the session raised errors NOT detected
by Build_Isac.thy, cf. 4ecea2fcdc2c
neuper@42400
     1
(*  Title:  test/Tools/isac/build_thydata.sml
neuper@42400
     2
    Author: Walther Neuper, TU Graz, 2010
neuper@42400
     3
    (c) due to copyright terms
neuper@42400
     4
neuper@42400
     5
12345678901234567890123456789012345678901234567890123456789012345678901234567890
neuper@42400
     6
        10        20        30        40        50        60        70        80
neuper@42400
     7
*)
neuper@42400
     8
neuper@42400
     9
"--------------------------------------------------------";
neuper@42400
    10
"--------------------------------------------------------";
neuper@42400
    11
"table of contents --------------------------------------";
neuper@42400
    12
"--------------------------------------------------------";
neuper@42400
    13
"-------- OLD compute rlsthmsNOTisac by eq_thmID --------";
neuper@42400
    14
"-------- retrieve isa-b/c theories from Isabelle -------";
neuper@42400
    15
"-------- prop_of thm .. Theory.axioms_of ---------------";
neuper@42400
    16
"-------- compute val rlsthmsNOTisac --------------------";
neuper@42400
    17
"-------- hard-coded val rlsthmsNOTisac -----------------";
neuper@42400
    18
"-------- the_hier (! thehier) (collect_thydata ())------";
neuper@48895
    19
"-------- retrieve errpats ------------------------------";
neuper@42400
    20
"--------------------------------------------------------";
neuper@42400
    21
"--------------------------------------------------------";
neuper@42400
    22
"--------------------------------------------------------";
neuper@42400
    23
neuper@42400
    24
"-------- OLD compute rlsthmsNOTisac by eq_thmID --------";
neuper@42400
    25
"-------- OLD compute rlsthmsNOTisac by eq_thmID --------";
neuper@42400
    26
"-------- OLD compute rlsthmsNOTisac by eq_thmID --------";
neuper@42407
    27
(* WN1204xx:
neuper@42407
    28
   view src/Pure/isac/IsacKnowledge/Isac.ML @ 37874:331e38464ada
neuper@42400
    29
   date 	Thu Jul 22 10:45:18 2010 +0200
neuper@42400
    30
neuper@42400
    31
local
neuper@42400
    32
    val isacrlsthms = ((gen_distinct eq_thmI) o (map rep_thm_G') o flat o 
neuper@42400
    33
		       (map (thms_of_rls o #2 o #2))) (!ruleset');
neuper@42400
    34
    val isacthms = (flat o (map (thms_of o #2))) (!theory');
neuper@42400
    35
in
neuper@42400
    36
    val rlsthmsNOTisac = gen_diff eq_thmI (isacrlsthms, isacthms);
neuper@42400
    37
end;
neuper@42400
    38
*)
neuper@42400
    39
    val isacrlsthms''''' = ((gen_distinct eq_thmI) o (map rep_thm_G') o flat o 
neuper@42400
    40
		       (map (thms_of_rls o #2 o #2))) (!ruleset'):  (thmID * thm) list;
neuper@42400
    41
(* THIS IS TOO EXPENSIVE:
neuper@42400
    42
val all_ListC_thms = Global_Theory.all_thms_of (@{theory "ListC"});
neuper@42400
    43
length all_ListC_thms = 19860 <<<<<-----*)
neuper@42400
    44
val isacthys = (union Theory.eq_thy (! knowthys) (! progthys));
neuper@42400
    45
  val isacthms''''' = (flat o (map Theory.axioms_of)) isacthys: (thmID * term) list; 
neuper@42400
    46
    val rlsthmsNOTisac''''' = gen_diff eq_thmI' (isacrlsthms''''', isacthms'''''); 
neuper@42400
    47
(*  vvvvvvvvvvvvvv also contains all sym; ???: put ###sym_* to isacthms'''''
neuper@42400
    48
                                          ??? ..NO: some are from isab, some from isac !!!
neuper@42400
    49
val rlsthmsNOTisac''''' =
neuper@42400
    50
   [("refl", "?t = ?t"),   |> map (thms_of_rls o #2 o #2) (*drop manually input id in Thm (id, thm)*)
neuper@42400
    51
  |> flat
neuper@42400
    52
  |> map thm_of_thm
neuper@42400
    53
  |> gen_distinct Thm.eq_thm
neuper@42400
    54
  |> map (` I)
neuper@42400
    55
  |> map (apfst Thm.derivation_name) (*WN120319 returns "" after num_str, see below*)
neuper@42400
    56
  |> map (apsnd prop_of);            (*adapt to Theory.axioms_of below*)
neuper@42400
    57
neuper@42400
    58
    ("o_apply", "(?f \<circ> ?g) ?x = ?f (?g ?x)"), 
neuper@42400
    59
    (*/------------these are not found in ListC.thy, because they are no axioms---\*)
neuper@42400
    60
    ("del_base", "del [] ?x = []"), 
neuper@42400
    61
    ("del_rec", "del (?y # ?ys) ?x = (if ?x = ?y then ?ys else ?y # del ?ys ?x)"),
neuper@42400
    62
    ("LENGTH_CONS", "LENGTH (?x # ?xs) = 1 + LENGTH ?xs"), 
neuper@42400
    63
    ("LENGTH_NIL", "LENGTH [] = 0"), 
neuper@42400
    64
    ("list_diff_def", "?a -- ?b \<equiv> foldl del ?a ?b"), 
neuper@42400
    65
    (*\------------these are not found in ListC.thy, because they are no axioms---/*)
neuper@42400
    66
    ("take_Nil", "take ?n [] = []"),
neuper@42400
    67
    ("take_Cons", "take ?n (?x # ?xs) = (case ?n of 0 \<Rightarrow> [] | Suc m \<Rightarrow> ?x # take m ?xs)"), 
neuper@42400
    68
    ("if_True", "(if True then ?x else ?y) = ?x"), 
neuper@42400
    69
    ("if_False", "(if False then ?x else ?y) = ?y"),
neuper@42400
    70
    (*###*)("sym_real_mult_minus1", "- ?z1 = -1 * ?z1"), 
neuper@52062
    71
    ("distrib_right", "(?a + ?b) * ?c = ?a * ?c + ?b * ?c"), 
neuper@52062
    72
    ("distrib_left", "?a * (?b + ?c) = ?a * ?b + ?a * ?c"), 
neuper@42400
    73
    (*###*)(sym_realpow_twoI", "?r1 * ?r1 = ?r1 ^^^ 2"),
neuper@42400
    74
    (*###*)(sym_realpow_addI", "?r1 ^^^ ?n1 * ?r1 ^^^ ?m1 = ?r1 ^^^ (?n1 + ?m1)"), 
neuper@42400
    75
    ("mult_1_right", "?a * 1 = ?a"), 
neuper@42400
    76
    (*###*)(sym_real_mult_2", "?z1 + ?z1 = 2 * ?z1"), 
neuper@42400
    77
    ("mult_1_left", "1 * ?a = ?a"),
neuper@42400
    78
    ("mult_zero_left", "0 * ?a = 0"), 
neuper@42400
    79
    ("mult_zero_right", "?a * 0 = 0"), 
neuper@42400
    80
    ("add_0_left", "0 + ?a = ?a"), 
neuper@42400
    81
    ("add_0_right", "?a + 0 = ?a"), 
neuper@42400
    82
    ("divide_zero_left", "0 / ?a = 0"),
neuper@48763
    83
    (*###*)(sym_mult_assoc", "?z1.1 * (?z2.1 * ?z3.1) = ?z1.1 * ?z2.1 * ?z3.1"), 
neuper@48764
    84
    ("order_refl", "?w \<le> ?w"), 
neuper@42400
    85
    ("minus_minus", "- (- ?a) = ?a"), 
neuper@48763
    86
    ("mult_commute", "?z * ?w = ?w * ?z"),
neuper@48763
    87
    ("mult_assoc", "?z1.0 * ?z2.0 * ?z3.0 = ?z1.0 * (?z2.0 * ?z3.0)"), 
neuper@42400
    88
    ("add_commute", "?a + ?b = ?b + ?a"), 
neuper@42400
    89
    ("add_left_commute", "?b + (?a + ?c) = ?a + (?b + ?c)"),
neuper@42400
    90
    ("add_assoc", "?a + ?b + ?c = ?a + (?b + ?c)"), 
neuper@42400
    91
    ("minus_mult_left", "- ?a1 * ?b1 = - (?a1 * ?b1)"), 
neuper@42400
    92
    ("right_minus", "?a + - ?a = 0"), 
neuper@42400
    93
    (*###*)("sym_add_assoc", "?a1 + (?b1 + ?c1) = ?a1 + ?b1 + ?c1"),
neuper@42400
    94
    ("left_diff_distrib", "(?a - ?b) * ?c = ?a * ?c - ?b * ?c"), 
neuper@42400
    95
    ("right_diff_distrib", "?a * (?b - ?c) = ?a * ?b - ?a * ?c"), 
neuper@42400
    96
    ("minus_divide_left", "- ?a1 / ?b1 = - (?a1 / ?b1)"),
neuper@42400
    97
    ("times_divide_eq_right", "?a * (?b / ?c) = ?a * ?b / ?c"), 
neuper@42400
    98
    ("times_divide_eq_left", "?b / ?c * ?a = ?b * ?a / ?c"), 
neuper@42400
    99
    ("divide_divide_eq_left", "?a / ?b / ?c = ?a / (?b * ?c)"),
neuper@42400
   100
    ("divide_divide_eq_right", "?a / (?b / ?c) = ?a * ?c / ?b"), 
neuper@42400
   101
    ("divide_1", "?a / 1 = ?a"), 
neuper@42400
   102
    ("add_divide_distrib", "(?a + ?b) / ?c = ?a / ?c + ?b / ?c"),
neuper@42400
   103
    (*###*)("sym_rmult_assoc", "?m1 * (?n1 * ?k1) = ?m1 * ?n1 * ?k1")]: (string * thm) list
neuper@42400
   104
*)
neuper@42400
   105
neuper@42400
   106
"-------- retrieve isa-b/c theories from Isabelle -------";
neuper@42400
   107
"-------- retrieve isa-b/c theories from Isabelle -------";
neuper@42400
   108
"-------- retrieve isa-b/c theories from Isabelle -------";
neuper@42400
   109
  val first_ProgLang_thy = @{theory ListC}
neuper@42400
   110
  val first_Knowledge_thy = @{theory Delete}  (*see WN120321.TODO rearrange theories*)
neuper@42407
   111
  val allthys = (*!!! @{theory} :: ..START WITH Isac.thy..*) Theory.ancestors_of @{theory};
neuper@42400
   112
  val isabthys' =
neuper@42400
   113
    drop ((find_index (curry Theory.eq_thy first_ProgLang_thy) allthys) + 1, allthys);
neuper@42407
   114
  val isacthys' =
neuper@42407
   115
    take ((find_index (curry Theory.eq_thy first_ProgLang_thy) allthys) + 1, allthys);
neuper@42400
   116
  val knowthys' =
neuper@42407
   117
    take ((find_index (curry Theory.eq_thy first_Knowledge_thy) isacthys') + 1, isacthys');
neuper@42407
   118
  val progthys' =                   (*WN120321.TODO rearrange theories -------vvv*)
neuper@42407
   119
    drop ((find_index (curry Theory.eq_thy first_Knowledge_thy) isacthys') + 1 +3, isacthys');
neuper@42400
   120
neuper@42400
   121
map Context.theory_name allthys;
neuper@42407
   122
map Context.theory_name isabthys';
neuper@42407
   123
map Context.theory_name isacthys' = ["Isac", "Inverse_Z_Transform", "DiophantEq", "AlgEin", 
neuper@42407
   124
  "Biegelinie", "Vect", "PolyMinus", "Frontend", "Partial_Fractions", "DiffApp", "Test", "EqSystem",
neuper@42407
   125
  "Integrate", "Diff", "LogExp", "Trig", "Calculus", "PolyEq", "RootRatEq", "RootRat", "RatEq", 
neuper@42407
   126
  "RootEq", "LinEq", "Root", "Equation", "Rational", "Poly", "Simplify", "Atools", "Descript", 
neuper@42407
   127
  "Delete", "xmlsrc", "Interpret", "ProgLang", "Script", "Tools", "ListC"];  (*WN120201 true*)
neuper@42400
   128
(*see WN120321.TODO rearrange theories: ATTENTION with ProgLang.thy etc*)
neuper@42407
   129
map Context.theory_name knowthys' = ["Isac", "Inverse_Z_Transform", "DiophantEq", "AlgEin", 
neuper@42407
   130
  "Biegelinie", "Vect", "PolyMinus", "Frontend", "Partial_Fractions", "DiffApp", "Test", "EqSystem",
neuper@42407
   131
  "Integrate", "Diff", "LogExp", "Trig", "Calculus", "PolyEq", "RootRatEq", "RootRat", "RatEq", 
neuper@42407
   132
  "RootEq", "LinEq", "Root", "Equation", "Rational", "Poly", "Simplify", "Atools", "Descript", 
neuper@42407
   133
  "Delete"];  (*WN120201 true*)
neuper@42400
   134
map Context.theory_name progthys' = ["Script", "Tools", "ListC"];  (*WN120201 true*)
neuper@42400
   135
neuper@42400
   136
"-------- prop_of thm .. Theory.axioms_of ---------------";
neuper@42400
   137
"-------- prop_of thm .. Theory.axioms_of ---------------";
neuper@42400
   138
"-------- prop_of thm .. Theory.axioms_of ---------------";
neuper@42400
   139
val isacrlsthms''''' = ! ruleset'
neuper@42400
   140
  |> map (thms_of_rls o #2 o #2) (*drop manually input id in Thm (id, thm)*)
neuper@42400
   141
  |> flat
neuper@42400
   142
  |> map thm_of_thm
neuper@42400
   143
  |> gen_distinct Thm.eq_thm
neuper@42400
   144
  |> map (` I)
neuper@42400
   145
  |> map (apfst Thm.derivation_name) (*WN120319 returns "" after num_str, see below*)
neuper@42400
   146
  |> map (apsnd prop_of);            (*adapt to Theory.axioms_of below*)
neuper@42400
   147
neuper@42400
   148
val isacthms''''' = (flat o (map Theory.axioms_of)) isacthys: (thmID * term) list;
neuper@42400
   149
"---------------------------------------------------------------------------------";
neuper@42400
   150
"the formats of prop_of thm .. Theory.axioms_of are too different for comparison: ";
neuper@42400
   151
"---------------------------------------------------------------------------------";
neuper@42400
   152
neuper@42400
   153
(*assoc (isacrlsthms''''', "Poly.realpow_oneI") = NONE; ---thus:*)
neuper@42400
   154
val one1 = num_str @{thm realpow_oneI};
neuper@42400
   155
atomty (prop_of one1);
neuper@42400
   156
(**** 
neuper@42400
   157
*** Const (HOL.Trueprop, bool => prop)
neuper@42400
   158
*** . Const (HOL.eq, real => real => bool)
neuper@42400
   159
*** . . Const (Atools.pow, real => real => real)
neuper@42400
   160
*** . . . Var ((r, 0), real)
neuper@42400
   161
*** . . . Free (1, real)
neuper@42400
   162
*** . . Var ((r, 0), real)
neuper@42400
   163
*** *)
neuper@42400
   164
val SOME coll2 = assoc (isacthms''''', "Poly.realpow_oneI");
neuper@42400
   165
atomty coll2;
neuper@42400
   166
(**** 
neuper@42400
   167
*** Const (all, (real => prop) => prop)
neuper@42400
   168
*** . Abs (r, real,..
neuper@42400
   169
*** . . Const (HOL.Trueprop, bool => prop)
neuper@42400
   170
*** . . . Const (HOL.eq, real => real => bool)
neuper@42400
   171
*** . . . . Const (Atools.pow, real => real => real)
neuper@42400
   172
*** . . . . . Bound 0
neuper@42400
   173
*** . . . . . Const (Groups.one_class.one, real)
neuper@42400
   174
*** . . . . Bound 0
neuper@42400
   175
***  *)
neuper@42400
   176
neuper@42400
   177
(*assoc (isacrlsthms''''', "Poly.realpow_plus_1_atom") = NONE; ---thus:*)
neuper@42400
   178
val one1 = num_str @{thm realpow_plus_1_atom};
neuper@42400
   179
atomty (prop_of one1);
neuper@42400
   180
(**** 
neuper@42400
   181
*** Const (==>, prop => prop => prop)
neuper@42400
   182
*** . Const (HOL.Trueprop, bool => prop)
neuper@42400
   183
*** . . Const (Atools.is'_atom, real => bool)
neuper@42400
   184
*** . . . Var ((r, 0), real)
neuper@42400
   185
*** . Const (HOL.Trueprop, bool => prop)
neuper@42400
   186
*** . . Const (HOL.eq, real => real => bool)
neuper@42400
   187
*** . . . Const (Groups.times_class.times, real => real => real)
neuper@42400
   188
*** . . . . Var ((r, 0), real)
neuper@42400
   189
*** . . . . Const (Atools.pow, real => real => real)
neuper@42400
   190
*** . . . . . Var ((r, 0), real)
neuper@42400
   191
*** . . . . . Var ((n, 0), real)
neuper@42400
   192
*** . . . Const (Atools.pow, real => real => real)
neuper@42400
   193
*** . . . . Var ((r, 0), real)
neuper@42400
   194
*** . . . . Const (Groups.plus_class.plus, real => real => real)
neuper@42400
   195
*** . . . . . Free (1, real)
neuper@42400
   196
*** . . . . . Var ((n, 0), real)
neuper@42400
   197
*** *)
neuper@42400
   198
val SOME coll2 = assoc (isacthms''''', "Poly.realpow_plus_1_atom");
neuper@42400
   199
atomty coll2;
neuper@42400
   200
(**** 
neuper@42400
   201
*** Const (all, (real => prop) => prop)
neuper@42400
   202
*** . Abs (r, real,..
neuper@42400
   203
*** . . Const (all, (real => prop) => prop)
neuper@42400
   204
*** . . . Abs (n, real,..
neuper@42400
   205
*** . . . . Const (==>, prop => prop => prop)
neuper@42400
   206
*** . . . . . Const (HOL.Trueprop, bool => prop)
neuper@42400
   207
*** . . . . . . Const (Atools.is'_atom, real => bool)
neuper@42400
   208
*** . . . . . . . Bound 1
neuper@42400
   209
*** . . . . . Const (HOL.Trueprop, bool => prop)
neuper@42400
   210
*** . . . . . . Const (HOL.eq, real => real => bool)
neuper@42400
   211
*** . . . . . . . Const (Groups.times_class.times, real => real => real)
neuper@42400
   212
*** . . . . . . . . Bound 1
neuper@42400
   213
*** . . . . . . . . Const (Atools.pow, real => real => real)
neuper@42400
   214
*** . . . . . . . . . Bound 1
neuper@42400
   215
*** . . . . . . . . . Bound 0
neuper@42400
   216
*** . . . . . . . Const (Atools.pow, real => real => real)
neuper@42400
   217
*** . . . . . . . . Bound 1
neuper@42400
   218
*** . . . . . . . . Const (Groups.plus_class.plus, real => real => real)
neuper@42400
   219
*** . . . . . . . . . Const (Groups.one_class.one, real)
neuper@42400
   220
*** . . . . . . . . . Bound 0
neuper@42400
   221
*** *)
neuper@42400
   222
neuper@42400
   223
"-------- compute val rlsthmsNOTisac --------------------";
neuper@42400
   224
"-------- compute val rlsthmsNOTisac --------------------";
neuper@42400
   225
"-------- compute val rlsthmsNOTisac --------------------";
neuper@42400
   226
(*WN120319: since num_str destoys derivation_name, we hardcode rlsthmsNOTisac.
neuper@42400
   227
*)
neuper@42400
   228
(*DECISION.WN120201 wrt. identifiers of theorems, thmID, in building html presentation:
neuper@42400
   229
  eg. Thm.derivation_name @{thm add_0} = "Groups.comm_monoid_add_class.add_0";
neuper@42400
   230
  is long identifier, "add_0" is simple identifier
neuper@42400
   231
  given:
neuper@42400
   232
  (1) simple identifiers, without points, conform with usage in TP-PL
neuper@42400
   233
  (2) Thm (id, thm) in rls, id is simple id; entered manyally -- error prone
neuper@42400
   234
        all this might change due to further automation
neuper@42400
   235
  thus decision
neuper@42400
   236
  (a) retrieve id (and theory) from thm or axiom (avoids errors from (2))
neuper@42400
   237
  (b) hold long identifiers, with points, as long as possible
neuper@42400
   238
  (c) use thmID_of_derivation_name, thyID_of_derivation_name for retrieval.
neuper@42400
   239
*)
neuper@42400
   240
(*WN110722 saved investigations:
neuper@42400
   241
val all_ListC_thms = PureThy.all_thms_of (@{theory "ListC"});
neuper@42400
   242
val all_Complex_Main_thms = PureThy.all_thms_of (@{theory "Complex_Main"});
neuper@42400
   243
   delivers [] after 100 secs ...
neuper@42400
   244
subtract Thm.eq_thm (map #2 all_ListC_thms) (map #2 all_Complex_Main_thms); 
neuper@42400
   245
... because ListC contains no thms, but axioms only.
neuper@42400
   246
"----- so we cannot get isacthms as thm, only as term ---";
neuper@42400
   247
"----- but we can retain isacrlsthms as thm ---";
neuper@42400
   248
*)
neuper@42400
   249
val isacrlsthms = ! ruleset'
neuper@42400
   250
  |> map (thms_of_rls o #2 o #2) (*drop manually input id in Thm (id, thm)*)
neuper@42400
   251
  |> flat
neuper@42400
   252
  |> map thm_of_thm
neuper@42400
   253
  |> gen_distinct Thm.eq_thm
neuper@42400
   254
  |> map (` I)
neuper@42400
   255
  |> map (apfst Thm.derivation_name); (*WN120319 returns "" after num_str, see below*)
neuper@42400
   256
length isacrlsthms = 450; (*WN120319*)
neuper@42400
   257
(*[("HOL.refl", "?t = ?t"),
neuper@42400
   258
   ("Fun.o_apply", "(?f \<circ> ?g) ?x = ?f (?g ?x)"),
neuper@42400
   259
   ("", "1 < ?n \<Longrightarrow> NTH ?n (?x # ?xs) = NTH (?n + - 1) ?xs"), (*destroyed by num_str*)
neuper@42400
   260
   ("", "NTH 1 (?x # ?xs) = ?x"),                             (*destroyed by num_str*)
neuper@42400
   261
   ("ListC.append_Cons", "(?x # ?xs) @ ?ys = ?x # ?xs @ ?ys"), ...]: (string * thm) list
neuper@42400
   262
*)
neuper@42400
   263
neuper@42400
   264
val isacthms = (flat o (map Theory.axioms_of)) isacthys: (thmID * term) list;
neuper@42400
   265
length isacthms = 517; (*WN120319, WN120201 509!?!*)
neuper@42400
   266
(*[("Inverse_Z_Transform.rule1", Const ("==>...", "prop \<Rightarrow> prop \<Rightarrow> prop") $ (Const (...) $ ...),
neuper@42400
   267
   ("Inverse_Z_Transform.rule2", Const (...) $ Abs ("z...", "RealDef.real",...),
neuper@42400
   268
   ...]: (thmID * term) list
neuper@42400
   269
*)
neuper@42400
   270
neuper@42400
   271
(*WN120319: since num_str destoys derivation_name to "", we hardcode rlsthmsNOTisac:
neuper@42400
   272
neuper@42400
   273
val rlsthmsNOTisac = gen_diff eq_thmI (isacrlsthms, isacthms);
neuper@42400
   274
map fst rlsthmsNOTisac;
neuper@42400
   275
(*val it = ["HOL.refl", "Fun.o_apply", "", "", "ListC.del.del_base", "ListC.del.del_rec", "", "",
neuper@42400
   276
  "ListC.list_diff_def", "List.take.take_Nil", ...]
neuper@42400
   277
*)
neuper@42400
   278
length rlsthmsNOTisac = 46; (*WN120201*)
neuper@42400
   279
*)
neuper@42400
   280
neuper@42400
   281
"-------- hard-coded val rlsthmsNOTisac -----------------";
neuper@42400
   282
"-------- hard-coded val rlsthmsNOTisac -----------------";
neuper@42400
   283
"-------- hardcode val rlsthmsNOTisac -------------------";
neuper@42400
   284
(*WN120319: since num_str destoys derivation_name, we hardcode rlsthmsNOTisac:*)
neuper@42400
   285
val rlsthmsNOTisac =
neuper@42400
   286
 [("HOL.refl", (prop_of o num_str) @{thm refl}),
neuper@42400
   287
  ("Fun.o_apply", (prop_of o num_str) @{thm o_apply}),
neuper@42400
   288
  (*/------------these are not found in ListC.thy, because they are no axioms---\*)
neuper@42400
   289
  ("ListC.del.del_base", (prop_of o num_str) @{thm del_base}), 
neuper@42400
   290
  ("ListC.del.del_rec", (prop_of o num_str) @{thm del_rec}),
neuper@42400
   291
  ("ListC.LENGTH.LENGTH_CONS", (prop_of o num_str) @{thm LENGTH_CONS}), 
neuper@42400
   292
  ("ListC.LENGTH.LENGTH_NIL", (prop_of o num_str) @{thm LENGTH_NIL}), 
neuper@42400
   293
  ("ListC.list_diff_def", (prop_of o num_str) @{thm list_diff_def}), 
neuper@42400
   294
  (*\------------these are not found in ListC.thy, because they are no axioms---/*)
neuper@42400
   295
  ("List.take_Nil", (prop_of o num_str) @{thm take_Nil}),
neuper@42400
   296
  ("List.take_Cons", (prop_of o num_str) @{thm take_Cons}),
neuper@42400
   297
  ("List.if_True", (prop_of o num_str) @{thm if_True}),
neuper@42400
   298
  ("HOL.if_False", (prop_of o num_str) @{thm if_False}),
neuper@42400
   299
  (*###("sym_real_mult_minus1", "- ?z1 = -1 * ?z1")*)
neuper@52062
   300
  ("Rings.semiring_class.distrib_right", (prop_of o num_str) @{thm distrib_right}),
neuper@52062
   301
  ("Rings.semiring_class.distrib_left", (prop_of o num_str) @{thm distrib_left}),
neuper@42400
   302
  (*###("sym_realpow_twoI", "?r1 * ?r1 = ?r1 ^^^ 2")*)
neuper@42400
   303
  (*###("sym_realpow_addI", "?r1 ^^^ ?n1 * ?r1 ^^^ ?m1 = ?r1 ^^^ (?n1 + ?m1)")*)
neuper@42400
   304
  ("Groups.monoid_mult_class.mult_1_right", (prop_of o num_str) @{thm mult_1_right}),
neuper@42400
   305
  (*("sym_real_mult_2", "?z1 + ?z1 = 2 * ?z1")*)
neuper@42400
   306
  ("Groups.monoid_mult_class.mult_1_left", (prop_of o num_str) @{thm mult_1_left}),
neuper@42400
   307
  ("Rings.mult_zero_class.mult_zero_left", (prop_of o num_str) @{thm mult_zero_left}),
neuper@42400
   308
  ("Rings.mult_zero_class.mult_zero_right", (prop_of o num_str) @{thm mult_zero_right}),
neuper@42400
   309
  ("Groups.monoid_add_class.add_0_left", (prop_of o num_str) @{thm add_0_left}),
neuper@42400
   310
  ("Groups.monoid_add_class.add_0_right", (prop_of o num_str) @{thm add_0_right}),
neuper@42400
   311
  ("Rings.division_ring_class.divide_zero_left", (prop_of o num_str) @{thm divide_zero_left}),
neuper@48763
   312
  (*###("sym_mult_assoc", "?z1.1 * (?z2.1 * ?z3.1) = ?z1.1 * ?z2.1 * ?z3.1")*)
neuper@48764
   313
  ("RealDef.order_refl", (prop_of o num_str) @{thm order_refl}),
neuper@42400
   314
  ("Groups.group_add_class.minus_minus", (prop_of o num_str) @{thm minus_minus}),
neuper@48763
   315
  ("RealDef.mult_commute", (prop_of o num_str) @{thm mult_commute }),
neuper@48763
   316
  ("RealDef.mult_assoc", (prop_of o num_str) @{thm mult_assoc}),
neuper@42400
   317
  ("Groups.ab_semigroup_add_class.add_commute", (prop_of o num_str) @{thm add_commute}),
neuper@42400
   318
  ("Groups.ab_semigroup_add_class.add_left_commute", (prop_of o num_str) @{thm add_left_commute}),
neuper@42400
   319
  ("Groups.semigroup_add_class.add_assoc", (prop_of o num_str) @{thm add_assoc}),
neuper@42400
   320
  ("Rings.ring_class.minus_mult_left", (prop_of o num_str) @{thm minus_mult_left}),
neuper@42400
   321
  ("Groups.group_add_class.right_minus", (prop_of o num_str) @{thm right_minus}),
neuper@42400
   322
  (*###("sym_add_assoc", "?a1 + (?b1 + ?c1) = ?a1 + ?b1 + ?c1"),*)
neuper@42400
   323
  ("Rings.ring_class.left_diff_distrib", (prop_of o num_str) @{thm left_diff_distrib}),
neuper@42400
   324
  ("Rings.ring_class.right_diff_distrib", (prop_of o num_str) @{thm right_diff_distrib}),
neuper@42400
   325
  ("Rings.division_ring_class.minus_divide_left", (prop_of o num_str) @{thm minus_divide_left}),
neuper@42400
   326
  ("Rings.division_ring_class.times_divide_eq_right", (prop_of o num_str) @{thm times_divide_eq_right}),
neuper@42400
   327
  ("Fields.field_class.times_divide_eq_left", (prop_of o num_str) @{thm times_divide_eq_left}),
neuper@42400
   328
  ("Fields.field_inverse_zero_class.divide_divide_eq_left", (prop_of o num_str) @{thm divide_divide_eq_left}),
neuper@42400
   329
  ("Fields.field_inverse_zero_class.divide_divide_eq_right", (prop_of o num_str) @{thm divide_divide_eq_right}),
neuper@42400
   330
  ("Rings.division_ring_class.divide_1", (prop_of o num_str) @{thm divide_1}),
neuper@42400
   331
  ("Rings.division_ring_class.add_divide_distrib", (prop_of o num_str) @{thm add_divide_distrib }),
neuper@42400
   332
  (*###("sym_rmult_assoc", "?m1 * (?n1 * ?k1) = ?m1 * ?n1 * ?k1")*)
neuper@42400
   333
  (* thms in Scripts: *)
neuper@42400
   334
  ("Int.divide_minus1", (prop_of o num_str) @{thm divide_minus1}),
neuper@42400
   335
  ("Groups.group_add_class.neg_equal_iff_equal", (prop_of o num_str) @{thm neg_equal_iff_equal})]
neuper@42400
   336
  : (thmDeriv * term) list;
neuper@42400
   337
neuper@42400
   338
"-------- the_hier (! thehier) (collect_thydata ())------";
neuper@42400
   339
"-------- the_hier (! thehier) (collect_thydata ())------";
neuper@42400
   340
"-------- the_hier (! thehier) (collect_thydata ())------";
neuper@42400
   341
collect_thydata; (* = fn: unit -> (theID * thydata) list*)
neuper@42400
   342
thehier; (* = ref [Ptyp ("IsacKnowledge", [Html {guh = "thy_isac_IsacKnowledge-part", ...}],
neuper@42400
   343
                    [Ptyp ("Biegelinie", [Html {guh = "thy_isac_Biegelinie", ...}],
neuper@42400
   344
                      [Ptyp ("Theorems", [Html {guh = "thy_isac_Biegelinie-Theorems", ...}],
neuper@42400
   345
                        [Ptyp ("Belastung_Querkraft", [Hthm {guh = "thy_isac_B ...}],[]),
neuper@42400
   346
                         Ptyp ("Moment_Neigung", [Hthm {guh = "thy_isac_Biegeli...}],[]),
neuper@42400
   347
                   [])])])])]     : thehier ref *)
neuper@42400
   348
the_hier (! thehier) (collect_thydata ());
neuper@42400
   349
(*
neuper@42400
   350
*** insert: preserved ["Isabelle"] 
neuper@42400
   351
 *** insert: preserved ["Isabelle","HOL","Theorems","refl"] 
neuper@42400
   352
 *** insert: preserved ["Isabelle","Fun","Theorems","o_apply"]
neuper@42400
   353
                see WN120320.TODO check-improve rlsthmsNOTisac: ------\
neuper@42400
   354
 *** insert: preserved ["Isabelle","ListC","Theorems","del_base"] 
neuper@42400
   355
 *** insert: preserved ["Isabelle","ListC","Theorems","del_rec"] 
neuper@42400
   356
 *** insert: preserved ["Isabelle","ListC","Theorems","LENGTH_CONS"] 
neuper@42400
   357
 *** insert: preserved ["Isabelle","ListC","Theorems","LENGTH_NIL"] 
neuper@42400
   358
 *** insert: preserved ["Isabelle","ListC","Theorems","list_diff_def"] 
neuper@42400
   359
                see WN120320.TODO check-improve rlsthmsNOTisac: ------/
neuper@42400
   360
 *** insert: preserved ["Isabelle","List","Theorems","take_Nil"] 
neuper@42400
   361
 *** insert: preserved ["Isabelle","List","Theorems","take_Cons"] 
neuper@42400
   362
 *** insert: preserved ["Isabelle","List","Theorems","if_True"] 
neuper@42400
   363
              Thm.get_name_hint @{t^^^^^^True} = "HOL.if_True";
neuper@42400
   364
 *** insert: preserved ["Isabelle","HOL","Theorems","if_False"] 
neuper@52062
   365
 *** insert: preserved ["Isabelle","Rings","Theorems","distrib_right"] 
neuper@52062
   366
 *** insert: preserved ["Isabelle","Rings","Theorems","distrib_left"] 
neuper@42400
   367
 *** insert: preserved ["Isabelle","Groups","Theorems","mult_1_right"] 
neuper@42400
   368
 *** insert: preserved ["Isabelle","Groups","Theorems","mult_1_left"] 
neuper@42400
   369
 *** insert: preserved ["Isabelle","Rings","Theorems","mult_zero_left"] 
neuper@42400
   370
 *** insert: preserved ["Isabelle","Rings","Theorems","mult_zero_right"] 
neuper@42400
   371
 *** insert: preserved ["Isabelle","Groups","Theorems","add_0_left"] 
neuper@42400
   372
 *** insert: preserved ["Isabelle","Groups","Theorems","add_0_right"] 
neuper@42400
   373
 *** insert: preserved ["Isabelle","Rings","Theorems","divide_zero_left"] 
neuper@48764
   374
 *** insert: preserved ["Isabelle","RealDef","Theorems","order_refl"] 
neuper@42400
   375
 *** insert: preserved ["Isabelle","Groups","Theorems","minus_minus"] 
neuper@48763
   376
 *** insert: preserved ["Isabelle","RealDef","Theorems","mult_commute"] 
neuper@48763
   377
 *** insert: preserved ["Isabelle","RealDef","Theorems","mult_assoc"] 
neuper@42400
   378
 *** insert: preserved ["Isabelle","Groups","Theorems","add_commute"] 
neuper@42400
   379
 *** insert: preserved ["Isabelle","Groups","Theorems","add_left_commute"] 
neuper@42400
   380
 *** insert: preserved ["Isabelle","Groups","Theorems","add_assoc"] 
neuper@42400
   381
 *** insert: preserved ["Isabelle","Rings","Theorems","minus_mult_left"] 
neuper@42400
   382
 *** insert: preserved ["Isabelle","Groups","Theorems","right_minus"] 
neuper@42400
   383
 *** insert: preserved ["Isabelle","Rings","Theorems","left_diff_distrib"] 
neuper@42400
   384
 *** insert: preserved ["Isabelle","Rings","Theorems","right_diff_distrib"] 
neuper@42400
   385
 *** insert: preserved ["Isabelle","Rings","Theorems","minus_divide_left"] 
neuper@42400
   386
 *** insert: preserved ["Isabelle","Rings","Theorems","times_divide_eq_right"] 
neuper@42400
   387
 *** insert: preserved ["Isabelle","Fields","Theorems","times_divide_eq_left"] 
neuper@42400
   388
 *** insert: preserved ["Isabelle","Fields","Theorems","divide_divide_eq_left"] 
neuper@42400
   389
 *** insert: preserved ["Isabelle","Fields","Theorems","divide_divide_eq_right"] 
neuper@42400
   390
 *** insert: preserved ["Isabelle","Rings","Theorems","divide_1"] 
neuper@42400
   391
 *** insert: preserved ["Isabelle","Rings","Theorems","add_divide_distrib"] 
neuper@42400
   392
 *** insert: preserved ["Isabelle","Int","Theorems","divide_minus1"] 
neuper@42400
   393
 *** insert: preserved ["Isabelle","Groups","Theorems","neg_equal_iff_equal"]
neuper@42400
   394
                                                       ??? vvvvvvvvvvvvvv ------\
neuper@42400
   395
 *** insert: preserved ["IsacScripts","Script","Theorems","arity_type_ID"] 
neuper@42400
   396
 *** insert: preserved ["IsacScripts","Script","Theorems","arity_type_arg"] 
neuper@42400
   397
 *** insert: preserved ["IsacScripts","Tools","Theorems","arity_type_cpy"] 
neuper@42400
   398
 *** insert: preserved ["IsacScripts","Tools","Theorems","arity_type_nam"] 
neuper@42400
   399
 *** insert: preserved ["IsacScripts","Tools","Theorems","arity_type_str"] 
neuper@42400
   400
 *** insert: preserved ["IsacScripts","Tools","Theorems","arity_type_una"] 
neuper@42400
   401
 *** insert: preserved ["IsacScripts","Tools","Theorems","arity_type_unl"] 
neuper@42400
   402
 *** insert: preserved ["IsacScripts","Tools","Theorems","arity_type_toreal"] 
neuper@42400
   403
 *** insert: preserved ["IsacScripts","Tools","Theorems","arity_type_unknow"] 
neuper@42400
   404
 *** insert: preserved ["IsacScripts","Tools","Theorems","arity_type_tobooll"] 
neuper@42400
   405
 *** insert: preserved ["IsacScripts","Tools","Theorems","arity_type_toreall"] 
neuper@42400
   406
                                                       ??? vvvvvvvvvvvvvv ------/
neuper@42400
   407
 *** insert: preserved ["IsacScripts","Tools","Rulesets","e_rls"] 
neuper@42400
   408
 *** insert: preserved ["IsacScripts","Tools","Rulesets","e_rrls"] 
neuper@42400
   409
                 see WN120320.TODO check-improve rlsthmsNOTisac: ------\
neuper@42400
   410
 *** insert: preserved ["IsacScripts","ListC","Theorems","LAST"]  = ["IsacKnowledge","ListC"---\
neuper@42400
   411
 *** insert: preserved ["IsacScripts","ListC","Theorems","hd_thm"]
neuper@42400
   412
 *** insert: preserved ["IsacScripts","ListC","Theorems","tl_Nil"] 
neuper@42400
   413
 *** insert: preserved ["IsacScripts","ListC","Theorems","NTH_NIL"] 
neuper@42400
   414
 *** insert: preserved ["IsacScripts","ListC","Theorems","del_def"] 
neuper@42400
   415
 *** insert: preserved ["IsacScripts","ListC","Theorems","map_Nil"] 
neuper@42400
   416
 *** insert: preserved ["IsacScripts","ListC","Theorems","mem_Nil"] 
neuper@42400
   417
 *** insert: preserved ["IsacScripts","ListC","Theorems","rev_Nil"] 
neuper@42400
   418
 *** insert: preserved ["IsacScripts","ListC","Theorems","tl_Cons"] 
neuper@42400
   419
 *** insert: preserved ["IsacScripts","ListC","Theorems","zip_Nil"] 
neuper@42400
   420
 *** insert: preserved ["IsacScripts","ListC","Theorems","NTH_CONS"] 
neuper@42400
   421
 *** insert: preserved ["IsacScripts","ListC","Theorems","map_Cons"] 
neuper@42400
   422
 *** insert: preserved ["IsacScripts","ListC","Theorems","mem_Cons"] 
neuper@42400
   423
 *** insert: preserved ["IsacScripts","ListC","Theorems","null_Nil"] 
neuper@42400
   424
 *** insert: preserved ["IsacScripts","ListC","Theorems","rev_Cons"] 
neuper@42400
   425
 *** insert: preserved ["IsacScripts","ListC","Theorems","zip_Cons"] 
neuper@42400
   426
 *** insert: preserved ["IsacScripts","ListC","Theorems","foldr_Nil"] 
neuper@42400
   427
 *** insert: preserved ["IsacScripts","ListC","Theorems","null_Cons"] 
neuper@42400
   428
 *** insert: preserved ["IsacScripts","ListC","Theorems","LENGTH_def"] 
neuper@42400
   429
 *** insert: preserved ["IsacScripts","ListC","Theorems","append_Nil"] 
neuper@42400
   430
 *** insert: preserved ["IsacScripts","ListC","Theorems","concat_Nil"] 
neuper@42400
   431
 *** insert: preserved ["IsacScripts","ListC","Theorems","filter_Nil"] 
neuper@42400
   432
 *** insert: preserved ["IsacScripts","ListC","Theorems","foldr_Cons"] 
neuper@42400
   433
 *** insert: preserved ["IsacScripts","ListC","Theorems","append_Cons"] 
neuper@42400
   434
 *** insert: preserved ["IsacScripts","ListC","Theorems","butlast_Nil"] 
neuper@42400
   435
 *** insert: preserved ["IsacScripts","ListC","Theorems","concat_Cons"] 
neuper@42400
   436
 *** insert: preserved ["IsacScripts","ListC","Theorems","filter_Cons"] 
neuper@42400
   437
 *** insert: preserved ["IsacScripts","ListC","Theorems","remdups_Nil"] 
neuper@42400
   438
 *** insert: preserved ["IsacScripts","ListC","Theorems","butlast_Cons"] 
neuper@42400
   439
 *** insert: preserved ["IsacScripts","ListC","Theorems","distinct_Nil"] 
neuper@42400
   440
 *** insert: preserved ["IsacScripts","ListC","Theorems","remdups_Cons"] 
neuper@42400
   441
 *** insert: preserved ["IsacScripts","ListC","Theorems","distinct_Cons"] 
neuper@42400
   442
 *** insert: preserved ["IsacScripts","ListC","Theorems","dropWhile_Nil"] 
neuper@42400
   443
 *** insert: preserved ["IsacScripts","ListC","Theorems","takeWhile_Nil"] 
neuper@42400
   444
 *** insert: preserved ["IsacScripts","ListC","Theorems","dropWhile_Cons"] 
neuper@42400
   445
 *** insert: preserved ["IsacScripts","ListC","Theorems","takeWhile_Cons"] 
neuper@42400
   446
 *** insert: preserved ["IsacScripts","ListC","Theorems","list_diff_def_raw"] =["IsacKnowledge"---/
neuper@42400
   447
 *** insert: preserved ["IsacKnowledge","Inverse_Z_Transform","Theorems","rule1"] 
neuper@42400
   448
 *** insert: preserved ["IsacKnowledge","Inverse_Z_Transform","Theorems","rule2"] 
neuper@42400
   449
 *** insert: preserved ["IsacKnowledge","Inverse_Z_Transform","Theorems","rule3"] 
neuper@42400
   450
 *** insert: preserved ["IsacKnowledge","Inverse_Z_Transform","Theorems","rule4"] 
neuper@42400
   451
 *** insert: preserved ["IsacKnowledge","Inverse_Z_Transform","Theorems","rule5"] 
neuper@42400
   452
 *** insert: preserved ["IsacKnowledge","Inverse_Z_Transform","Theorems","rule6"] 
neuper@42400
   453
 *** insert: preserved ["IsacKnowledge","Inverse_Z_Transform","Theorems","ruleYZ"] 
neuper@42400
   454
 *** insert: preserved ["IsacKnowledge","Inverse_Z_Transform","Theorems","ruleZY"] 
neuper@42400
   455
 *** insert: preserved ["IsacKnowledge","Inverse_Z_Transform","Rulesets","inverse_z"] 
neuper@42400
   456
 *** insert: preserved ["IsacKnowledge","DiophantEq","Theorems","int_isolate_add"] 
neuper@42400
   457
 *** insert: preserved ["IsacKnowledge","Biegelinie","Theorems","Moment_Neigung"] 
neuper@42400
   458
 *** insert: preserved ["IsacKnowledge","Biegelinie","Theorems","Neigung_Moment"] 
neuper@42400
   459
 *** insert: preserved ["IsacKnowledge","Biegelinie","Theorems","Moment_Querkraft"] 
neuper@42400
   460
 *** insert: preserved ["IsacKnowledge","Biegelinie","Theorems","Querkraft_Moment"] 
neuper@42400
   461
 *** insert: preserved ["IsacKnowledge","Biegelinie","Theorems","make_fun_explicit"] 
neuper@42400
   462
 *** insert: preserved ["IsacKnowledge","Biegelinie","Theorems","Belastung_Querkraft"] 
neuper@42400
   463
 *** insert: preserved ["IsacKnowledge","Biegelinie","Theorems","Querkraft_Belastung"] 
neuper@42400
   464
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","x_quadrat"] 
neuper@42400
   465
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","null_minus"] 
neuper@42400
   466
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","subtrahiere"] 
neuper@42400
   467
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","tausche_mal"] 
neuper@42400
   468
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","tausche_plus"] 
neuper@42400
   469
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","subtrahiere_1"] 
neuper@42400
   470
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","tausche_minus"] 
neuper@42400
   471
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","vor_minus_mal"] 
neuper@42400
   472
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","tausche_mal_mal"] 
neuper@42400
   473
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","tausche_vor_mal"] 
neuper@42400
   474
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","tausche_vor_plus"] 
neuper@42400
   475
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","addiere_vor_minus"] 
neuper@42400
   476
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","subtrahiere_von_1"] 
neuper@42400
   477
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","tausche_plus_plus"] 
neuper@42400
   478
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","tausche_vor_minus"] 
neuper@42400
   479
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","klammer_minus_mult"] 
neuper@42400
   480
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","klammer_minus_plus"] 
neuper@42400
   481
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","klammer_mult_minus"] 
neuper@42400
   482
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","klammer_plus_minus"] 
neuper@42400
   483
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","tausche_minus_plus"] 
neuper@42400
   484
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","tausche_plus_minus"] 
neuper@42400
   485
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","klammer_minus_minus"] 
neuper@42400
   486
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","tausche_minus_minus"] 
neuper@42400
   487
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","subtrahiere_vor_minus"] 
neuper@42400
   488
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","vorzeichen_minus_weg1"] 
neuper@42400
   489
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","vorzeichen_minus_weg2"] 
neuper@42400
   490
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","vorzeichen_minus_weg3"] 
neuper@42400
   491
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","vorzeichen_minus_weg4"] 
neuper@42400
   492
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","addiere_eins_vor_minus"] 
neuper@42400
   493
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","subtrahiere_x_minus_plus"] 
neuper@42400
   494
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","subtrahiere_x_plus_minus"] 
neuper@42400
   495
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","subtrahiere_x_minus1_plus"] 
neuper@42400
   496
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","subtrahiere_x_minus_minus"] 
neuper@42400
   497
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","subtrahiere_x_minus_plus1"] 
neuper@42400
   498
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","subtrahiere_x_plus1_minus"] 
neuper@42400
   499
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","subtrahiere_x_plus_minus1"] 
neuper@42400
   500
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","subtrahiere_eins_vor_minus"] 
neuper@42400
   501
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","subtrahiere_x_minus1_minus"] 
neuper@42400
   502
 *** insert: preserved ["IsacKnowledge","PolyMinus","Theorems","subtrahiere_x_minus_minus1"] 
neuper@42400
   503
 *** insert: preserved ["IsacKnowledge","PolyMinus","Rulesets","ordne_alphabetisch"] 
neuper@42400
   504
 *** insert: preserved ["IsacKnowledge","PolyMinus","Rulesets","fasse_zusammen"] 
neuper@42400
   505
 *** insert: preserved ["IsacKnowledge","PolyMinus","Rulesets","verschoenere"] 
neuper@42400
   506
 *** insert: preserved ["IsacKnowledge","PolyMinus","Rulesets","ordne_monome"] 
neuper@42400
   507
 *** insert: preserved ["IsacKnowledge","PolyMinus","Rulesets","klammern_aufloesen"] 
neuper@42400
   508
 *** insert: preserved ["IsacKnowledge","PolyMinus","Rulesets","klammern_ausmultiplizieren"] 
neuper@42400
   509
 *** insert: preserved ["IsacKnowledge","Partial_Fractions","Theorems","ansatz_2nd_order"] 
neuper@42400
   510
 *** insert: preserved ["IsacKnowledge","Partial_Fractions","Theorems","ansatz_3rd_order"] 
neuper@42400
   511
 *** insert: preserved ["IsacKnowledge","Partial_Fractions","Theorems","ansatz_4th_order"] 
neuper@42400
   512
 *** insert: preserved ["IsacKnowledge","Partial_Fractions","Theorems","multiply_2nd_order"] 
neuper@42400
   513
 *** insert: preserved ["IsacKnowledge","Partial_Fractions","Theorems","multiply_3rd_order"] 
neuper@42400
   514
 *** insert: preserved ["IsacKnowledge","Partial_Fractions","Theorems","multiply_4th_order"] 
neuper@42400
   515
 *** insert: preserved ["IsacKnowledge","Partial_Fractions","Theorems","equival_trans_2nd_order"] 
neuper@42400
   516
 *** insert: preserved ["IsacKnowledge","Partial_Fractions","Theorems","equival_trans_3rd_order"] 
neuper@42400
   517
 *** insert: preserved ["IsacKnowledge","Partial_Fractions","Theorems","equival_trans_4th_order"] 
neuper@42400
   518
 *** insert: preserved ["IsacKnowledge","Partial_Fractions","Rulesets","ansatz_rls"] 
neuper@42400
   519
 *** insert: preserved ["IsacKnowledge","Partial_Fractions","Rulesets","multiply_ansatz"] 
neuper@42400
   520
 *** insert: preserved ["IsacKnowledge","Partial_Fractions","Rulesets","equival_trans"] 
neuper@42400
   521
 *** insert: preserved ["IsacKnowledge","DiffApp","Theorems","filterVar_Nil"] 
neuper@42400
   522
 *** insert: preserved ["IsacKnowledge","DiffApp","Theorems","filterVar_Const"] 
neuper@42400
   523
 *** insert: preserved ["IsacKnowledge","DiffApp","Rulesets","list_rls"] 
neuper@42400
   524
 *** insert: preserved ["IsacKnowledge","DiffApp","Rulesets","eval_rls"] 
neuper@42400
   525
 *** insert: preserved ["IsacKnowledge","Test","Theorems","radd_0"] 
neuper@42400
   526
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rsqare"] 
neuper@42400
   527
 *** insert: preserved ["IsacKnowledge","Test","Theorems","exp_pow"] 
neuper@42400
   528
 *** insert: preserved ["IsacKnowledge","Test","Theorems","power_1"] 
neuper@42400
   529
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rmult_0"] 
neuper@42400
   530
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rmult_1"] 
neuper@42400
   531
 *** insert: preserved ["IsacKnowledge","Test","Theorems","root_ge0"] 
neuper@42400
   532
 *** insert: preserved ["IsacKnowledge","Test","Theorems","radd_assoc"] 
neuper@42400
   533
 *** insert: preserved ["IsacKnowledge","Test","Theorems","root_ge0_1"] 
neuper@42400
   534
 *** insert: preserved ["IsacKnowledge","Test","Theorems","root_ge0_2"] 
neuper@42400
   535
 *** insert: preserved ["IsacKnowledge","Test","Theorems","mult_square"] 
neuper@42400
   536
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rcancel_den"] 
neuper@42400
   537
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rmult_assoc"] 
neuper@42400
   538
 *** insert: preserved ["IsacKnowledge","Test","Theorems","radd_0_right"] 
neuper@42400
   539
 *** insert: preserved ["IsacKnowledge","Test","Theorems","radd_commute"] 
neuper@42400
   540
 *** insert: preserved ["IsacKnowledge","Test","Theorems","root_add_ge0"] 
neuper@42400
   541
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rroot_to_lhs"] 
neuper@42400
   542
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rcancel_const"] 
neuper@42400
   543
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rmult_0_right"] 
neuper@42400
   544
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rmult_1_right"] 
neuper@42400
   545
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rmult_commute"] 
neuper@42400
   546
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rbinom_power_2"] 
neuper@42400
   547
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rcollect_right"] 
neuper@42400
   548
 *** insert: preserved ["IsacKnowledge","Test","Theorems","constant_square"] 
neuper@42400
   549
 *** insert: preserved ["IsacKnowledge","Test","Theorems","radd_real_const"] 
neuper@42400
   550
 *** insert: preserved ["IsacKnowledge","Test","Theorems","square_equality"] 
neuper@42400
   551
 *** insert: preserved ["IsacKnowledge","Test","Theorems","square_equation"] 
neuper@42400
   552
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rdistr_div_right"] 
neuper@42400
   553
 *** insert: preserved ["IsacKnowledge","Test","Theorems","risolate_bdv_add"] 
neuper@42400
   554
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rroot_square_inv"] 
neuper@42400
   555
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rroot_times_root"] 
neuper@42400
   556
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rshift_nominator"] 
neuper@42400
   557
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rtwo_of_the_same"] 
neuper@42400
   558
 *** insert: preserved ["IsacKnowledge","Test","Theorems","radd_left_commute"] 
neuper@42400
   559
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rcollect_one_left"] 
neuper@42400
   560
 *** insert: preserved ["IsacKnowledge","Test","Theorems","risolate_bdv_mult"] 
neuper@42400
   561
 *** insert: preserved ["IsacKnowledge","Test","Theorems","risolate_root_add"] 
neuper@42400
   562
 *** insert: preserved ["IsacKnowledge","Test","Theorems","risolate_root_div"] 
neuper@42400
   563
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rroot_to_lhs_mult"] 
neuper@42400
   564
 *** insert: preserved ["IsacKnowledge","Test","Theorems","square_equality_0"] 
neuper@42400
   565
 *** insert: preserved ["IsacKnowledge","Test","Theorems","radd_mult_distrib2"] 
neuper@42400
   566
 *** insert: preserved ["IsacKnowledge","Test","Theorems","radd_real_const_eq"] 
neuper@42400
   567
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rdistr_right_assoc"] 
neuper@42400
   568
 *** insert: preserved ["IsacKnowledge","Test","Theorems","risolate_root_mult"] 
neuper@42400
   569
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rmult_left_commute"] 
neuper@42400
   570
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rnorm_equation_add"] 
neuper@42400
   571
 *** insert: preserved ["IsacKnowledge","Test","Theorems","constant_mult_square"] 
neuper@42400
   572
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rdistr_right_assoc_p"] 
neuper@42400
   573
 *** insert: preserved ["IsacKnowledge","Test","Theorems","square_equation_left"] 
neuper@42400
   574
 *** insert: preserved ["IsacKnowledge","Test","Theorems","risolate_bdv_mult_add"] 
neuper@42400
   575
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rroot_to_lhs_add_mult"] 
neuper@42400
   576
 *** insert: preserved ["IsacKnowledge","Test","Theorems","square_equation_right"] 
neuper@42400
   577
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rroot_times_root_assoc"] 
neuper@42400
   578
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rtwo_of_the_same_assoc"] 
neuper@42400
   579
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rcollect_one_left_assoc"] 
neuper@42400
   580
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rroot_times_root_assoc_p"] 
neuper@42400
   581
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rtwo_of_the_same_assoc_p"] 
neuper@42400
   582
 *** insert: preserved ["IsacKnowledge","Test","Theorems","rcollect_one_left_assoc_p"] 
neuper@42400
   583
 *** insert: preserved ["IsacKnowledge","Test","Rulesets","testerls"] 
neuper@42400
   584
 *** insert: preserved ["IsacKnowledge","Test","Rulesets","Test_simplify"] 
neuper@42400
   585
 *** insert: preserved ["IsacKnowledge","Test","Rulesets","tval_rls"] 
neuper@42400
   586
 *** insert: preserved ["IsacKnowledge","Test","Rulesets","isolate_root"] 
neuper@42400
   587
 *** insert: preserved ["IsacKnowledge","Test","Rulesets","isolate_bdv"] 
neuper@42400
   588
 *** insert: preserved ["IsacKnowledge","Test","Rulesets","matches"] 
neuper@42400
   589
 *** insert: preserved ["IsacKnowledge","Test","Rulesets","norm_equation"] 
neuper@42400
   590
 *** insert: preserved ["IsacKnowledge","Test","Rulesets","ac_plus_times"] 
neuper@42400
   591
 *** insert: preserved ["IsacKnowledge","Test","Rulesets","rearrange_assoc"] 
neuper@42400
   592
 *** insert: preserved ["IsacKnowledge","Test","Rulesets","make_polytest"] 
neuper@42400
   593
 *** insert: preserved ["IsacKnowledge","Test","Rulesets","expand_binomtest"] 
neuper@42400
   594
 *** insert: preserved ["IsacKnowledge","EqSystem","Theorems","separate_bdvs0"] 
neuper@42400
   595
 *** insert: preserved ["IsacKnowledge","EqSystem","Theorems","order_system_NxN"] 
neuper@42400
   596
 *** insert: preserved ["IsacKnowledge","EqSystem","Theorems","separate_bdvs_add"] 
neuper@42400
   597
 *** insert: preserved ["IsacKnowledge","EqSystem","Theorems","commute_0_equality"] 
neuper@42400
   598
 *** insert: preserved ["IsacKnowledge","EqSystem","Theorems","separate_bdvs_add1"] 
neuper@42400
   599
 *** insert: preserved ["IsacKnowledge","EqSystem","Theorems","separate_bdvs_add2"] 
neuper@42400
   600
 *** insert: preserved ["IsacKnowledge","EqSystem","Theorems","separate_bdvs_mult"] 
neuper@42400
   601
 *** insert: preserved ["IsacKnowledge","EqSystem","Rulesets","simplify_System_parenthesized"] 
neuper@42400
   602
 *** insert: preserved ["IsacKnowledge","EqSystem","Rulesets","simplify_System"] 
neuper@42400
   603
 *** insert: preserved ["IsacKnowledge","EqSystem","Rulesets","isolate_bdvs"] 
neuper@42400
   604
 *** insert: preserved ["IsacKnowledge","EqSystem","Rulesets","isolate_bdvs_4x4"] 
neuper@42400
   605
 *** insert: preserved ["IsacKnowledge","EqSystem","Rulesets","order_system"] 
neuper@42400
   606
 *** insert: preserved ["IsacKnowledge","EqSystem","Rulesets","order_add_mult_System"] 
neuper@42400
   607
 *** insert: preserved ["IsacKnowledge","EqSystem","Rulesets","norm_System_noadd_fractions"] 
neuper@42400
   608
 *** insert: preserved ["IsacKnowledge","EqSystem","Rulesets","norm_System"] 
neuper@42400
   609
 *** insert: preserved ["IsacKnowledge","Integrate","Theorems","integral_add"] 
neuper@42400
   610
 *** insert: preserved ["IsacKnowledge","Integrate","Theorems","integral_pow"] 
neuper@42400
   611
 *** insert: preserved ["IsacKnowledge","Integrate","Theorems","integral_var"] 
neuper@42400
   612
 *** insert: preserved ["IsacKnowledge","Integrate","Theorems","integral_mult"] 
neuper@42400
   613
 *** insert: preserved ["IsacKnowledge","Integrate","Theorems","integral_const"] 
neuper@42400
   614
 *** insert: preserved ["IsacKnowledge","Integrate","Rulesets","integration_rules"] 
neuper@42400
   615
 *** insert: preserved ["IsacKnowledge","Integrate","Rulesets","add_new_c"] 
neuper@42400
   616
 *** insert: preserved ["IsacKnowledge","Integrate","Rulesets","simplify_Integral"] 
neuper@42400
   617
 *** insert: preserved ["IsacKnowledge","Integrate","Rulesets","integration"] 
neuper@42400
   618
 *** insert: preserved ["IsacKnowledge","Integrate","Rulesets","separate_bdv2"] 
neuper@42400
   619
 *** insert: preserved ["IsacKnowledge","Integrate","Rulesets","norm_Rational_noadd_fractions"] 
neuper@42400
   620
 *** insert: preserved ["IsacKnowledge","Integrate","Rulesets","norm_Rational_rls_noadd_fractions"] 
neuper@42400
   621
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_ln"] 
neuper@42400
   622
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_cos"] 
neuper@42400
   623
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_dif"] 
neuper@42400
   624
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_exp"] 
neuper@42400
   625
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_pow"] 
neuper@42400
   626
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_sin"] 
neuper@42400
   627
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_sum"] 
neuper@42400
   628
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_var"] 
neuper@42400
   629
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_prod"] 
neuper@42400
   630
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_quot"] 
neuper@42400
   631
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","frac_conv"] 
neuper@42400
   632
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","root_conv"] 
neuper@42400
   633
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","sqrt_conv"] 
neuper@42400
   634
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_const"] 
neuper@42400
   635
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_ln_chain"] 
neuper@42400
   636
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","frac_sym_conv"] 
neuper@42400
   637
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","root_sym_conv"] 
neuper@42400
   638
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","sqrt_conv_bdv"] 
neuper@42400
   639
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","sqrt_sym_conv"] 
neuper@42400
   640
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_cos_chain"] 
neuper@42400
   641
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_exp_chain"] 
neuper@42400
   642
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_pow_chain"] 
neuper@42400
   643
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_sin_chain"] 
neuper@42400
   644
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","diff_prod_const"] 
neuper@42400
   645
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","realpow_pow_bdv"] 
neuper@42400
   646
 *** insert: preserved ["IsacKnowledge","Diff","Theorems","sqrt_conv_bdv_n"] 
neuper@42400
   647
 *** insert: preserved ["IsacKnowledge","Diff","Rulesets","diff_rules"] 
neuper@42400
   648
 *** insert: preserved ["IsacKnowledge","Diff","Rulesets","norm_diff"] 
neuper@42400
   649
 *** insert: preserved ["IsacKnowledge","Diff","Rulesets","diff_conv"] 
neuper@42400
   650
 *** insert: preserved ["IsacKnowledge","Diff","Rulesets","diff_sym_conv"] 
neuper@42400
   651
 *** insert: preserved ["IsacKnowledge","Diff","Rulesets","erls"] 
neuper@42400
   652
 *** insert: preserved ["IsacKnowledge","LogExp","Theorems","equality_pow"] 
neuper@42400
   653
 *** insert: preserved ["IsacKnowledge","LogExp","Theorems","equality_power"] 
neuper@42400
   654
 *** insert: preserved ["IsacKnowledge","LogExp","Theorems","exp_invers_log"] 
neuper@42400
   655
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d0_true"] 
neuper@42400
   656
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","all_left"] 
neuper@42400
   657
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d0_false"] 
neuper@42400
   658
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","makex1_x"] 
neuper@42400
   659
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","plus_leq"] 
neuper@42400
   660
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d4_sub_u1"] 
neuper@42400
   661
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","minus_leq"] 
neuper@42400
   662
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_prescind1"] 
neuper@42400
   663
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_prescind2"] 
neuper@42400
   664
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_prescind3"] 
neuper@42400
   665
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_prescind4"] 
neuper@42400
   666
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","real_assoc_1"] 
neuper@42400
   667
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","real_assoc_2"] 
neuper@42400
   668
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","separate_bdv"] 
neuper@42400
   669
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_collect_1"] 
neuper@42400
   670
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_collect_2"] 
neuper@42400
   671
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_collect_3"] 
neuper@42400
   672
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_explicit1"] 
neuper@42400
   673
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_explicit2"] 
neuper@42400
   674
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_explicit3"] 
neuper@42400
   675
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula1"] 
neuper@42400
   676
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula2"] 
neuper@42400
   677
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula3"] 
neuper@42400
   678
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula4"] 
neuper@42400
   679
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula5"] 
neuper@42400
   680
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula6"] 
neuper@42400
   681
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula7"] 
neuper@42400
   682
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula8"] 
neuper@42400
   683
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula9"] 
neuper@42400
   684
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d1_isolate_div"] 
neuper@42400
   685
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula1"] 
neuper@42400
   686
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula2"] 
neuper@42400
   687
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula3"] 
neuper@42400
   688
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula4"] 
neuper@42400
   689
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula5"] 
neuper@42400
   690
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula6"] 
neuper@42400
   691
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula7"] 
neuper@42400
   692
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula8"] 
neuper@42400
   693
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula9"] 
neuper@42400
   694
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_isolate_div"] 
neuper@42400
   695
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula10"] 
neuper@42400
   696
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_isolate_div"] 
neuper@42400
   697
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","real_minus_div"] 
neuper@42400
   698
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","separate_1_bdv"] 
neuper@42400
   699
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","separate_bdv_n"] 
neuper@42400
   700
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_n_collect_1"] 
neuper@42400
   701
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_n_collect_2"] 
neuper@42400
   702
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_n_collect_3"] 
neuper@42400
   703
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d1_isolate_add1"] 
neuper@42400
   704
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d1_isolate_add2"] 
neuper@42400
   705
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula10"] 
neuper@42400
   706
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_isolate_add1"] 
neuper@42400
   707
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_isolate_add2"] 
neuper@42400
   708
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_isolate_add1"] 
neuper@42400
   709
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_isolate_add2"] 
neuper@42400
   710
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","complete_square1"] 
neuper@42400
   711
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","complete_square2"] 
neuper@42400
   712
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","complete_square3"] 
neuper@42400
   713
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","complete_square4"] 
neuper@42400
   714
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","complete_square5"] 
neuper@42400
   715
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","separate_1_bdv_n"] 
neuper@42400
   716
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","square_explicit1"] 
neuper@42400
   717
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","square_explicit2"] 
neuper@42400
   718
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula1_neg"] 
neuper@42400
   719
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula2_neg"] 
neuper@42400
   720
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula3_neg"] 
neuper@42400
   721
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula4_neg"] 
neuper@42400
   722
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula9_neg"] 
neuper@42400
   723
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_sqrt_equation1"] 
neuper@42400
   724
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_sqrt_equation2"] 
neuper@42400
   725
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_sqrt_equation3"] 
neuper@42400
   726
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_root_equation1"] 
neuper@42400
   727
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_root_equation2"] 
neuper@42400
   728
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula1_neg"] 
neuper@42400
   729
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula2_neg"] 
neuper@42400
   730
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula3_neg"] 
neuper@42400
   731
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula4_neg"] 
neuper@42400
   732
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula5_neg"] 
neuper@42400
   733
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_abcformula6_neg"] 
neuper@42400
   734
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_pqformula10_neg"] 
neuper@42400
   735
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_reduce_equation1"] 
neuper@42400
   736
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_reduce_equation2"] 
neuper@42400
   737
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation1"] 
neuper@42400
   738
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation2"] 
neuper@42400
   739
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation3"] 
neuper@42400
   740
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation4"] 
neuper@42400
   741
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation5"] 
neuper@42400
   742
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation6"] 
neuper@42400
   743
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation7"] 
neuper@42400
   744
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation8"] 
neuper@42400
   745
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation9"] 
neuper@42400
   746
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_collect_assoc1_1"] 
neuper@42400
   747
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_collect_assoc1_2"] 
neuper@42400
   748
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_collect_assoc1_3"] 
neuper@42400
   749
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_collect_assoc2_1"] 
neuper@42400
   750
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_collect_assoc2_2"] 
neuper@42400
   751
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_collect_assoc2_3"] 
neuper@42400
   752
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation10"] 
neuper@42400
   753
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation11"] 
neuper@42400
   754
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation12"] 
neuper@42400
   755
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation13"] 
neuper@42400
   756
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation14"] 
neuper@42400
   757
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation15"] 
neuper@42400
   758
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d3_reduce_equation16"] 
neuper@42400
   759
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","cancel_leading_coeff1"] 
neuper@42400
   760
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","cancel_leading_coeff2"] 
neuper@42400
   761
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","cancel_leading_coeff3"] 
neuper@42400
   762
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","cancel_leading_coeff4"] 
neuper@42400
   763
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","cancel_leading_coeff5"] 
neuper@42400
   764
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","cancel_leading_coeff6"] 
neuper@42400
   765
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","cancel_leading_coeff7"] 
neuper@42400
   766
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","cancel_leading_coeff8"] 
neuper@42400
   767
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","cancel_leading_coeff9"] 
neuper@42400
   768
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","d2_sqrt_equation1_neg"] 
neuper@42400
   769
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_n_collect_assoc1_1"] 
neuper@42400
   770
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_n_collect_assoc1_2"] 
neuper@42400
   771
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_n_collect_assoc1_3"] 
neuper@42400
   772
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_n_collect_assoc2_1"] 
neuper@42400
   773
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_n_collect_assoc2_2"] 
neuper@42400
   774
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","bdv_n_collect_assoc2_3"] 
neuper@42400
   775
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","cancel_leading_coeff10"] 
neuper@42400
   776
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","cancel_leading_coeff11"] 
neuper@42400
   777
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","cancel_leading_coeff12"] 
neuper@42400
   778
 *** insert: preserved ["IsacKnowledge","PolyEq","Theorems","cancel_leading_coeff13"] 
neuper@42400
   779
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","cancel_leading_coeff"] 
neuper@42400
   780
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","complete_square"] 
neuper@42400
   781
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","PolyEq_erls"] 
neuper@42400
   782
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","polyeq_simplify"] 
neuper@42400
   783
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","d0_polyeq_simplify"] 
neuper@42400
   784
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","d1_polyeq_simplify"] 
neuper@42400
   785
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","d2_polyeq_simplify"] 
neuper@42400
   786
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","d2_polyeq_bdv_only_simplify"] 
neuper@42400
   787
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","d2_polyeq_sq_only_simplify"] 
neuper@42400
   788
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","d2_polyeq_pqFormula_simplify"] 
neuper@42400
   789
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","d2_polyeq_abcFormula_simplify"] 
neuper@42400
   790
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","d3_polyeq_simplify"] 
neuper@42400
   791
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","d4_polyeq_simplify"] 
neuper@42400
   792
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","order_add_mult_in"] 
neuper@42400
   793
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","collect_bdv"] 
neuper@42400
   794
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","make_polynomial_in"] 
neuper@42400
   795
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","make_ratpoly_in"] 
neuper@42400
   796
 *** insert: preserved ["IsacKnowledge","PolyEq","Rulesets","separate_bdvs"] 
neuper@42400
   797
 *** insert: preserved ["IsacKnowledge","RootRatEq","Theorems","rootrat_equation_left_1"] 
neuper@42400
   798
 *** insert: preserved ["IsacKnowledge","RootRatEq","Theorems","rootrat_equation_left_2"] 
neuper@42400
   799
 *** insert: preserved ["IsacKnowledge","RootRatEq","Theorems","rootrat_equation_right_1"] 
neuper@42400
   800
 *** insert: preserved ["IsacKnowledge","RootRatEq","Theorems","rootrat_equation_right_2"] 
neuper@42400
   801
 *** insert: preserved ["IsacKnowledge","RootRatEq","Rulesets","RooRatEq_erls"] 
neuper@42400
   802
 *** insert: preserved ["IsacKnowledge","RootRatEq","Rulesets","rootrat_solve"] 
neuper@42400
   803
 *** insert: preserved ["IsacKnowledge","RootRat","Rulesets","rootrat_erls"] 
neuper@42400
   804
 *** insert: preserved ["IsacKnowledge","RootRat","Rulesets","calculate_RootRat"] 
neuper@42400
   805
 *** insert: preserved ["IsacKnowledge","RatEq","Theorems","real_rat_pow"] 
neuper@42400
   806
 *** insert: preserved ["IsacKnowledge","RatEq","Theorems","real_rat_mult_1"] 
neuper@42400
   807
 *** insert: preserved ["IsacKnowledge","RatEq","Theorems","real_rat_mult_2"] 
neuper@42400
   808
 *** insert: preserved ["IsacKnowledge","RatEq","Theorems","real_rat_mult_3"] 
neuper@42400
   809
 *** insert: preserved ["IsacKnowledge","RatEq","Theorems","rat_double_rat_1"] 
neuper@42400
   810
 *** insert: preserved ["IsacKnowledge","RatEq","Theorems","rat_double_rat_2"] 
neuper@42400
   811
 *** insert: preserved ["IsacKnowledge","RatEq","Theorems","rat_double_rat_3"] 
neuper@42400
   812
 *** insert: preserved ["IsacKnowledge","RatEq","Theorems","rat_mult_denominator_both"] 
neuper@42400
   813
 *** insert: preserved ["IsacKnowledge","RatEq","Theorems","rat_mult_denominator_left"] 
neuper@42400
   814
 *** insert: preserved ["IsacKnowledge","RatEq","Theorems","rat_mult_denominator_right"] 
neuper@42400
   815
 *** insert: preserved ["IsacKnowledge","RatEq","Rulesets","rateq_erls"] 
neuper@42400
   816
 *** insert: preserved ["IsacKnowledge","RatEq","Rulesets","RatEq_eliminate"] 
neuper@42400
   817
 *** insert: preserved ["IsacKnowledge","RatEq","Rulesets","RatEq_simplify"] 
neuper@42400
   818
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","makex1_x"] 
neuper@42400
   819
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","real_assoc_1"] 
neuper@42400
   820
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","real_assoc_2"] 
neuper@42400
   821
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_1"] 
neuper@42400
   822
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_2"] 
neuper@42400
   823
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_times_root_1"] 
neuper@42400
   824
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_times_root_2"] 
neuper@42400
   825
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_isolate_l_add1"] 
neuper@42400
   826
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_isolate_l_add2"] 
neuper@42400
   827
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_isolate_l_add3"] 
neuper@42400
   828
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_isolate_l_add4"] 
neuper@42400
   829
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_isolate_l_add5"] 
neuper@42400
   830
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_isolate_l_add6"] 
neuper@42400
   831
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_isolate_r_add1"] 
neuper@42400
   832
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_isolate_r_add2"] 
neuper@42400
   833
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_isolate_r_add3"] 
neuper@42400
   834
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_isolate_r_add4"] 
neuper@42400
   835
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_isolate_r_add5"] 
neuper@42400
   836
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_isolate_r_add6"] 
neuper@42400
   837
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_both_1"] 
neuper@42400
   838
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_both_2"] 
neuper@42400
   839
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_both_3"] 
neuper@42400
   840
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_both_4"] 
neuper@42400
   841
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_left_1"] 
neuper@42400
   842
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_left_2"] 
neuper@42400
   843
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_left_3"] 
neuper@42400
   844
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_left_4"] 
neuper@42400
   845
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_left_5"] 
neuper@42400
   846
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_left_6"] 
neuper@42400
   847
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_right_1"] 
neuper@42400
   848
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_right_2"] 
neuper@42400
   849
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_right_3"] 
neuper@42400
   850
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_right_4"] 
neuper@42400
   851
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_right_5"] 
neuper@42400
   852
 *** insert: preserved ["IsacKnowledge","RootEq","Theorems","sqrt_square_equation_right_6"] 
neuper@42400
   853
 *** insert: preserved ["IsacKnowledge","RootEq","Rulesets","RootEq_erls"] 
neuper@42400
   854
 *** insert: preserved ["IsacKnowledge","RootEq","Rulesets","rooteq_srls"] 
neuper@42400
   855
 *** insert: preserved ["IsacKnowledge","RootEq","Rulesets","sqrt_isolate"] 
neuper@42400
   856
 *** insert: preserved ["IsacKnowledge","RootEq","Rulesets","l_sqrt_isolate"] 
neuper@42400
   857
 *** insert: preserved ["IsacKnowledge","RootEq","Rulesets","r_sqrt_isolate"] 
neuper@42400
   858
 *** insert: preserved ["IsacKnowledge","RootEq","Rulesets","rooteq_simplify"] 
neuper@42400
   859
 *** insert: preserved ["IsacKnowledge","LinEq","Theorems","all_left"] 
neuper@42400
   860
 *** insert: preserved ["IsacKnowledge","LinEq","Theorems","makex1_x"] 
neuper@42400
   861
 *** insert: preserved ["IsacKnowledge","LinEq","Theorems","real_assoc_1"] 
neuper@42400
   862
 *** insert: preserved ["IsacKnowledge","LinEq","Theorems","real_assoc_2"] 
neuper@42400
   863
 *** insert: preserved ["IsacKnowledge","LinEq","Theorems","lin_isolate_div"] 
neuper@42400
   864
 *** insert: preserved ["IsacKnowledge","LinEq","Theorems","lin_isolate_add1"] 
neuper@42400
   865
 *** insert: preserved ["IsacKnowledge","LinEq","Theorems","lin_isolate_add2"] 
neuper@42400
   866
 *** insert: preserved ["IsacKnowledge","LinEq","Rulesets","LinEq_erls"] 
neuper@42400
   867
 *** insert: preserved ["IsacKnowledge","LinEq","Rulesets","LinPoly_simplify"] 
neuper@42400
   868
 *** insert: preserved ["IsacKnowledge","LinEq","Rulesets","LinEq_simplify"] 
neuper@42400
   869
 *** insert: preserved ["IsacKnowledge","Root","Theorems","root_false"] 
neuper@42400
   870
 *** insert: preserved ["IsacKnowledge","Root","Theorems","realpow_mul"] 
neuper@42400
   871
 *** insert: preserved ["IsacKnowledge","Root","Theorems","real_diff_minus"] 
neuper@42400
   872
 *** insert: preserved ["IsacKnowledge","Root","Theorems","root_plus_minus"] 
neuper@42400
   873
 *** insert: preserved ["IsacKnowledge","Root","Theorems","real_root_negative"] 
neuper@42400
   874
 *** insert: preserved ["IsacKnowledge","Root","Theorems","real_root_positive"] 
neuper@42400
   875
 *** insert: preserved ["IsacKnowledge","Root","Theorems","real_mm_binom_times"] 
neuper@42400
   876
 *** insert: preserved ["IsacKnowledge","Root","Theorems","real_mp_binom_times"] 
neuper@42400
   877
 *** insert: preserved ["IsacKnowledge","Root","Theorems","real_pm_binom_times"] 
neuper@42400
   878
 *** insert: preserved ["IsacKnowledge","Root","Theorems","real_pp_binom_times"] 
neuper@42400
   879
 *** insert: preserved ["IsacKnowledge","Root","Theorems","real_plus_binom_pow2"] 
neuper@42400
   880
 *** insert: preserved ["IsacKnowledge","Root","Theorems","real_plus_binom_pow3"] 
neuper@42400
   881
 *** insert: preserved ["IsacKnowledge","Root","Theorems","real_minus_binom_pow2"] 
neuper@42400
   882
 *** insert: preserved ["IsacKnowledge","Root","Theorems","real_minus_binom_pow3"] 
neuper@42400
   883
 *** insert: preserved ["IsacKnowledge","Root","Theorems","real_plus_binom_times"] 
neuper@42400
   884
 *** insert: preserved ["IsacKnowledge","Root","Theorems","real_minus_binom_times"] 
neuper@42400
   885
 *** insert: preserved ["IsacKnowledge","Root","Theorems","real_plus_minus_binom1"] 
neuper@42400
   886
 *** insert: preserved ["IsacKnowledge","Root","Theorems","real_plus_minus_binom2"] 
neuper@42400
   887
 *** insert: preserved ["IsacKnowledge","Root","Rulesets","Root_erls"] 
neuper@42400
   888
 *** insert: preserved ["IsacKnowledge","Root","Rulesets","make_rooteq"] 
neuper@42400
   889
 *** insert: preserved ["IsacKnowledge","Root","Rulesets","expand_rootbinoms"] 
neuper@42400
   890
 *** insert: preserved ["IsacKnowledge","Equation","Rulesets","univariate_equation_prls"] 
neuper@42400
   891
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","rat_add"] 
neuper@42400
   892
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","rat_add1"] 
neuper@42400
   893
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","rat_add2"] 
neuper@42400
   894
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","rat_add3"] 
neuper@42400
   895
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","rat_mult"] 
neuper@42400
   896
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","add_minus"] 
neuper@42400
   897
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","rat_mult2"] 
neuper@42400
   898
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","rat_power"] 
neuper@42400
   899
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","add_minus1"] 
neuper@42400
   900
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","mult_cross"] 
neuper@42400
   901
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","mult_cross1"] 
neuper@42400
   902
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","mult_cross2"] 
neuper@42400
   903
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","rat_add_assoc"] 
neuper@42400
   904
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","rat_add1_assoc"] 
neuper@42400
   905
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","rat_add2_assoc"] 
neuper@42400
   906
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","rat_add3_assoc"] 
neuper@42400
   907
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","rat_mult_poly_l"] 
neuper@42400
   908
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","rat_mult_poly_r"] 
neuper@42400
   909
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","real_divide_divide1"] 
neuper@42400
   910
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","real_mult_div_cancel2"] 
neuper@42400
   911
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","real_times_divide_num"] 
neuper@42400
   912
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","real_divide_divide1_mg"] 
neuper@42400
   913
 *** insert: preserved ["IsacKnowledge","Rational","Theorems","real_times_divide_1_eq"] 
neuper@42400
   914
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","discard_minus"] 
neuper@42400
   915
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","calculate_Rational"] 
neuper@42400
   916
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","calc_rat_erls"] 
neuper@42400
   917
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","rational_erls"] 
neuper@42400
   918
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","cancel_p"] 
neuper@42400
   919
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","cancel"] 
neuper@42400
   920
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","common_nominator_p"] 
neuper@42400
   921
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","common_nominator_p_rls"] 
neuper@42400
   922
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","common_nominator"] 
neuper@42400
   923
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","powers_erls"] 
neuper@42400
   924
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","powers"] 
neuper@42400
   925
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","rat_mult_divide"] 
neuper@42400
   926
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","reduce_0_1_2"] 
neuper@42400
   927
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","rat_reduce_1"] 
neuper@42400
   928
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","norm_rat_erls"] 
neuper@42400
   929
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","norm_Rational"] 
neuper@42400
   930
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","norm_Rational_rls"] 
neuper@42400
   931
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","norm_Rational_parenthesized"] 
neuper@42400
   932
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","rat_mult_poly"] 
neuper@42400
   933
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","rat_mult_div_pow"] 
neuper@42400
   934
 *** insert: preserved ["IsacKnowledge","Rational","Rulesets","cancel_p_rls"] 
neuper@42400
   935
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_pow"] 
neuper@42400
   936
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_addI"] 
neuper@42400
   937
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_oneI"] 
neuper@42400
   938
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_twoI"] 
neuper@42400
   939
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_multI"] 
neuper@42400
   940
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_zeroI"] 
neuper@42400
   941
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_diff_plus"] 
neuper@42400
   942
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_plus_1"] 
neuper@42400
   943
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_diff_minus"] 
neuper@42400
   944
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_eq_oneI"] 
neuper@42400
   945
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_num_collect"] 
neuper@42400
   946
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_one_collect"] 
neuper@42400
   947
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_def_atom"] 
neuper@42400
   948
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_two_atom"] 
neuper@42400
   949
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_mult_2_assoc"] 
neuper@42400
   950
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_addI_atom"] 
neuper@42400
   951
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_minus_odd"] 
neuper@42400
   952
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_minus_even"] 
neuper@42400
   953
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_minus_oneI"] 
neuper@42400
   954
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_multI_poly"] 
neuper@42400
   955
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_mm_binom_times"] 
neuper@42400
   956
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_mp_binom_times"] 
neuper@42400
   957
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_mult_2_assoc_l"] 
neuper@42400
   958
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_mult_2_assoc_r"] 
neuper@42400
   959
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_pm_binom_times"] 
neuper@42400
   960
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_pp_binom_times"] 
neuper@42400
   961
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_plus_1_atom"] 
neuper@42400
   962
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_binom_pow2"] 
neuper@42400
   963
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_binom_pow3"] 
neuper@42400
   964
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_binom_pow4"] 
neuper@42400
   965
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_binom_pow5"] 
neuper@42400
   966
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_addI_assoc_l"] 
neuper@42400
   967
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_addI_assoc_r"] 
neuper@42400
   968
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_twoI_assoc_l"] 
neuper@42400
   969
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_twoI_assoc_r"] 
neuper@42400
   970
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_minus_binom_pow2"] 
neuper@42400
   971
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_minus_binom_pow3"] 
neuper@42400
   972
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_binom_times"] 
neuper@42400
   973
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_minus_binom_times"] 
neuper@42400
   974
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_num_collect_assoc"] 
neuper@42400
   975
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_one_collect_assoc"] 
neuper@42400
   976
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_binom_times1"] 
neuper@42400
   977
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_binom_times2"] 
neuper@42400
   978
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_minus_binom1"] 
neuper@42400
   979
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_minus_binom2"] 
neuper@42400
   980
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_plus_1_assoc_l"] 
neuper@42400
   981
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_plus_1_assoc_r"] 
neuper@42400
   982
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_minus_binom_pow2_p"] 
neuper@42400
   983
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_minus_binom_pow3_p"] 
neuper@42400
   984
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","realpow_plus_1_assoc_l2"] 
neuper@42400
   985
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_num_collect_assoc_l"] 
neuper@42400
   986
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_num_collect_assoc_r"] 
neuper@42400
   987
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_one_collect_assoc_l"] 
neuper@42400
   988
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_one_collect_assoc_r"] 
neuper@42400
   989
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_minus_binom1_p"] 
neuper@42400
   990
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_minus_binom2_p"] 
neuper@42400
   991
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_binom_pow2_poly"] 
neuper@42400
   992
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_binom_pow3_poly"] 
neuper@42400
   993
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_binom_pow4_poly"] 
neuper@42400
   994
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_binom_pow5_poly"] 
neuper@42400
   995
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_add_mult_distrib_poly"] 
neuper@42400
   996
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_minus_binom1_p_p"] 
neuper@42400
   997
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_plus_minus_binom2_p_p"] 
neuper@42400
   998
 *** insert: preserved ["IsacKnowledge","Poly","Theorems","real_add_mult_distrib2_poly"] 
neuper@42400
   999
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","norm_Poly"] 
neuper@42400
  1000
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","Poly_erls"] 
neuper@42400
  1001
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","expand"] 
neuper@42400
  1002
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","expand_poly"] 
neuper@42400
  1003
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","simplify_power"] 
neuper@42400
  1004
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","order_add_mult"] 
neuper@42400
  1005
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","collect_numerals"] 
neuper@42400
  1006
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","collect_numerals_"] 
neuper@42400
  1007
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","reduce_012"] 
neuper@42400
  1008
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","discard_parentheses"] 
neuper@42400
  1009
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","make_polynomial"] 
neuper@42400
  1010
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","expand_binoms"] 
neuper@42400
  1011
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","rev_rew_p"] 
neuper@42400
  1012
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","expand_poly_"] 
neuper@42400
  1013
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","expand_poly_rat_"] 
neuper@42400
  1014
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","simplify_power_"] 
neuper@42400
  1015
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","calc_add_mult_pow_"] 
neuper@42400
  1016
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","reduce_012_mult_"] 
neuper@42400
  1017
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","reduce_012_"] 
neuper@42400
  1018
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","discard_parentheses1"] 
neuper@42400
  1019
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","order_mult_rls_"] 
neuper@42400
  1020
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","order_add_rls_"] 
neuper@42400
  1021
 *** insert: preserved ["IsacKnowledge","Poly","Rulesets","make_rat_poly_with_parentheses"] 
neuper@42400
  1022
 *** insert: preserved ["IsacKnowledge","Atools","Theorems","or_true"] 
neuper@42400
  1023
 *** insert: preserved ["IsacKnowledge","Atools","Theorems","and_true"] 
neuper@42400
  1024
 *** insert: preserved ["IsacKnowledge","Atools","Theorems","not_true"] 
neuper@42400
  1025
 *** insert: preserved ["IsacKnowledge","Atools","Theorems","or_false"] 
neuper@42400
  1026
 *** insert: preserved ["IsacKnowledge","Atools","Theorems","rat_leq1"] 
neuper@42400
  1027
 *** insert: preserved ["IsacKnowledge","Atools","Theorems","rat_leq2"] 
neuper@42400
  1028
 *** insert: preserved ["IsacKnowledge","Atools","Theorems","rat_leq3"] 
neuper@42400
  1029
 *** insert: preserved ["IsacKnowledge","Atools","Theorems","rle_refl"] 
neuper@42400
  1030
 *** insert: preserved ["IsacKnowledge","Atools","Theorems","and_false"] 
neuper@42400
  1031
 *** insert: preserved ["IsacKnowledge","Atools","Theorems","last_thmI"] 
neuper@42400
  1032
 *** insert: preserved ["IsacKnowledge","Atools","Theorems","not_false"] 
neuper@42400
  1033
 *** insert: preserved ["IsacKnowledge","Atools","Theorems","or_commute"] 
neuper@42400
  1034
 *** insert: preserved ["IsacKnowledge","Atools","Theorems","and_commute"] 
neuper@42400
  1035
 *** insert: preserved ["IsacKnowledge","Atools","Theorems","real_unari_minus"] 
neuper@42400
  1036
 *** insert: preserved ["IsacKnowledge","Atools","Theorems","radd_left_cancel_le"] 
neuper@42400
  1037
 *** insert: preserved ["IsacKnowledge","Delete","Theorems","real_diff_0"] 
neuper@42400
  1038
 *** insert: preserved ["IsacKnowledge","Delete","Theorems","real_mult_2"] 
neuper@42400
  1039
 *** insert: preserved ["IsacKnowledge","Delete","Theorems","real_mult_minus1"] 
neuper@42400
  1040
 *** insert: preserved ["IsacKnowledge","Delete","Theorems","real_mult_left_commute"] 
neuper@42400
  1041
 *** insert: preserved ["IsacKnowledge","Script","Theorems","arity_type_ID"] 
neuper@42400
  1042
 *** insert: preserved ["IsacKnowledge","Script","Theorems","arity_type_arg"] 
neuper@42400
  1043
 *** insert: preserved ["IsacKnowledge","Tools","Theorems","arity_type_cpy"] 
neuper@42400
  1044
 *** insert: preserved ["IsacKnowledge","Tools","Theorems","arity_type_nam"] 
neuper@42400
  1045
 *** insert: preserved ["IsacKnowledge","Tools","Theorems","arity_type_str"] 
neuper@42400
  1046
 *** insert: preserved ["IsacKnowledge","Tools","Theorems","arity_type_una"] 
neuper@42400
  1047
 *** insert: preserved ["IsacKnowledge","Tools","Theorems","arity_type_unl"] 
neuper@42400
  1048
 *** insert: preserved ["IsacKnowledge","Tools","Theorems","arity_type_toreal"] 
neuper@42400
  1049
 *** insert: preserved ["IsacKnowledge","Tools","Theorems","arity_type_unknow"] 
neuper@42400
  1050
 *** insert: preserved ["IsacKnowledge","Tools","Theorems","arity_type_tobooll"] 
neuper@42400
  1051
 *** insert: preserved ["IsacKnowledge","Tools","Theorems","arity_type_toreall"] 
neuper@42400
  1052
 *** insert: preserved ["IsacKnowledge","Tools","Rulesets","e_rls"] 
neuper@42400
  1053
 *** insert: preserved ["IsacKnowledge","Tools","Rulesets","e_rrls"] 
neuper@42400
  1054
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","LAST"]  = ["IsacScripts","ListC"---\
neuper@42400
  1055
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","hd_thm"]
neuper@42400
  1056
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","tl_Nil"] 
neuper@42400
  1057
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","NTH_NIL"] 
neuper@42400
  1058
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","del_def"] 
neuper@42400
  1059
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","map_Nil"] 
neuper@42400
  1060
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","mem_Nil"] 
neuper@42400
  1061
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","rev_Nil"] 
neuper@42400
  1062
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","tl_Cons"] 
neuper@42400
  1063
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","zip_Nil"] 
neuper@42400
  1064
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","NTH_CONS"] 
neuper@42400
  1065
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","map_Cons"] 
neuper@42400
  1066
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","mem_Cons"] 
neuper@42400
  1067
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","null_Nil"] 
neuper@42400
  1068
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","rev_Cons"] 
neuper@42400
  1069
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","zip_Cons"] 
neuper@42400
  1070
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","foldr_Nil"] 
neuper@42400
  1071
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","null_Cons"] 
neuper@42400
  1072
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","LENGTH_def"] 
neuper@42400
  1073
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","append_Nil"] 
neuper@42400
  1074
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","concat_Nil"] 
neuper@42400
  1075
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","filter_Nil"] 
neuper@42400
  1076
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","foldr_Cons"] 
neuper@42400
  1077
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","append_Cons"] 
neuper@42400
  1078
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","butlast_Nil"] 
neuper@42400
  1079
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","concat_Cons"] 
neuper@42400
  1080
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","filter_Cons"] 
neuper@42400
  1081
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","remdups_Nil"] 
neuper@42400
  1082
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","butlast_Cons"] 
neuper@42400
  1083
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","distinct_Nil"] 
neuper@42400
  1084
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","remdups_Cons"] 
neuper@42400
  1085
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","distinct_Cons"] 
neuper@42400
  1086
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","dropWhile_Nil"] 
neuper@42400
  1087
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","takeWhile_Nil"] 
neuper@42400
  1088
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","dropWhile_Cons"] 
neuper@42400
  1089
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","takeWhile_Cons"] 
neuper@42400
  1090
 *** insert: preserved ["IsacKnowledge","ListC","Theorems","list_diff_def_raw"]=["IsacScripts"---/
neuper@42400
  1091
 val it = (): unit
neuper@42400
  1092
 
neuper@42400
  1093
*)
neuper@48895
  1094
neuper@48895
  1095
"-------- retrieve errpats ------------------------------";
neuper@48895
  1096
"-------- retrieve errpats ------------------------------";
neuper@48895
  1097
"-------- retrieve errpats ------------------------------";
neuper@48895
  1098
val {errpats, nrls, scr = Prog prog, ...} = get_met ["diff", "differentiate_on_R"];
neuper@48895
  1099
case errpats of [("chain-rule-diff-both", _, _)] => () 
neuper@48895
  1100
  | _ => error "errpats chain-rule-diff-both changed"
neuper@48895
  1101