1 (* Title: All tests on isac (some outcommented since Isabelle2002-->2009-2)
2 Author: Walther Neuper 101001
3 (c) copyright due to license terms.
5 Isac's tests are organised parallel to sources:
6 $ISABELLE_ISAC_TEST has same directory structure as $ISABELLE_ISAC
8 $ISABELLE_ISAC_TEST/Tools/isac/ADDTESTS
9 $ISABELLE_ISAC_TEST/Tools/isac/Minisubpbl: the Lucas-Interpreter's core functionality
11 Note, that only the first error in a file is shown here.
14 section \<open>Notes on running tests\<close>
15 subsection \<open>Switch between running tests and updating code\<close>
17 Isac encapsulates code as much as possible in structures without open.
18 This policy conflicts with those tests, which go into functions to details
19 not declared in the signatures.
21 subsection \<open>Decide between running Test_Isac_Short.thy and Test_Isac.thy\<close>
23 Some tests raise exception Size raised (line 171 of "./basis/LibrarySupport.sml")
24 if run in x86_64_32 mode of Poly/ML 5.8 (which is set as default).
25 This exception can be avoided by ML_system_64 = "true" in ~/.isabelle/isabisac/etc/preferences.
26 A model is in the repository at ~~/etc/preferences.
27 These preferences have drawbacks, however:
28 * they claim more memory such that Isabelle instances canNOT run in parallel.
29 * they do NOT reach Build_Isac.thy hanging in Build_Thydata.thy, see there.
31 So default for Build_Isac.thy and for general testing is Test_Isac_Short.thy is x86_64_32 mode.
32 From time to time full testing in Test_Isac.thy is recommended. For that purpose
33 * set ML_system_64 = "true" in ~/.isabelle/isabisac/etc/preferences.
35 \\******************* don't forget to re-set defaults BEFORE updating code *******************//
37 Note that Isabelle/jEdit re-generates the preferences file on shutdown, thus always use
38 ***************** $ gedit ~/.isabelle/isabisac/etc/preferences &
41 section \<open>Run the tests\<close>
43 * say "OK" to the popup asking for theories to be loaded
44 * watch the <Theories> window for errors in the "imports" below
48 imports Isac.Build_Isac (* note that imports are WITHOUT open struct ..*)
49 (* in case of ERROR Bad theory import "Draft.Thy_All"..., open each theory one by one
50 and find out, which ML_file or *.thy causes an error (might be ONLY one).
51 Also backup files (#* ) recognised by jEdit cause this trouble *)
52 (*/---------------------- do Minisubpbl before ADDTESTS/All_Ctxt ------------------------------\*)
53 (* "$ISABELLE_ISAC_TEST/ADDTESTS/accumulate-val/Thy_All"(*but ok in editor*)*)
54 (**)"$ISABELLE_ISAC_TEST/Tools/isac/ADDTESTS/accumulate-val/Lucas_Interpreter"
55 (**)"$ISABELLE_ISAC_TEST/Tools/isac/ADDTESTS/Ctxt"
56 (**)"$ISABELLE_ISAC_TEST/Tools/isac/ADDTESTS/test-depend/Build_Test"
57 (**)"$ISABELLE_ISAC_TEST/Tools/isac/ADDTESTS/All_Ctxt"
58 (**)"$ISABELLE_ISAC_TEST/Tools/isac/ADDTESTS/Test_Units"
59 (**)"$ISABELLE_ISAC_TEST/Tools/isac/ADDTESTS/course/phst11/T1_Basics"
60 (**)"$ISABELLE_ISAC_TEST/Tools/isac/ADDTESTS/course/phst11/T2_Rewriting"
61 (**)"$ISABELLE_ISAC_TEST/Tools/isac/ADDTESTS/course/phst11/T3_MathEngine"
62 (**)"$ISABELLE_ISAC_TEST/Tools/isac/ADDTESTS/file-depend/BuildC_Test"
63 (*"ADDTESTS/course/SignalProcess/Build_Inverse_Z_Transform"
64 ADDTESTS/------------------------------------------- see end of tests *)
65 (*/~~~ these work directly from Pure, but create problems here ..
66 "$ISABELLE_ISAC_TEST/Pure/Isar/Keyword_ISAC.thy" (* Malformed theory import, "keywords" ?!? *)
67 "$ISABELLE_ISAC_TEST/Pure/Isar/Test_Parse_Isac.thy" (* Malformed theory import, "keywords" ?!? *)
68 "$ISABELLE_ISAC_TEST/Pure/Isar/Test_Parsers_Cookbook.thy" (* Malformed theory import ?!? *)
69 "$ISABELLE_ISAC_TEST/Pure/Isar/Theory_Commands" (* Duplicate outer syntax command "ISAC" *)
70 "$ISABELLE_ISAC_TEST/Pure/Isar/Downto_Synchronized" (* re-defines / breaks structures !!! *)
71 \~~~ .. these work independently, but create problems here *)
72 (**)"$ISABELLE_ISAC_TEST/Pure/Isar/Test_Parsers"
73 (**)"$ISABELLE_ISAC_TEST/HOL/Tools/Sledgehammer/Try_Sledgehammer"
74 (*/---------------------- do Minisubpbl before ADDTESTS/All_Ctxt ------------------------------\*)
75 "$ISABELLE_ISAC_TEST/Tools/isac/Specify/refine" (* setup for refine.sml *)
76 "$ISABELLE_ISAC_TEST/Tools/isac/ProgLang/calculate" (* setup for evaluate.sml *)
77 "$ISABELLE_ISAC_TEST/Tools/isac/Knowledge/integrate" (* setup for integrate.sml*)
79 (*\---------------------- do Minisubpbl before ADDTESTS/All_Ctxt ------------------------------/*)
80 "$ISABELLE_ISAC/Knowledge/GCD_Poly_OLD" (*not imported by Isac.thy*) (*Test_Isac_Short*)
81 "$ISABELLE_ISAC/Knowledge/GCD_Poly_FP" (*not imported by Isac.thy*) (*Test_Isac_Short*)
82 (*\---------------------- do Minisubpbl before ADDTESTS/All_Ctxt ------------------------------/*)
84 "$ISABELLE_ISAC_TEST/Tools/isac/BridgeJEdit/Test_VSCode_Example"
88 declare [[ML_print_depth = 20]] (*otherwise buffer overflow*)
90 ML \<open>open ML_System\<close>
94 open Test_Code; Test_Code.init_calc @{context};
95 open LItool; arguments_from_model;
103 open Error_Pattern_Def;
105 open Ctree; append_problem;
111 open Auto_Prog; rule2stac;
118 open Solve; (* NONE *)
119 open ContextC; transfer_asms_from_to;
120 open Tactic; (* NONE *)
123 open P_Model; (* NONE *)
128 open Rule_Set; Sequence;
136 Know_Store.set_ref_last_thy @{theory};
137 (*otherwise ERRORs in pbl-met-hierarchy.sml, refine.sml, evaluate.sml*)
140 section \<open>code for copy & paste ===============================================================\<close>
142 declare [[show_types]]
143 declare [[show_sorts]]
144 find_theorems "?a <= ?a"
150 ML_command \<open>Pretty.writeln prt\<close>
151 declare [[ML_print_depth = 999]]
152 declare [[ML_exception_trace]]
156 "~~~~~ fun xxx , args:"; val () = ();
157 "~~~~~ and xxx , args:"; val () = ();
158 "~~~~~ from fun xxx \<longrightarrow>fun yyy \<longrightarrow>fun zzz , return:"; val () = ();
159 "~~~~~ continue fun xxx"; val () = ();
160 (*if*) (*then*); (*else*); (*andalso*) (*case*) (*of*); (*return value*); (*in*) (*end*);
162 ^ "xxx" (*+*) (*+++*) (*keep for continuing YYYYY*) (*isa*) (*isa2*) (**)
163 \<close> ML \<open> (*//----------- build fun XXXXX -----------------------------------------------------\\*)
164 (*//------------------ build fun XXXXX -----------------------------------------------------\\*)
165 (*\\------------------ build fun XXXXX -----------------------------------------------------//*)
166 \<close> ML \<open> (*\\----------- build fun XXXXX -----------------------------------------------------//*)
168 val return_XXXXX = "XXXXX"
169 \<close> ML \<open> (*//----------- step into XXXXX -----------------------------------------------------\\*)
170 (*//------------------ step into XXXXX -----------------------------------------------------\\*)
171 \<close> ML \<open> (*||----------- contine-- XXXXX -------------------------------------------------------*)
172 (*||------------------ contine-- XXXXX -------------------------------------------------------*)
173 (*\\------------------ step into XXXXX -----------------------------------------------------//*)
174 \<close> ML \<open> (*\\----------- step into XXXXX -----------------------------------------------------//*)
175 val "XXXXX" = return_XXXXX;
177 (* final test ... ----------------------------------------------------------------------------*)
179 \<close> ML \<open> (*//----------- inserted hidden code ------------------------------------------------\\*)
180 (*//------------------ inserted hidden code ------------------------------------------------\\*)
181 (*\\------------------ inserted hidden code ------------------------------------------------//*)
182 \<close> ML \<open> (*\\----------- inserted hidden code ------------------------------------------------//*)
190 section \<open>trials with Isabelle's functions\<close>
191 ML \<open>"%%%%%%%%%%%%%%%%% start Isabelle %%%%%%%%%%%%%%%%%%%%%%%";\<close>
192 ML_file "$ISABELLE_ISAC_TEST/Pure/General/alist.ML"
193 ML_file "$ISABELLE_ISAC_TEST/Pure/General/basics.ML"
194 ML_file "$ISABELLE_ISAC_TEST/Pure/General/scan.ML"
195 ML_file "$ISABELLE_ISAC_TEST/Pure/PIDE/xml.ML"
196 ML \<open>"%%%%%%%%%%%%%%%%% end Isabelle %%%%%%%%%%%%%%%%%%%%%%%%%";\<close>
198 section \<open>test ML Code of isac\<close>
199 subsection \<open>basic code first\<close>
200 ML \<open>"%%%%%%%%%%%%%%%%% start ProgLang.thy %%%%%%%%%%%%%%%%%%%";\<close>
201 ML_file "BaseDefinitions/base-definitions.sml"
202 ML_file "BaseDefinitions/libraryC.sml"
203 ML_file "BaseDefinitions/rule-def.sml"
204 ML_file "BaseDefinitions/eval-def.sml"
205 ML_file "BaseDefinitions/rewrite-order.sml"
206 ML_file "BaseDefinitions/theoryC.sml"
207 ML_file "BaseDefinitions/rule.sml"
208 ML_file "BaseDefinitions/thmC-def.sml"
209 ML_file "BaseDefinitions/model-pattern.sml"
210 ML_file "BaseDefinitions/error-fill-def.sml"
211 ML_file "BaseDefinitions/rule-set.sml"
212 ML_file "BaseDefinitions/check-unique.sml"
213 (*called by Know_Store..*)
214 ML_file "BaseDefinitions/calcelems.sml"
215 ML_file "BaseDefinitions/termC.sml"
216 ML_file "BaseDefinitions/substitution.sml"
217 ML_file "BaseDefinitions/contextC.sml"(*sometimes needs separation into ML blocks for evaluation*)
218 ML_file "BaseDefinitions/environment.sml"
219 (** )ML_file "BaseDefinitions/kestore.sml"( *setup in ADDTEST/accumulate-val/lucas_interpreter.sml*)
220 (*---------------------- do Minisubpbl before ADDTESTS/All_Ctxt --------------------------------
221 ---------------------- do Minisubpbl before ADDTESTS/All_Ctxt --------------------------------*)
223 ML_file "ProgLang/calculate.sml"
224 ML_file "ProgLang/evaluate.sml" (* requires setup from calculate.thy *)
225 ML_file "ProgLang/listC.sml"
226 ML_file "ProgLang/prog_expr.sml"
227 ML_file "ProgLang/program.sml"
228 ML_file "ProgLang/prog_tac.sml"
229 ML_file "ProgLang/tactical.sml"
230 ML_file "ProgLang/auto_prog.sml"
231 (*---------------------- do Minisubpbl before ADDTESTS/All_Ctxt --------------------------------
232 ---------------------- do Minisubpbl before ADDTESTS/All_Ctxt --------------------------------*)
234 subsection \<open>basic functionality on simple example first\<close>
235 ML_file "Minisubpbl/000-comments.sml"
236 ML_file "Minisubpbl/100-init-rootpbl.sml"
237 ML_file "Minisubpbl/150a-add-given-Maximum.sml"
238 ML_file "Minisubpbl/150-add-given-Equation.sml"
239 ML_file "Minisubpbl/200-start-method-NEXT_STEP.sml"
240 ML_file "Minisubpbl/200-start-method.sml"
241 ML_file "Minisubpbl/250-Rewrite_Set-from-method.sml"
242 ML_file "Minisubpbl/300-init-subpbl-NEXT_STEP.sml"
243 ML_file "Minisubpbl/300-init-subpbl.sml"
244 ML_file "Minisubpbl/400-start-meth-subpbl.sml"
245 ML_file "Minisubpbl/450-Rewrite_Set_Inst.sml"
246 ML_file "Minisubpbl/470-Check_elementwise-NEXT_STEP.sml"
247 ML_file "Minisubpbl/490-nxt-Check_Postcond.sml"
248 ML_file "Minisubpbl/500-met-sub-to-root.sml"
249 ML_file "Minisubpbl/530-error-Check_Elementwise.sml"
250 ML_file "Minisubpbl/600-postcond-NEXT_STEP.sml"
251 ML_file "Minisubpbl/600-postcond.sml"
252 ML_file "Minisubpbl/700-interSteps.sml"
253 ML_file "Minisubpbl/710-interSteps-short.sml"
254 ML_file "Minisubpbl/790-complete-NEXT_STEP.sml"
255 ML_file "Minisubpbl/790-complete.sml"
256 ML_file "Minisubpbl/800-append-on-Frm.sml"
258 subsection \<open>further functionality alongside batch build sequence\<close>
259 ML_file "MathEngBasic/thmC.sml"
260 ML_file "MathEngBasic/problem.sml"
261 ML_file "MathEngBasic/rewrite.sml"
262 ML_file "MathEngBasic/tactic.sml"
263 ML_file "MathEngBasic/ctree.sml" (*if red, get the file into a text buffer -- this might clear*)
264 ML_file "MathEngBasic/references.sml"
265 ML_file "MathEngBasic/calculation.sml"
267 ML_file "Specify/formalise.sml"
268 ML_file "Specify/o-model.sml"
269 ML_file "Specify/i-model.sml" (* (BROKEN!) test on elementwise input to lists*)
270 ML_file "Specify/pre-conditions.sml"
271 ML_file "Specify/p-model.sml"
272 ML_file "Specify/m-match.sml"
273 ML_file "Specify/refine.sml" (* requires setup from refine.thy *)
274 ML_file "Specify/test-out.sml"
275 ML_file "Specify/specify-step.sml"
276 ML_file "Specify/specification.sml"
277 ML_file "Specify/cas-command.sml"
278 ML_file "Specify/p-spec.sml"
279 (*ML_file "Specify/specify.sml" ---with M_Model.match_itms_oris broken elementwise input to lists*)
280 ML_file "Specify/sub-problem.sml"
281 ML_file "Specify/step-specify.sml"
283 ML_file "Interpret/istate.sml"
284 ML_file "Interpret/error-pattern.sml"
285 ML_file "Interpret/li-tool.sml"(*---with M_Model.match_itms_oris broken elementwise input to lists---*)
286 ML_file "Interpret/lucas-interpreter.sml"
287 ML_file "Interpret/step-solve.sml"
289 ML_file "MathEngine/me-misc.sml"
290 ML_file "MathEngine/fetch-tactics.sml"
291 ML_file "MathEngine/solve.sml"
292 ML_file "MathEngine/step.sml"
293 ML_file "MathEngine/mathengine-stateless.sml"
294 ML_file "MathEngine/messages.sml"
295 ML_file "MathEngine/states.sml"
297 ML_file "BridgeLibisabelle/mathml.sml" (*part.*)
298 ML_file "BridgeLibisabelle/pbl-met-hierarchy.sml"
299 ML_file "BridgeLibisabelle/interface-xml.sml" (*TODO after 2009-2*)
300 ML_file "BridgeLibisabelle/interface.sml"
302 (**) (* evaluated in Build_Isac.thy already *)
303 ML_file "BridgeJEdit/e-collect.sml"
304 ML_file "BridgeJEdit/user-model.sml"
305 ML_file "BridgeJEdit/template.sml"
306 ML_file "BridgeJEdit/preliminary.sml"
307 ML_file "BridgeJEdit/calculation.sml"
308 ML_file "BridgeJEdit/vscode-example.sml"
311 ML_file "Knowledge/delete.sml"
312 ML_file "Knowledge/descript.sml"
313 ML_file "Knowledge/simplify.sml"
314 ML_file "Knowledge/poly-1.sml"
315 ML_file "Knowledge/poly-2.sml" (*Test_Isac_Short*)
316 ML_file "Knowledge/gcd_poly_ml.sml"
317 ML_file "Knowledge/rational-1.sml"
318 ML_file "Knowledge/rational-2.sml" (*Test_Isac_Short*)
319 ML_file "Knowledge/equation.sml"
320 ML_file "Knowledge/root.sml"
321 ML_file "Knowledge/lineq.sml"
322 (*ML_file "Knowledge/rooteq.sml" some complicated equations not recovered from 2002 *)
323 ML_file "Knowledge/rateq.sml" (*some complicated equations not recovered----Test_Isac_Short*)
324 ML_file "Knowledge/rootrat.sml"
325 ML_file "Knowledge/rootrateq.sml"(*one complicated equations not recovered from 2002 *)
326 (*ML_file "Knowledge/partial_fractions.sml" hangs with ML_system_64 = "true"---Test_Isac_Short*)
327 ML_file "Knowledge/polyeq-1.sml"
328 ML_file "Knowledge/polyeq-2.sml" (*Test_Isac_Short*)
329 (*ML_file "Knowledge/rlang.sml" much to clean up, similar tests in other files *)
330 ML_file "Knowledge/calculus.sml"
331 ML_file "Knowledge/trig.sml"
332 (*ML_file "Knowledge/logexp.sml" not included as stuff for presentation of authoring*)
333 ML_file "Knowledge/diff.sml"
334 ML_file "Knowledge/integrate.sml"
335 (*see TODO WN230404* )
336 ML_file "Knowledge/eqsystem-1.sml"
337 ML_file "Knowledge/eqsystem-1a.sml"
338 ML_file "Knowledge/eqsystem-2.sml"
340 ML_file "Knowledge/test.sml"
341 ML_file "Knowledge/polyminus.sml"
342 ML_file "Knowledge/vect.sml"
343 ML_file "Knowledge/diff-app.sml" (* postponed to dev. specification | TP-prog. *)
344 ML_file "Knowledge/biegelinie-1.sml"
345 ML_file "Knowledge/biegelinie-2.sml" (*Test_Isac_Short*)
348 (* Title: Knowledge/biegelinie-3.sml
349 Author: Walther Neuper 050826
350 (c) due to copyright terms
352 "-----------------------------------------------------------------";
353 "table of contents -----------------------------------------------";
354 "-----------------------------------------------------------------";
355 "----------- SubProblem: auto method [Biegelinien,setzeRandbedingungenEin]--------------------";
356 "----------- SubProblem: me method [Biegelinien,setzeRandbedingungenEin]----------------------";
357 "---------------------------------------------------------------------------------------------";
358 "---------------------------------------------------------------------------------------------";
359 "---------------------------------------------------------------------------------------------";
362 "----------- SubProblem: auto method [Biegelinien,setzeRandbedingungenEin]--------------------";
363 "----------- SubProblem: auto method [Biegelinien,setzeRandbedingungenEin]--------------------";
364 "----------- SubProblem: auto method [Biegelinien,setzeRandbedingungenEin]--------------------";
365 val fmz = ["Funktionen [Q x = c + - 1 * q_0 * x," ^
366 "M_b x = c_2 + c * x + - 1 * q_0 / 2 * x \<up> 2," ^
367 "y' x = c_3 + 1 / (- 1 * EI) * (c_2 * x + c / 2 * x \<up> 2 + - 1 * q_0 / 6 * x \<up> 3)," ^
368 "y x = c_4 + c_3 * x + 1 / (- 1 * EI) * (c_2 / 2 * x \<up> 2 + c / 6 * x \<up> 3 + - 1 * q_0 / 24 * x \<up> 4)]",
369 "Randbedingungen [y 0 = (0::real), y L = 0, M_b 0 = 0, M_b L = 0]",
370 "Gleichungen equ_s"];
371 val (dI',pI',mI') = ("Biegelinie", ["setzeRandbedingungen", "Biegelinien"],
372 ["Biegelinien", "setzeRandbedingungenEin"]);
375 CalcTree @{context} [(fmz, (dI',pI',mI'))];
378 autoCalculate 1 CompleteCalc;
380 val ((pt, p),_) = States.get_calc 1;
381 if p = ([], Res) andalso (get_obj g_res pt (fst p) |> UnparseC.term @{context}) =
382 "[0 = - 1 * c_4 / - 1,\n 0 =\n (- 24 * c_4 + - 24 * L * c_3 + 12 * L \<up> 2 * c_2 + 4 * L \<up> 3 * c +\n - 1 * L \<up> 4 * q_0) /\n - 24,\n 0 = c_2, 0 = (2 * c_2 + 2 * L * c + - 1 * L \<up> 2 * q_0) / 2]"
383 (*"[0 = - 1 * c_4 / - 1,\n 0 =\n (- 24 * c_4 * EI + - 24 * L * c_3 * EI + 12 * L \<up> 2 * c_2 +\n 4 * L \<up> 3 * c +\n - 1 * L \<up> 4 * q_0) /\n (- 24 * EI),\n 0 = c_2, 0 = (2 * c_2 + 2 * L * c + - 1 * L \<up> 2 * q_0) / 2]"
384 ^^^ BEFORE fun Calc_Binop.simplify IS EVALUATEDO BY Simplifier.rewrite *)
385 then () else error "auto method [Biegelinien,setzeRandbedingungenEin] changed";
388 "----------- SubProblem: me method [Biegelinien,setzeRandbedingungenEin]----------------------";
389 "----------- SubProblem: me method [Biegelinien,setzeRandbedingungenEin]----------------------";
390 "----------- SubProblem: me method [Biegelinien,setzeRandbedingungenEin]----------------------";
391 val fmz = ["Funktionen [Q x = c + - 1 * q_0 * x," ^
392 "M_b x = c_2 + c * x + - 1 * q_0 / 2 * x \<up> 2," ^
393 "y' x = c_3 + 1 / (- 1 * EI) * (c_2 * x + c / 2 * x \<up> 2 + - 1 * q_0 / 6 * x \<up> 3)," ^
394 "y x = c_4 + c_3 * x + 1 / (- 1 * EI) * (c_2 / 2 * x \<up> 2 + c / 6 * x \<up> 3 + - 1 * q_0 / 24 * x \<up> 4)]",
395 "Randbedingungen [y 0 = (0::real), y L = 0, M_b 0 = 0, M_b L = 0]",
396 "Gleichungen equ_s"];
397 val (dI',pI',mI') = ("Biegelinie", ["setzeRandbedingungen", "Biegelinien"],
398 ["Biegelinien", "setzeRandbedingungenEin"]);
399 val p = e_pos'; val c = [];
400 val (p,_,f,nxt,_,pt) = Test_Code.init_calc @{context} [(fmz, (dI',pI',mI'))];
401 val (p,_,f,nxt,_,pt) = me nxt p c pt;val (p,_,f,nxt,_,pt) = me nxt p c pt;
402 val (p,_,f,nxt,_,pt) = me nxt p c pt;
403 (*[], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Add_Given "Funktionen [M_b x = c_2 + c * x + - 1 * q_0 / 2 * x \<up> 2, Q x = c + - 1 * q_0 * x, y' x =\nc_3 +\n1 / (- 1 * EI) * (c_2 * x + c / 2 * x \<up> 2 + - 1 * q_0 / 6 * x \<up> 3), y x =\nc_4 + c_3 * x +\n1 / (- 1 * EI) *\n(c_2 / 2 * x \<up> 2 + c / 6 * x \<up> 3 + - 1 * q_0 / 24 * x \<up> 4)]" = nxt
404 (*[], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Add_Given "Randbedingungen [y 0 = 0]" = nxt
405 (*[], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Add_Given "Randbedingungen [y 0 = 0, y L = 0]" = nxt
406 (*[], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Add_Given "Randbedingungen [y 0 = 0, y L = 0, M_b 0 = 0]" = nxt
407 (*[], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Add_Given "Randbedingungen [y L = 0, y 0 = 0, M_b 0 = 0, M_b L = 0]" = nxt
409 (*//----------- exception TERM raised (line 406 of ".."): isalist2list applied to NON-list: equ_s
410 since update of fun item_to_add, successor of CS f10bbfb2b3bb * )
411 (*[], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt;
413 (*[], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt;
414 val Specify_Problem ["setzeRandbedingungen", "Biegelinien"] = nxt
415 (*[], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Specify_Method ["Biegelinien", "setzeRandbedingungenEin"] = nxt
416 (*[], Met*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Apply_Method ["Biegelinien", "setzeRandbedingungenEin"] = nxt
419 "----- Randbedingung y 0 = 0 in SUBpbl with met [Equation, fromFunction]";
420 (*[1], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Model_Problem = nxt
422 (*+*)if (#1 o (get_obj g_fmz pt)) (fst p) =
423 (*+*) ["functionEq\n (y x =\n c_4 + c_3 * x +\n 1 / (- 1 * EI) *" ^
424 (*+*) "\n (c_2 / 2 * x \<up> 2 + c / 6 * x \<up> 3 + - 1 * q_0 / 24 * x \<up> 4))",
425 (*+*) "substitution (y 0 = 0)", "equality equ'''"] then ()
426 (*+*)else error "Met setzeRandbedingungenEin CHANGED";
428 (*+*)(writeln o Istate.string_of @{context}) (get_istate_LI pt p);
429 "--- after 1.subpbl [Equation, fromFunction]";
431 (*[1], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Add_Given "functionEq\n (y x =\n c_4 + c_3 * x +\n 1 / (- 1 * EI) *\n (c_2 / 2 * x \<up> 2 + c / 6 * x \<up> 3 + - 1 * q_0 / 24 * x \<up> 4))" = nxt
432 (*[1], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt;val (p,_,f,nxt,_,pt) = me nxt p c pt;
433 (*[1], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt;val (p,_,f,nxt,_,pt) = me nxt p c pt;
434 (*[1], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt;
435 (*[1], Met*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Apply_Method ["Equation", "fromFunction"] = nxt
437 (*[1, 1], Frm*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "y x =\nc_4 + c_3 * x +\n1 / (- 1 * EI) *\n(c_2 / 2 * x \<up> 2 + c / 6 * x \<up> 3 + - 1 * q_0 / 24 * x \<up> 4)" = f2str f
438 val Substitute ["x = 0"] = nxt
439 (*[1, 1], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Substitute ["y 0 = 0"] = nxt
440 (*[1, 2], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Rewrite_Set "norm_Rational" = nxt
441 (*[1, 3], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "0 = - 1 * c_4 / - 1" = f2str f
442 val Check_Postcond ["makeFunctionTo", "equation"] = nxt
444 "--- before 2.subpbl [Equation, fromFunction]";
445 (*[1], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "0 = - 1 * c_4 / - 1" = f2str f
446 val Subproblem ("Biegelinie", ["makeFunctionTo", "equation"]) = nxt
447 (*[2], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Model_Problem = nxt;
449 (*+*)if (#1 o (get_obj g_fmz pt)) (fst p) =
450 (*+*) ["functionEq\n (y x =\n c_4 + c_3 * x +\n 1 / (- 1 * EI) *\n (c_2 / 2 * x \<up> 2 + c / 6 * x \<up> 3 + - 1 * q_0 / 24 * x \<up> 4))",
451 (*+*) "substitution (y L = 0)", "equality equ'''"] then ()
452 (*+*)else error "biegelinie.sml metsetzeRandbed*Ein bb ";
454 (*[2], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Add_Given "functionEq\n (y x =\n c_4 + c_3 * x +\n 1 / (- 1 * EI) *\n (c_2 / 2 * x \<up> 2 + c / 6 * x \<up> 3 + - 1 * q_0 / 24 * x \<up> 4))" = nxt
455 val (p,_,f,nxt,_,pt) = me nxt p c pt; val (p,_,f,nxt,_,pt) = me nxt p c pt;
456 val (p,_,f,nxt,_,pt) = me nxt p c pt; val (p,_,f,nxt,_,pt) = me nxt p c pt;
457 (*[2], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Specify_Method ["Equation", "fromFunction"] = nxt
458 (*[2], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Apply_Method ["Equation", "fromFunction"] = nxt
460 (*[2, 1], Frm*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "y x =\nc_4 + c_3 * x +\n1 / (- 1 * EI) *\n(c_2 / 2 * x \<up> 2 + c / 6 * x \<up> 3 + - 1 * q_0 / 24 * x \<up> 4)" = f2str f
461 val Substitute ["x = L"] = nxt
462 (*[2, 1], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "y L =\nc_4 + c_3 * L +\n1 / (- 1 * EI) *\n(c_2 / 2 * L \<up> 2 + c / 6 * L \<up> 3 + - 1 * q_0 / 24 * L \<up> 4)" = f2str f
463 val Substitute ["y L = 0"] = nxt
464 (*[2, 2], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "0 =\nc_4 + c_3 * L +\n1 / (- 1 * EI) *\n(c_2 / 2 * L \<up> 2 + c / 6 * L \<up> 3 + - 1 * q_0 / 24 * L \<up> 4)" = f2str f
465 val Rewrite_Set "norm_Rational" = nxt
466 (*[2, 3], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "0 =\n(- 24 * c_4 + - 24 * L * c_3 + 12 * L \<up> 2 * c_2 + 4 * L \<up> 3 * c +\n - 1 * L \<up> 4 * q_0) /\n- 24" = f2str f
467 val Check_Postcond ["makeFunctionTo", "equation"] = nxt
469 (*[2], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "0 =\n(- 24 * c_4 + - 24 * L * c_3 + 12 * L \<up> 2 * c_2 + 4 * L \<up> 3 * c +\n - 1 * L \<up> 4 * q_0) /\n- 24" = f2str f
470 val Subproblem ("Biegelinie", ["makeFunctionTo", "equation"]) = nxt
471 val (p,_,f,nxt,_,pt) = me nxt p c pt; val (p,_,f,nxt,_,pt) = me nxt p c pt;
473 val (p,_,f,nxt,_,pt) = me nxt p c pt; val (p,_,f,nxt,_,pt) = me nxt p c pt;
474 val (p,_,f,nxt,_,pt) = me nxt p c pt; val (p,_,f,nxt,_,pt) = me nxt p c pt;
476 (*[3], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Specify_Method ["Equation", "fromFunction"] = nxt
477 (*[3], Met*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Apply_Method ["Equation", "fromFunction"] = nxt
479 (*[3, 1], Frm*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "M_b x = c_2 + c * x + - 1 * q_0 / 2 * x \<up> 2" = f2str f
480 val Substitute ["x = 0"] = nxt
481 (*[3, 1], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "M_b 0 = c_2 + c * 0 + - 1 * q_0 / 2 * 0 \<up> 2" = f2str f
482 val Substitute ["M_b 0 = 0"] = nxt
483 (*[3, 2], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "0 = c_2 + c * 0 + - 1 * q_0 / 2 * 0 \<up> 2" = f2str f
484 val Rewrite_Set "norm_Rational" = nxt
485 (*[3, 3], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "0 = c_2" = f2str f
486 val Check_Postcond ["makeFunctionTo", "equation"] = nxt
487 (*[3], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "0 = c_2" = f2str f
488 val Subproblem ("Biegelinie", ["makeFunctionTo", "equation"]) = nxt
490 val (p,_,f,nxt,_,pt) = me nxt p c pt; val (p,_,f,nxt,_,pt) = me nxt p c pt;
491 val (p,_,f,nxt,_,pt) = me nxt p c pt; val (p,_,f,nxt,_,pt) = me nxt p c pt;
492 val (p,_,f,nxt,_,pt) = me nxt p c pt; val (p,_,f,nxt,_,pt) = me nxt p c pt;
493 (*[4], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Specify_Method ["Equation", "fromFunction"] = nxt
494 (*[4], Met*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Apply_Method ["Equation", "fromFunction"] = nxt
496 (*[4, 1], Frm*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "M_b x = c_2 + c * x + - 1 * q_0 / 2 * x \<up> 2" = f2str f
497 val Substitute ["x = L"] = nxt
498 (*[4, 1], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "M_b L = c_2 + c * L + - 1 * q_0 / 2 * L \<up> 2" = f2str f
499 val Substitute ["M_b L = 0"] = nxt
500 (*[4, 2], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "0 = c_2 + c * L + - 1 * q_0 / 2 * L \<up> 2" = f2str f
501 val Rewrite_Set "norm_Rational" = nxt
502 (*[4, 3], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "0 = (2 * c_2 + 2 * L * c + - 1 * L \<up> 2 * q_0) / 2" = f2str f
503 val Check_Postcond ["makeFunctionTo", "equation"] = nxt
504 (*[4], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "0 = (2 * c_2 + 2 * L * c + - 1 * L \<up> 2 * q_0) / 2" = f2str f
505 val Check_Postcond ["setzeRandbedingungen", "Biegelinien"] = nxt
507 (*WN230825 outcommented version "[0 = c_4,\n 0 =\n c_4 + L * c_3 +\n (12 * L \<up> 2 * c_2 + 4 * L \<up> 3 * c + - 1 * L \<up> 4 * q_0) / (- 24 * EI),\n 0 = c_2, 0 = (2 * c_2 + 2 * L * c + - 1 * L \<up> 2 * q_0) / 2]" *)
508 (*WN230825 active version (outcommented since ??? "[0 = c_4,\n 0 =\n c_4 + L * c_3 +\n (12 * L \<up> 2 * c_2 + 4 * L \<up> 3 * c + - 1 * L \<up> 4 * q_0) /\n (- 1 * EI * 24),\n 0 = c_2, 0 = (2 * c_2 + 2 * L * c + - 1 * L \<up> 2 * q_0) / 2]"*)
509 (*[], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "[0 = - 1 * c_4 / - 1,\n 0 =\n (- 24 * c_4 + - 24 * L * c_3 + 12 * L \<up> 2 * c_2 + 4 * L \<up> 3 * c +\n - 1 * L \<up> 4 * q_0) /\n - 24,\n 0 = c_2, 0 = (2 * c_2 + 2 * L * c + - 1 * L \<up> 2 * q_0) / 2]" = f2str f
511 ( *\\----------- exception TERM raised (line 406 of ".."): isalist2list applied to NON-list: equ_s*)
516 (*ML_file "Knowledge/biegelinie-4.sml" (*with M_Model.match_itms_oris broken in |> me'*)*)
517 ML_file "Knowledge/algein.sml"
518 ML_file "Knowledge/diophanteq.sml"
519 (*ML_file "Knowledge/inverse_z_transform.sml"hangs with ML_system_64 = "true"---Test_Isac_Short*)
520 ML_file "Knowledge/inssort.sml"
521 ML_file "Knowledge/isac.sml"
523 ML_file "Test_Code/test-code.sml"
525 section \<open>further tests additional to src/.. files\<close>
526 ML_file "BridgeLibisabelle/use-cases.sml"
528 ML \<open>"%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%";\<close>
529 ML \<open>"%%%%%%%%%%%%%%%%% end Test_Isac %%%%%%%%%%%%%%%%%%%%%%%%";\<close>
530 ML \<open>"%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%";\<close>
537 section \<open>history of tests\<close>
539 Systematic regression tests have been introduced to isac development in 2003.
540 Sanity of the regression tests suffers from updates following Isabelle development,
541 which mostly exceeded the resources available in isac's development.
543 The survey below shall support to efficiently use the tests for isac
544 on different Isabelle versions. Conclusion in most cases will be:
546 !!! Use most recent tests or go back to the old notebook
547 with isac on Isabelle2002. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
551 subsection \<open>isac on Isabelle2017\<close>
552 subsubsection \<open>Summary of development\<close>
554 * Add further signatures, separate structures and cleanup respective files.
555 * Show feasibility of moving Isac programs to partial_function, i.e. to the function package.
556 * Clean theory dependencies.
557 * Start preparing shift from isac-java to Isabelle/jEdit.
559 subsubsection \<open>State of tests: unchanged\<close>
560 subsubsection \<open>Changesets of begin and end\<close>
562 last changeset with Test_Isac 925fef0f4c81
563 first changeset with Test_Isac bbb414976dfe
566 subsection \<open>isac on Isabelle2015\<close>
567 subsubsection \<open>Summary of development\<close>
569 * Add signatures from top of thy-hierarchy down to Interpret (not ProgLang).
570 This complicates Test_Isac, see "Prepare running tests" above.
571 * Remove TTY interface.
572 * Re-activate insertion sort.
574 subsubsection \<open>State of tests: unchanged\<close>
575 subsubsection \<open>Changesets of begin and end\<close>
577 last changeset with Test_Isac 2f1b2854927a
578 first changeset with Test_Isac ???
581 subsection \<open>isac on Isabelle2014\<close>
582 subsubsection \<open>Summary of development\<close>
584 migration from "isabelle tty" --> libisabelle
587 subsection \<open>isac on Isabelle2013-2\<close>
588 subsubsection \<open>Summary of development\<close>
590 reactivated context_thy
592 subsubsection \<open>State of tests\<close>
596 subsubsection \<open>Changesets of begin and end\<close>
600 : isac on Isablle2013-2
602 Changeset: 55318 (03826ceb24da) merged
603 User: Walther Neuper <neuper@ist.tugraz.at>
604 Date: 2013-12-12 14:27:37 +0100 (7 minutes)
607 subsection \<open>isac on Isabelle2013-1\<close>
608 subsubsection \<open>Summary of development\<close>
610 Isabelle2013-1 was replaced within a few weeks due to problems with the document model;
611 no significant development steps for ISAC.
613 subsubsection \<open>State of tests\<close>
615 See points in subsection "isac on Isabelle2011", "State of tests".
617 subsubsection \<open>Changesets of begin and end\<close>
619 Changeset: 55283 (d6e9a34e7142) notes for resuming work on Polynomial.thy
620 User: Walther Neuper <neuper@ist.tugraz.at>
621 Date: 2013-12-03 18:13:31 +0100 (8 days)
623 : isac on Isablle2013-1
625 Changeset: 55279 (130688f277ba) Isabelle2013 --> 2013-1: Test_Isac perfect
626 User: Walther Neuper <neuper@ist.tugraz.at>
627 Date: 2013-11-21 18:12:17 +0100 (2 weeks)
631 subsection \<open>isac on Isabelle2013\<close>
632 subsubsection \<open>Summary of development\<close>
634 # Oct.13: replaced "axioms" by "axiomatization"
635 # Oct.13: Mathias Lehnfeld started removing Unsynchornized.ref
636 # Sep.13: integrated gcd_poly (functional, without Unsychronized.ref) into
637 simplification of multivariate rationals (without improving the rulesets involved).
639 subsubsection \<open>Run tests\<close>
641 Is standard now; this subsection will be discontinued under Isabelle2013-1
643 subsubsection \<open>State of tests\<close>
645 See points in subsection "isac on Isabelle2011", "State of tests".
646 # re-activated listC.sml
648 subsubsection \<open>Changesets of begin and end\<close>
650 changeset 52174:8b055b17bd84 --- removed all code concerned with "castab = Unsynchronized.ref"
651 User: Mathias Lehnfeld <s1210629013@students.fh-hagenberg.at>
652 Date: Tue Nov 19 22:23:30 2013 +0000
654 : isac on Isablle2013
656 Changeset: 52061 (4ecea2fcdc2c) --- Build_Isac.thy runs on Isabelle2013
657 User: Walther Neuper <neuper@ist.tugraz.at>
658 Date: 2013-07-15 08:28:50 +0200 (4 weeks)
661 subsection \<open>isac on Isabelle2012\<close>
662 subsubsection \<open>Summary of development\<close>
664 isac on Isabelle2012 is considered just a transitional stage
665 within the update from Isabelle2011 to Isabelle2013; thus no further development of isac;
666 For considerations on the transition see
667 $ISABELLE_ISAC/Knowledge/Build_Thydata/thy, section "updating isac..".
669 subsubsection \<open>Run tests\<close>
671 $ cd /usr/local/isabisac12/
672 $ ./bin/isabelle jedit -l HOL src/Tools/isac/Build_Isac.thy
673 $ ./bin/isabelle jedit -l Isac test/Tools/isac/Test_Isac.thy
675 subsubsection \<open>State of tests\<close>
677 At least the tests from isac on Isabelle2011 run again.
678 However, Test_Isac.thy shows erratic behaviour; no errors are obtained when scrolling
679 in parallel with evaluation.
681 Counting "error in kernel" for Frontend/interface.sml (the tests considered most significant)
682 yields 69 hits, some of which were already present before Isabelle2002-->2009-2
683 (i.e. on the old notebook from 2002).
685 Now many tests with (*...=== inhibit exn ...*) give a reason or at least the origin:
686 # === inhibit exn WN1130621 Isabelle2012-->13 !thehier! === ...see Build_Thydata.thy
687 # === inhibit exn AK110726 === ...reliable work by Alexander Kargl, most likely go back to 2002
688 # === inhibit exn WN1130701 broken at Isabelle2002 --> 2009-2 === , most likely go back to 2002
689 Reasons for outcommented tests are also found in Test_Isac.thy near the respective file.sml.
691 Some tests have been re-activated (e.g. error patterns, fill patterns).
693 subsubsection \<open>Changesets of begin and end\<close>
695 Changeset: 52051 (35751d90365e) end of improving tests for isac on Isabelle2012
696 User: Walther Neuper <neuper@ist.tugraz.at>
697 Date: 2013-07-11 16:58:31 +0200 (4 weeks)
699 : isac on Isablle2012
701 Changeset: 48757 (74eb3dfc33cc) updated src from Isabelle2011 to Isabelle2012
702 User: Walther Neuper <neuper@ist.tugraz.at>
703 Date: 2012-09-24 18:35:13 +0200 (8 months)
704 ------------------------------------------------------------------------------
705 Changeset: 48756 (7443906996a8) merged
706 User: Walther Neuper <neuper@ist.tugraz.at>
707 Date: 2012-09-24 18:15:49 +0200 (8 months)
710 subsection \<open>isac on Isabelle2011\<close>
711 subsubsection \<open>Summary of development\<close>
713 isac's mathematics engine has been extended by two developments:
714 (1) Isabelle's contexts were introduced by Mathias Lehnfeld
715 (2) Z_Transform was introduced by Jan Rocnik, which revealed
716 further errors introduced by (1).
717 (3) "error patterns" were introduced by Gabriella Daroczy
718 Regressions tests have been added for all of these.
720 subsubsection \<open>Run tests\<close>
722 $ cd /usr/local/isabisac11/
723 $ ./bin/isabelle jedit -l HOL src/Tools/isac/Build_Isac.thy
724 $ ./bin/isabelle jedit -l Isac test/Tools/isac/Test_Isac.thy
726 subsubsection \<open>State of tests\<close>
728 Systematic efforts outcommented less significant tests by (*...=== inhibit exn ...*)
729 and sometimes give reasons for failing tests.
730 (*...=== inhibit exn AK...*) was done by Alexander Kargl; this is reliable
731 work, some of which couldn't be revised (and renamed) by WN and thus survived some time.
733 The most signification tests (in particular Frontend/interface.sml) run,
734 however, many "error in kernel" are not caught by an exception.
735 ------------------------------------------------------------------------------
736 After the changeset below Test_Isac worked with check_unsynchronized_ref ():
737 ------------------------------------------------------------------------------
738 Changeset: 42457 (ca691a84b81a) PROVISIONALLY MADE TESTS RUN with Unsynchronized.ref
739 User: Walther Neuper <neuper@ist.tugraz.at>
740 Date: 2012-08-06 10:38:11 +0200 (11 months)
743 The list below records TODOs while producing an ISAC kernel for
744 gdaroczy and jrocnik, wich could NOT be done before all tests are RUNNING
745 (so to be resumed with Isabelle2013-1):
746 ############## WNxxxxxx.TODO can be found in sources ##############
747 --------------------------------------------------------------------------------
748 WN111013.TODO: lots of cleanup/removal in test/../Test.thy
749 --------------------------------------------------------------------------------
750 WN111013.TODO: remove concept around "fun implicit_take", lots of troubles with
751 this special case (see) --- why not nxt = Model_Problem here ? ---
752 --------------------------------------------------------------------------------
753 WN111014.TODO calculate_Poly < calculate_Rational < calculate_RootRat, see test/
755 # simplify_* , *_simp_*
757 # calc_* , calculate_* ... require iteration over all rls ...
758 ... see --- val rls = calculate_RootRat > calculate_Rational --- CONTINUE !
759 --------------------------------------------------------------------------------
760 WN111014.TODO fun prep_rls | !!!use this function in ruleset' := !!!
761 --------------------------------------------------------------------------------
762 WN120314 changeset a393bb9f5e9f drops root equations.
763 see test/Tools/isac/Knowledge/rootrateq.sml
764 --------------------------------------------------------------------------------
765 WN120317.TODO changeset 977788dfed26 dropped rateq:
766 # test --- repair NO asms from rls RatEq_eliminate --- shows error from 2002
767 # test --- solve (1/x = 5, x) by me --- and --- x / (x ^ 2 - 6 * x + 9) - ...:
768 investigation Check_elementwise stopped due to too much effort finding out,
769 why Check_elementwise worked in 2002 in spite of the error.
770 --------------------------------------------------------------------------------
771 WN120317.TODO postponed test/../ratinal,ratinal2.sml to joint work with dmeindl
772 --------------------------------------------------------------------------------
773 WN120317.TODO found by test --- interSteps for Schalk 299a --- that
774 NO test with 'interSteps' is checked properly (with exn on changed behaviour)
775 --------------------------------------------------------------------------------
776 WN120317.TODO test --- Matthias Goldgruber 2003 rewrite orders --- has
777 a newly outcommented test where rewrite_set_ make_polynomial --> NONE
778 --------------------------------------------------------------------------------
779 WN120320.TODO check-improve rlsthmsNOTisac:
780 DONE make test --- old compute rlsthmsNOTisac by eq_thmI'
781 DONE compare rlsthmsNOTisac in thms-survey-Isa02-Isa09-2.sml .. Isac.thy
782 FOUND 120321: Theory.axioms_of doesnt find LENGTH_CONS etc, thus are in Isab
783 # mark twice thms (in isac + (later) in Isabelle) in Isac.thy
784 --------------------------------------------------------------------------------
785 WN120320.TODO rlsthmsNOTisac: replace twice thms ^
786 --------------------------------------------------------------------------------
787 WN120320.TODO rlsthmsNOTisac: reconsider design of sym_* thms, see test
788 --- OLD compute rlsthmsNOTisac by eq_thmID ---: some are in isab, some in isac.
789 --------------------------------------------------------------------------------
790 WN120321.TODO rearrange theories:
794 ///Input_Descript.thy --> ProgLang
795 Delete.thy <--- first_Knowledge_thy (*mv to Prog_Expr.thy*)
796 ProgLang: restructure Build_Isac.thy such that no xmlsrc.thy, ProgLang.thy
797 Interpret.thy are generated (simplifies xml structure for theories)
800 ListC.thy <--- first_Proglang_thy
801 --------------------------------------------------------------------------------
802 WN120321.TODO reanimate test/../simplify.sml: CAS-command Simplify
803 EXN "simplify.sml: diff.behav. CAScmd: Simplify (2*a + 3*a)"
804 broken during work on thy-hierarchy
805 --------------------------------------------------------------------------------
806 WN120321.TODO LAST in IsacScripts + in IsacKnowledge, see
807 test --- the_hier (get_thes ()) (collect_thydata ())---
808 --------------------------------------------------------------------------------
809 WN120405a.TODO src/../pbl-met-hierarchy.sml: fun pbl2term--> Isac' instead Isac_
810 !!add mutual crossreferences to ?fun headline??? where the same has to be done:
811 !!OR BETTER: use only 2 functions for adding/removing "'" to/from thy!!
812 --------------------------------------------------------------------------------
813 WN120411 scanning html representation of newly generated knowledge:
815 ** Theorems: only "Proof of the theorem" (correct!)
816 and "(c) isac-team (math-autor)"
817 ** Rulesets: only "Identifier:///"
818 and "(c) isac-team (math-autor)"
819 ** IsacKnowledge: link to dependency graph (which needs to be created first)
820 ** IsacScripts --> ProgramLanguage
821 *** Tools: Theorems: arity_type_cp, arity_type_nam, ... wegnehmen
826 ** Z-Transform is missing !!!
827 ** type-constraints !!!
828 --------------------------------------------------------------------------------
829 WN120417: merging xmldata revealed:
830 ..............NEWLY generated:........................................
832 <GUH> thy_isab_Fun-thm-o_apply </GUH>
834 <STRING> Isabelle </STRING>
835 <STRING> Fun </STRING>
836 <STRING> Theorems </STRING>
837 <STRING> o_apply </STRING>
840 <ISA> (?f o ?g) ?x = ?f (?g ?x) </ISA>
843 <TEXT> Proof of the theorem </TEXT>
844 <URL> http://www.ist.tugraz.at/projects/isac/www/kbase/thy/browser_info/HOL/HOL-Real/Isac/Fun.html </URL>
847 <EXPLANATIONS> </EXPLANATIONS>
849 <STRING> Isabelle team, TU Munich </STRING>
854 ..............OLD FORMAT:.............................................
856 <GUH> thy_isab_Fun-thm-o_apply </GUH>
858 <STRING> Isabelle </STRING>
859 <STRING> Fun </STRING>
860 <STRING> Theorems </STRING>
861 <STRING> o_apply </STRING>
866 <ISA> (?f o ?g) ?x = ?f (?g ?x) </ISA>
871 <TEXT> Proof of the theorem </TEXT>
872 <URL> http://www.ist.tugraz.at/projects/isac/www/kbase/thy/browser_info/HOL/HOL-Real/Isac/Fun.html </URL>
875 <EXPLANATIONS> </EXPLANATIONS>
877 <STRING> Isabelle team, TU Munich </STRING>
882 --------------------------------------------------------------------------------
884 subsubsection \<open>Changesets of begin and end\<close>
886 isac development was done between these changesets:
887 ------------------------------------------------------------------------------
888 Changeset: 42519 (1f3b4270363e) meeting dmeindl: added missing files
889 User: Walther Neuper <neuper@ist.tugraz.at>
890 Date: 2012-09-24 16:39:30 +0200 (8 months)
892 : isac on Isablle2011
894 Changeset:41897 (355be7f60389) merged isabisac with Isabelle2011
895 Branch: decompose-isar
896 User: Walther Neuper <neuper@ist.tugraz.at>
897 Date: 2011-02-25 13:04:56 +0100 (2011-02-25)
898 ------------------------------------------------------------------------------
901 subsection \<open>isac on Isabelle2009-2\<close>
902 subsubsection \<open>Summary of development\<close>
904 In 2009 the update of isac from Isabelle2002 started with switching from CVS to hg.
905 The update was painful (bridging 7 years of Isabelle development) and cut short
906 due to the start of introducing Isabelle's contexts (Mathias Lehnfeld) and
907 going on to Isabelle2011 although most of the tests did not run.
909 subsubsection \<open>Run tests\<close>
911 WN131021 this is broken by installation of Isabelle2011/12/13,
912 because all these write their binaries to ~/.isabelle/heaps/..
914 $ cd /usr/local/isabisac09-2/
915 $ ./bin/isabelle emacs -l HOL src/Tools/isac/Build_Isac.thy
916 $ ./bin/isabelle emacs -l Isac src/Tools/isac/Test_Isac.thy
917 NOT THE RIGHT VERSION..... test/Tools/isac/Test_Isac.thy !!!
919 subsubsection \<open>State of tests\<close>
921 Most tests are broken by the update from Isabelle2002 to Isabelle2009-2.
923 subsubsection \<open>Changesets of begin and end\<close>
925 isac development was done between these changesets:
926 ------------------------------------------------------------------------------
927 Changeset: 38115 (940a5feea094) Little improvements of isac-plugin
928 Branch: decompose-isar
929 User: Marco Steger <m.steger@student.tugraz.at>
930 Date: 2011-02-06 18:30:28 +0100 (2011-02-06)
932 : isac on Isablle2009-2
934 Changeset: 37870 (5100a9c3abf8) created branch isac-from-Isabelle2009-2
935 Branch: isac-from-Isabelle2009-2
936 User: Walther Neuper <neuper@ist.tugraz.at>
937 Date: 2010-07-21 09:59:35 +0200 (2010-07-21)
938 ------------------------------------------------------------------------------
941 subsection \<open>isac on Isabelle2002\<close>
942 subsubsection \<open>Summary of development\<close>
944 From 1999 to 2010 all the basic functionality (except "ctxt" and "error pattern")
945 of isac's mathematics engine has been implemented.
947 subsubsection \<open>Run tests\<close>
948 subsubsection \<open>State of tests\<close>
950 All tests work on an old notebook (the right PolyML coudn't be upgraded to more
951 recent Linux versions)
953 subsubsection \<open>Changesets of begin and end\<close>
955 Up to the above Mercurial changeset 5100a9c3abf8 isac used CVS;
956 see https://intra.ist.tugraz.at/hg/isac containing a conversion to Mercurial.
964 (*========== inhibit exn 130719 Isabelle2013 ===================================
965 ============ inhibit exn 130719 Isabelle2013 =================================*)
967 (*-.-.-.-.-.-isolate response.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.
968 -.-.-.-.-.-.-isolate response.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.*)