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" biegel, |> me' with M_Model.match_itms_oris broken*)
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*)
346 (*ML_file "Knowledge/biegelinie-3.sml" (*due to ---vvv*) ( *Test_Isac_Short*)
349 (* Title: Knowledge/biegelinie-3.sml
350 Author: Walther Neuper 050826
351 (c) due to copyright terms
353 "-----------------------------------------------------------------";
354 "table of contents -----------------------------------------------";
355 "-----------------------------------------------------------------";
356 "----------- SubProblem: auto method [Biegelinien,setzeRandbedingungenEin]--------------------";
357 "----------- SubProblem: me method [Biegelinien,setzeRandbedingungenEin]----------------------";
358 "---------------------------------------------------------------------------------------------";
359 "---------------------------------------------------------------------------------------------";
360 "---------------------------------------------------------------------------------------------";
363 "----------- SubProblem: auto method [Biegelinien,setzeRandbedingungenEin]--------------------";
364 "----------- SubProblem: auto method [Biegelinien,setzeRandbedingungenEin]--------------------";
365 "----------- SubProblem: auto method [Biegelinien,setzeRandbedingungenEin]--------------------";
366 val fmz = ["Funktionen [Q x = c + - 1 * q_0 * x," ^
367 "M_b x = c_2 + c * x + - 1 * q_0 / 2 * x \<up> 2," ^
368 "y' x = c_3 + 1 / (- 1 * EI) * (c_2 * x + c / 2 * x \<up> 2 + - 1 * q_0 / 6 * x \<up> 3)," ^
369 "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)]",
370 "Randbedingungen [y 0 = (0::real), y L = 0, M_b 0 = 0, M_b L = 0]",
371 "Gleichungen equ_s"];
372 val (dI',pI',mI') = ("Biegelinie", ["setzeRandbedingungen", "Biegelinien"],
373 ["Biegelinien", "setzeRandbedingungenEin"]);
376 CalcTree @{context} [(fmz, (dI',pI',mI'))];
379 autoCalculate 1 CompleteCalc;
381 val ((pt, p),_) = States.get_calc 1;
382 if p = ([], Res) andalso (get_obj g_res pt (fst p) |> UnparseC.term @{context}) =
383 "[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]"
384 (*"[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]"
385 ^^^ BEFORE fun Calc_Binop.simplify IS EVALUATEDO BY Simplifier.rewrite *)
386 then () else error "auto method [Biegelinien,setzeRandbedingungenEin] changed";
389 "----------- SubProblem: me method [Biegelinien,setzeRandbedingungenEin]----------------------";
390 "----------- SubProblem: me method [Biegelinien,setzeRandbedingungenEin]----------------------";
391 "----------- SubProblem: me method [Biegelinien,setzeRandbedingungenEin]----------------------";
392 val fmz = ["Funktionen [Q x = c + - 1 * q_0 * x," ^
393 "M_b x = c_2 + c * x + - 1 * q_0 / 2 * x \<up> 2," ^
394 "y' x = c_3 + 1 / (- 1 * EI) * (c_2 * x + c / 2 * x \<up> 2 + - 1 * q_0 / 6 * x \<up> 3)," ^
395 "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)]",
396 "Randbedingungen [y 0 = (0::real), y L = 0, M_b 0 = 0, M_b L = 0]",
397 "Gleichungen equ_s"];
398 val (dI',pI',mI') = ("Biegelinie", ["setzeRandbedingungen", "Biegelinien"],
399 ["Biegelinien", "setzeRandbedingungenEin"]);
400 val p = e_pos'; val c = [];
401 val (p,_,f,nxt,_,pt) = Test_Code.init_calc @{context} [(fmz, (dI',pI',mI'))];
402 val (p,_,f,nxt,_,pt) = me nxt p c pt;val (p,_,f,nxt,_,pt) = me nxt p c pt;
403 val (p,_,f,nxt,_,pt) = me nxt p c pt;
404 (*[], 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
405 (*[], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Add_Given "Randbedingungen [y 0 = 0]" = nxt
406 (*[], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Add_Given "Randbedingungen [y 0 = 0, y L = 0]" = nxt
407 (*[], 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
408 (*[], 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
410 (*//----------- exception TERM raised (line 406 of ".."): isalist2list applied to NON-list: equ_s
411 since update of fun item_to_add, successor of CS f10bbfb2b3bb * )
412 (*[], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt;
414 (*[], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt;
415 val Specify_Problem ["setzeRandbedingungen", "Biegelinien"] = nxt
416 (*[], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Specify_Method ["Biegelinien", "setzeRandbedingungenEin"] = nxt
417 (*[], Met*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Apply_Method ["Biegelinien", "setzeRandbedingungenEin"] = nxt
420 "----- Randbedingung y 0 = 0 in SUBpbl with met [Equation, fromFunction]";
421 (*[1], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Model_Problem = nxt
423 (*+*)if (#1 o (get_obj g_fmz pt)) (fst p) =
424 (*+*) ["functionEq\n (y x =\n c_4 + c_3 * x +\n 1 / (- 1 * EI) *" ^
425 (*+*) "\n (c_2 / 2 * x \<up> 2 + c / 6 * x \<up> 3 + - 1 * q_0 / 24 * x \<up> 4))",
426 (*+*) "substitution (y 0 = 0)", "equality equ'''"] then ()
427 (*+*)else error "Met setzeRandbedingungenEin CHANGED";
429 (*+*)(writeln o Istate.string_of @{context}) (get_istate_LI pt p);
430 "--- after 1.subpbl [Equation, fromFunction]";
432 (*[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
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;val (p,_,f,nxt,_,pt) = me nxt p c pt;
435 (*[1], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt;
436 (*[1], Met*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Apply_Method ["Equation", "fromFunction"] = nxt
438 (*[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
439 val Substitute ["x = 0"] = nxt
440 (*[1, 1], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Substitute ["y 0 = 0"] = nxt
441 (*[1, 2], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Rewrite_Set "norm_Rational" = nxt
442 (*[1, 3], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "0 = - 1 * c_4 / - 1" = f2str f
443 val Check_Postcond ["makeFunctionTo", "equation"] = nxt
445 "--- before 2.subpbl [Equation, fromFunction]";
446 (*[1], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "0 = - 1 * c_4 / - 1" = f2str f
447 val Subproblem ("Biegelinie", ["makeFunctionTo", "equation"]) = nxt
448 (*[2], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Model_Problem = nxt;
450 (*+*)if (#1 o (get_obj g_fmz pt)) (fst p) =
451 (*+*) ["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))",
452 (*+*) "substitution (y L = 0)", "equality equ'''"] then ()
453 (*+*)else error "biegelinie.sml metsetzeRandbed*Ein bb ";
455 (*[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
456 val (p,_,f,nxt,_,pt) = me nxt p c pt; val (p,_,f,nxt,_,pt) = me nxt p c pt;
457 val (p,_,f,nxt,_,pt) = me nxt p c pt; val (p,_,f,nxt,_,pt) = me nxt p c pt;
458 (*[2], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Specify_Method ["Equation", "fromFunction"] = nxt
459 (*[2], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Apply_Method ["Equation", "fromFunction"] = nxt
461 (*[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
462 val Substitute ["x = L"] = nxt
463 (*[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
464 val Substitute ["y L = 0"] = nxt
465 (*[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
466 val Rewrite_Set "norm_Rational" = nxt
467 (*[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
468 val Check_Postcond ["makeFunctionTo", "equation"] = nxt
470 (*[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
471 val Subproblem ("Biegelinie", ["makeFunctionTo", "equation"]) = nxt
472 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;
475 val (p,_,f,nxt,_,pt) = me nxt p c pt; val (p,_,f,nxt,_,pt) = me nxt p c pt;
477 (*[3], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Specify_Method ["Equation", "fromFunction"] = nxt
478 (*[3], Met*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Apply_Method ["Equation", "fromFunction"] = nxt
480 (*[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
481 val Substitute ["x = 0"] = nxt
482 (*[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
483 val Substitute ["M_b 0 = 0"] = nxt
484 (*[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
485 val Rewrite_Set "norm_Rational" = nxt
486 (*[3, 3], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "0 = c_2" = f2str f
487 val Check_Postcond ["makeFunctionTo", "equation"] = nxt
488 (*[3], Res*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val "0 = c_2" = f2str f
489 val Subproblem ("Biegelinie", ["makeFunctionTo", "equation"]) = nxt
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 val (p,_,f,nxt,_,pt) = me nxt p c pt; val (p,_,f,nxt,_,pt) = me nxt p c pt;
494 (*[4], Pbl*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Specify_Method ["Equation", "fromFunction"] = nxt
495 (*[4], Met*)val (p,_,f,nxt,_,pt) = me nxt p c pt; val Apply_Method ["Equation", "fromFunction"] = nxt
497 (*[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
498 val Substitute ["x = L"] = nxt
499 (*[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
500 val Substitute ["M_b L = 0"] = nxt
501 (*[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
502 val Rewrite_Set "norm_Rational" = nxt
503 (*[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
504 val Check_Postcond ["makeFunctionTo", "equation"] = nxt
505 (*[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
506 val Check_Postcond ["setzeRandbedingungen", "Biegelinien"] = nxt
508 (*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]" *)
509 (*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]"*)
510 (*[], 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
512 ( *\\----------- exception TERM raised (line 406 of ".."): isalist2list applied to NON-list: equ_s*)
517 (*ML_file "Knowledge/biegelinie-4.sml" (*with M_Model.match_itms_oris broken in |> me'*)*)
518 ML_file "Knowledge/algein.sml"
519 ML_file "Knowledge/diophanteq.sml"
520 (*ML_file "Knowledge/inverse_z_transform.sml"hangs with ML_system_64 = "true"---Test_Isac_Short*)
521 ML_file "Knowledge/inssort.sml"
522 ML_file "Knowledge/isac.sml"
524 ML_file "Test_Code/test-code.sml"
526 section \<open>further tests additional to src/.. files\<close>
527 ML_file "BridgeLibisabelle/use-cases.sml"
529 ML \<open>"%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%";\<close>
530 ML \<open>"%%%%%%%%%%%%%%%%% end Test_Isac %%%%%%%%%%%%%%%%%%%%%%%%";\<close>
531 ML \<open>"%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%";\<close>
538 section \<open>history of tests\<close>
540 Systematic regression tests have been introduced to isac development in 2003.
541 Sanity of the regression tests suffers from updates following Isabelle development,
542 which mostly exceeded the resources available in isac's development.
544 The survey below shall support to efficiently use the tests for isac
545 on different Isabelle versions. Conclusion in most cases will be:
547 !!! Use most recent tests or go back to the old notebook
548 with isac on Isabelle2002. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
552 subsection \<open>isac on Isabelle2017\<close>
553 subsubsection \<open>Summary of development\<close>
555 * Add further signatures, separate structures and cleanup respective files.
556 * Show feasibility of moving Isac programs to partial_function, i.e. to the function package.
557 * Clean theory dependencies.
558 * Start preparing shift from isac-java to Isabelle/jEdit.
560 subsubsection \<open>State of tests: unchanged\<close>
561 subsubsection \<open>Changesets of begin and end\<close>
563 last changeset with Test_Isac 925fef0f4c81
564 first changeset with Test_Isac bbb414976dfe
567 subsection \<open>isac on Isabelle2015\<close>
568 subsubsection \<open>Summary of development\<close>
570 * Add signatures from top of thy-hierarchy down to Interpret (not ProgLang).
571 This complicates Test_Isac, see "Prepare running tests" above.
572 * Remove TTY interface.
573 * Re-activate insertion sort.
575 subsubsection \<open>State of tests: unchanged\<close>
576 subsubsection \<open>Changesets of begin and end\<close>
578 last changeset with Test_Isac 2f1b2854927a
579 first changeset with Test_Isac ???
582 subsection \<open>isac on Isabelle2014\<close>
583 subsubsection \<open>Summary of development\<close>
585 migration from "isabelle tty" --> libisabelle
588 subsection \<open>isac on Isabelle2013-2\<close>
589 subsubsection \<open>Summary of development\<close>
591 reactivated context_thy
593 subsubsection \<open>State of tests\<close>
597 subsubsection \<open>Changesets of begin and end\<close>
601 : isac on Isablle2013-2
603 Changeset: 55318 (03826ceb24da) merged
604 User: Walther Neuper <neuper@ist.tugraz.at>
605 Date: 2013-12-12 14:27:37 +0100 (7 minutes)
608 subsection \<open>isac on Isabelle2013-1\<close>
609 subsubsection \<open>Summary of development\<close>
611 Isabelle2013-1 was replaced within a few weeks due to problems with the document model;
612 no significant development steps for ISAC.
614 subsubsection \<open>State of tests\<close>
616 See points in subsection "isac on Isabelle2011", "State of tests".
618 subsubsection \<open>Changesets of begin and end\<close>
620 Changeset: 55283 (d6e9a34e7142) notes for resuming work on Polynomial.thy
621 User: Walther Neuper <neuper@ist.tugraz.at>
622 Date: 2013-12-03 18:13:31 +0100 (8 days)
624 : isac on Isablle2013-1
626 Changeset: 55279 (130688f277ba) Isabelle2013 --> 2013-1: Test_Isac perfect
627 User: Walther Neuper <neuper@ist.tugraz.at>
628 Date: 2013-11-21 18:12:17 +0100 (2 weeks)
632 subsection \<open>isac on Isabelle2013\<close>
633 subsubsection \<open>Summary of development\<close>
635 # Oct.13: replaced "axioms" by "axiomatization"
636 # Oct.13: Mathias Lehnfeld started removing Unsynchornized.ref
637 # Sep.13: integrated gcd_poly (functional, without Unsychronized.ref) into
638 simplification of multivariate rationals (without improving the rulesets involved).
640 subsubsection \<open>Run tests\<close>
642 Is standard now; this subsection will be discontinued under Isabelle2013-1
644 subsubsection \<open>State of tests\<close>
646 See points in subsection "isac on Isabelle2011", "State of tests".
647 # re-activated listC.sml
649 subsubsection \<open>Changesets of begin and end\<close>
651 changeset 52174:8b055b17bd84 --- removed all code concerned with "castab = Unsynchronized.ref"
652 User: Mathias Lehnfeld <s1210629013@students.fh-hagenberg.at>
653 Date: Tue Nov 19 22:23:30 2013 +0000
655 : isac on Isablle2013
657 Changeset: 52061 (4ecea2fcdc2c) --- Build_Isac.thy runs on Isabelle2013
658 User: Walther Neuper <neuper@ist.tugraz.at>
659 Date: 2013-07-15 08:28:50 +0200 (4 weeks)
662 subsection \<open>isac on Isabelle2012\<close>
663 subsubsection \<open>Summary of development\<close>
665 isac on Isabelle2012 is considered just a transitional stage
666 within the update from Isabelle2011 to Isabelle2013; thus no further development of isac;
667 For considerations on the transition see
668 $ISABELLE_ISAC/Knowledge/Build_Thydata/thy, section "updating isac..".
670 subsubsection \<open>Run tests\<close>
672 $ cd /usr/local/isabisac12/
673 $ ./bin/isabelle jedit -l HOL src/Tools/isac/Build_Isac.thy
674 $ ./bin/isabelle jedit -l Isac test/Tools/isac/Test_Isac.thy
676 subsubsection \<open>State of tests\<close>
678 At least the tests from isac on Isabelle2011 run again.
679 However, Test_Isac.thy shows erratic behaviour; no errors are obtained when scrolling
680 in parallel with evaluation.
682 Counting "error in kernel" for Frontend/interface.sml (the tests considered most significant)
683 yields 69 hits, some of which were already present before Isabelle2002-->2009-2
684 (i.e. on the old notebook from 2002).
686 Now many tests with (*...=== inhibit exn ...*) give a reason or at least the origin:
687 # === inhibit exn WN1130621 Isabelle2012-->13 !thehier! === ...see Build_Thydata.thy
688 # === inhibit exn AK110726 === ...reliable work by Alexander Kargl, most likely go back to 2002
689 # === inhibit exn WN1130701 broken at Isabelle2002 --> 2009-2 === , most likely go back to 2002
690 Reasons for outcommented tests are also found in Test_Isac.thy near the respective file.sml.
692 Some tests have been re-activated (e.g. error patterns, fill patterns).
694 subsubsection \<open>Changesets of begin and end\<close>
696 Changeset: 52051 (35751d90365e) end of improving tests for isac on Isabelle2012
697 User: Walther Neuper <neuper@ist.tugraz.at>
698 Date: 2013-07-11 16:58:31 +0200 (4 weeks)
700 : isac on Isablle2012
702 Changeset: 48757 (74eb3dfc33cc) updated src from Isabelle2011 to Isabelle2012
703 User: Walther Neuper <neuper@ist.tugraz.at>
704 Date: 2012-09-24 18:35:13 +0200 (8 months)
705 ------------------------------------------------------------------------------
706 Changeset: 48756 (7443906996a8) merged
707 User: Walther Neuper <neuper@ist.tugraz.at>
708 Date: 2012-09-24 18:15:49 +0200 (8 months)
711 subsection \<open>isac on Isabelle2011\<close>
712 subsubsection \<open>Summary of development\<close>
714 isac's mathematics engine has been extended by two developments:
715 (1) Isabelle's contexts were introduced by Mathias Lehnfeld
716 (2) Z_Transform was introduced by Jan Rocnik, which revealed
717 further errors introduced by (1).
718 (3) "error patterns" were introduced by Gabriella Daroczy
719 Regressions tests have been added for all of these.
721 subsubsection \<open>Run tests\<close>
723 $ cd /usr/local/isabisac11/
724 $ ./bin/isabelle jedit -l HOL src/Tools/isac/Build_Isac.thy
725 $ ./bin/isabelle jedit -l Isac test/Tools/isac/Test_Isac.thy
727 subsubsection \<open>State of tests\<close>
729 Systematic efforts outcommented less significant tests by (*...=== inhibit exn ...*)
730 and sometimes give reasons for failing tests.
731 (*...=== inhibit exn AK...*) was done by Alexander Kargl; this is reliable
732 work, some of which couldn't be revised (and renamed) by WN and thus survived some time.
734 The most signification tests (in particular Frontend/interface.sml) run,
735 however, many "error in kernel" are not caught by an exception.
736 ------------------------------------------------------------------------------
737 After the changeset below Test_Isac worked with check_unsynchronized_ref ():
738 ------------------------------------------------------------------------------
739 Changeset: 42457 (ca691a84b81a) PROVISIONALLY MADE TESTS RUN with Unsynchronized.ref
740 User: Walther Neuper <neuper@ist.tugraz.at>
741 Date: 2012-08-06 10:38:11 +0200 (11 months)
744 The list below records TODOs while producing an ISAC kernel for
745 gdaroczy and jrocnik, wich could NOT be done before all tests are RUNNING
746 (so to be resumed with Isabelle2013-1):
747 ############## WNxxxxxx.TODO can be found in sources ##############
748 --------------------------------------------------------------------------------
749 WN111013.TODO: lots of cleanup/removal in test/../Test.thy
750 --------------------------------------------------------------------------------
751 WN111013.TODO: remove concept around "fun implicit_take", lots of troubles with
752 this special case (see) --- why not nxt = Model_Problem here ? ---
753 --------------------------------------------------------------------------------
754 WN111014.TODO calculate_Poly < calculate_Rational < calculate_RootRat, see test/
756 # simplify_* , *_simp_*
758 # calc_* , calculate_* ... require iteration over all rls ...
759 ... see --- val rls = calculate_RootRat > calculate_Rational --- CONTINUE !
760 --------------------------------------------------------------------------------
761 WN111014.TODO fun prep_rls | !!!use this function in ruleset' := !!!
762 --------------------------------------------------------------------------------
763 WN120314 changeset a393bb9f5e9f drops root equations.
764 see test/Tools/isac/Knowledge/rootrateq.sml
765 --------------------------------------------------------------------------------
766 WN120317.TODO changeset 977788dfed26 dropped rateq:
767 # test --- repair NO asms from rls RatEq_eliminate --- shows error from 2002
768 # test --- solve (1/x = 5, x) by me --- and --- x / (x ^ 2 - 6 * x + 9) - ...:
769 investigation Check_elementwise stopped due to too much effort finding out,
770 why Check_elementwise worked in 2002 in spite of the error.
771 --------------------------------------------------------------------------------
772 WN120317.TODO postponed test/../ratinal,ratinal2.sml to joint work with dmeindl
773 --------------------------------------------------------------------------------
774 WN120317.TODO found by test --- interSteps for Schalk 299a --- that
775 NO test with 'interSteps' is checked properly (with exn on changed behaviour)
776 --------------------------------------------------------------------------------
777 WN120317.TODO test --- Matthias Goldgruber 2003 rewrite orders --- has
778 a newly outcommented test where rewrite_set_ make_polynomial --> NONE
779 --------------------------------------------------------------------------------
780 WN120320.TODO check-improve rlsthmsNOTisac:
781 DONE make test --- old compute rlsthmsNOTisac by eq_thmI'
782 DONE compare rlsthmsNOTisac in thms-survey-Isa02-Isa09-2.sml .. Isac.thy
783 FOUND 120321: Theory.axioms_of doesnt find LENGTH_CONS etc, thus are in Isab
784 # mark twice thms (in isac + (later) in Isabelle) in Isac.thy
785 --------------------------------------------------------------------------------
786 WN120320.TODO rlsthmsNOTisac: replace twice thms ^
787 --------------------------------------------------------------------------------
788 WN120320.TODO rlsthmsNOTisac: reconsider design of sym_* thms, see test
789 --- OLD compute rlsthmsNOTisac by eq_thmID ---: some are in isab, some in isac.
790 --------------------------------------------------------------------------------
791 WN120321.TODO rearrange theories:
795 ///Input_Descript.thy --> ProgLang
796 Delete.thy <--- first_Knowledge_thy (*mv to Prog_Expr.thy*)
797 ProgLang: restructure Build_Isac.thy such that no xmlsrc.thy, ProgLang.thy
798 Interpret.thy are generated (simplifies xml structure for theories)
801 ListC.thy <--- first_Proglang_thy
802 --------------------------------------------------------------------------------
803 WN120321.TODO reanimate test/../simplify.sml: CAS-command Simplify
804 EXN "simplify.sml: diff.behav. CAScmd: Simplify (2*a + 3*a)"
805 broken during work on thy-hierarchy
806 --------------------------------------------------------------------------------
807 WN120321.TODO LAST in IsacScripts + in IsacKnowledge, see
808 test --- the_hier (get_thes ()) (collect_thydata ())---
809 --------------------------------------------------------------------------------
810 WN120405a.TODO src/../pbl-met-hierarchy.sml: fun pbl2term--> Isac' instead Isac_
811 !!add mutual crossreferences to ?fun headline??? where the same has to be done:
812 !!OR BETTER: use only 2 functions for adding/removing "'" to/from thy!!
813 --------------------------------------------------------------------------------
814 WN120411 scanning html representation of newly generated knowledge:
816 ** Theorems: only "Proof of the theorem" (correct!)
817 and "(c) isac-team (math-autor)"
818 ** Rulesets: only "Identifier:///"
819 and "(c) isac-team (math-autor)"
820 ** IsacKnowledge: link to dependency graph (which needs to be created first)
821 ** IsacScripts --> ProgramLanguage
822 *** Tools: Theorems: arity_type_cp, arity_type_nam, ... wegnehmen
827 ** Z-Transform is missing !!!
828 ** type-constraints !!!
829 --------------------------------------------------------------------------------
830 WN120417: merging xmldata revealed:
831 ..............NEWLY generated:........................................
833 <GUH> thy_isab_Fun-thm-o_apply </GUH>
835 <STRING> Isabelle </STRING>
836 <STRING> Fun </STRING>
837 <STRING> Theorems </STRING>
838 <STRING> o_apply </STRING>
841 <ISA> (?f o ?g) ?x = ?f (?g ?x) </ISA>
844 <TEXT> Proof of the theorem </TEXT>
845 <URL> http://www.ist.tugraz.at/projects/isac/www/kbase/thy/browser_info/HOL/HOL-Real/Isac/Fun.html </URL>
848 <EXPLANATIONS> </EXPLANATIONS>
850 <STRING> Isabelle team, TU Munich </STRING>
855 ..............OLD FORMAT:.............................................
857 <GUH> thy_isab_Fun-thm-o_apply </GUH>
859 <STRING> Isabelle </STRING>
860 <STRING> Fun </STRING>
861 <STRING> Theorems </STRING>
862 <STRING> o_apply </STRING>
867 <ISA> (?f o ?g) ?x = ?f (?g ?x) </ISA>
872 <TEXT> Proof of the theorem </TEXT>
873 <URL> http://www.ist.tugraz.at/projects/isac/www/kbase/thy/browser_info/HOL/HOL-Real/Isac/Fun.html </URL>
876 <EXPLANATIONS> </EXPLANATIONS>
878 <STRING> Isabelle team, TU Munich </STRING>
883 --------------------------------------------------------------------------------
885 subsubsection \<open>Changesets of begin and end\<close>
887 isac development was done between these changesets:
888 ------------------------------------------------------------------------------
889 Changeset: 42519 (1f3b4270363e) meeting dmeindl: added missing files
890 User: Walther Neuper <neuper@ist.tugraz.at>
891 Date: 2012-09-24 16:39:30 +0200 (8 months)
893 : isac on Isablle2011
895 Changeset:41897 (355be7f60389) merged isabisac with Isabelle2011
896 Branch: decompose-isar
897 User: Walther Neuper <neuper@ist.tugraz.at>
898 Date: 2011-02-25 13:04:56 +0100 (2011-02-25)
899 ------------------------------------------------------------------------------
902 subsection \<open>isac on Isabelle2009-2\<close>
903 subsubsection \<open>Summary of development\<close>
905 In 2009 the update of isac from Isabelle2002 started with switching from CVS to hg.
906 The update was painful (bridging 7 years of Isabelle development) and cut short
907 due to the start of introducing Isabelle's contexts (Mathias Lehnfeld) and
908 going on to Isabelle2011 although most of the tests did not run.
910 subsubsection \<open>Run tests\<close>
912 WN131021 this is broken by installation of Isabelle2011/12/13,
913 because all these write their binaries to ~/.isabelle/heaps/..
915 $ cd /usr/local/isabisac09-2/
916 $ ./bin/isabelle emacs -l HOL src/Tools/isac/Build_Isac.thy
917 $ ./bin/isabelle emacs -l Isac src/Tools/isac/Test_Isac.thy
918 NOT THE RIGHT VERSION..... test/Tools/isac/Test_Isac.thy !!!
920 subsubsection \<open>State of tests\<close>
922 Most tests are broken by the update from Isabelle2002 to Isabelle2009-2.
924 subsubsection \<open>Changesets of begin and end\<close>
926 isac development was done between these changesets:
927 ------------------------------------------------------------------------------
928 Changeset: 38115 (940a5feea094) Little improvements of isac-plugin
929 Branch: decompose-isar
930 User: Marco Steger <m.steger@student.tugraz.at>
931 Date: 2011-02-06 18:30:28 +0100 (2011-02-06)
933 : isac on Isablle2009-2
935 Changeset: 37870 (5100a9c3abf8) created branch isac-from-Isabelle2009-2
936 Branch: isac-from-Isabelle2009-2
937 User: Walther Neuper <neuper@ist.tugraz.at>
938 Date: 2010-07-21 09:59:35 +0200 (2010-07-21)
939 ------------------------------------------------------------------------------
942 subsection \<open>isac on Isabelle2002\<close>
943 subsubsection \<open>Summary of development\<close>
945 From 1999 to 2010 all the basic functionality (except "ctxt" and "error pattern")
946 of isac's mathematics engine has been implemented.
948 subsubsection \<open>Run tests\<close>
949 subsubsection \<open>State of tests\<close>
951 All tests work on an old notebook (the right PolyML coudn't be upgraded to more
952 recent Linux versions)
954 subsubsection \<open>Changesets of begin and end\<close>
956 Up to the above Mercurial changeset 5100a9c3abf8 isac used CVS;
957 see https://intra.ist.tugraz.at/hg/isac containing a conversion to Mercurial.
965 (*========== inhibit exn 130719 Isabelle2013 ===================================
966 ============ inhibit exn 130719 Isabelle2013 =================================*)
968 (*-.-.-.-.-.-isolate response.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.
969 -.-.-.-.-.-.-isolate response.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.*)