(*  Title:  build the Isac-Kernel: MathEngine & Knowledge

    Author: Walther Neuper, TU Graz, 100808

   (c) due to copyright terms

For creating a heap image of isac see ~~/ROOT.

For debugging see text at begin below, e.g. theory dependencies:

  ~$ evince file:///home/wneuper/.isabelle/isabisac/browser_info/Unsorted/Isac/session_graph.pdf &

ATTENTION: no errors in this theory do not mean that there are no errors in Isac ..

.. open theories collecting files from folders: BaseDefinitions.thy, ProgLang.thy etc.

Errors are rigorously detected by isabelle build.

*)

theory Build_Isac 

imports

(*  theory KEStore imports Complex_Main

      ML_file libraryC.sml

      ML_file theoryC.sml

      ML_file unparseC.sml

      ML_file "rule-def.sml"

      ML_file thmC.sml

      ML_file "exec-def.sml"

      ML_file "rewrite-order.sml"

      ML_file rule.sml

      ML_file "error-fill-def.sml"

      ML_file "rule-set.sml"

      ML_file calcelems.sml

  theory BaseDefinitions imports KEStore

    ML_file termC.sml

    ML_file contextC.sml

    ML_file environment.sml

*)        "BaseDefinitions/BaseDefinitions"

(*    theory Calculate imports "~~/src/Tools/isac/BaseDefinitions/BaseDefinitions"

        ML_file calculate.sml

      theory ListC imports "~~/src/Tools/isac/BaseDefinitions/BaseDefinitions"

    theory Prog_Expr imports Calculate ListC

      theory Program imports "~~/src/Tools/isac/BaseDefinitions/BaseDefinitions"

      theory Prog_Tac imports "~~/src/Tools/isac/BaseDefinitions/BaseDefinitions"

      theory Tactical imports "~~/src/Tools/isac/BaseDefinitions/BaseDefinitions"

    theory Auto_Prog imports Program Prog_Tac Tactical begin

  theory ProgLang imports Prog_Expr Auto_Prog

*)        "ProgLang/ProgLang"

(*

  theory MathEngBasic imports

    "~~/src/Tools/isac/ProgLang/ProgLang" "~~/src/Tools/isac/Specify/Input_Descript"

    ML_file rewrite.sml

    ML_file "calc-tree-elem.sml"

    ML_file model.sml

    ML_file mstools.sml

    ML_file "specification-elems.sml"

    ML_file "istate-def.sml"

    ML_file tactic.sml

    ML_file position.sml

    ML_file "ctree-basic.sml"

    ML_file "ctree-access.sml"

    ML_file "ctree-navi.sml"

    ML_file ctree.sml

  (*ML_file tactic.sml*)

    ML_file calculation.sml

*)        "MathEngBasic/MathEngBasic"

(*

    theory Input_Descript imports "~~/src/Tools/isac/BaseDefinitions/BaseDefinitions"

  theory Specify imports "~~/src/Tools/isac/ProgLang/ProgLang" Input_Descript

    ML_file ptyps.sml

    ML_file generate.sml

    ML_file calchead.sml

    ML_file appl.sml

    ML_file "step-specify.sml"

    ML_file specify.sml

*)        "Specify/Specify"

(*

  theory Interpret imports "~~/src/Tools/isac/Specify/Specify"

    ML_file istate.sml

    ML_file rewtools.sml

    ML_file "li-tool.sml"

    ML_file inform.sml

    ML_file "lucas-interpreter.sml"

    ML_file "step-solve.sml"

*)        "Interpret/Interpret"

(*

  theory MathEngine imports "~~/src/Tools/isac/Interpret/Interpret"

    ML_file "fetch-tactics.sml"

    ML_file solve.sml

    ML_file step.sml

    ML_file "detail-step.sml"

    ML_file "mathengine-stateless.sml"

    ML_file messages.sml

    ML_file states.sml

*)        "MathEngine/MathEngine"

(*

  theory Test_Code imports "~~/src/Tools/isac/MathEngine/MathEngine"

    ML_file "test-code.sml"

*)        "Test_Code/Test_Code"

(*

  theory BridgeLibisabelle imports "~~/src/Tools/isac/MathEngine/MathEngine"

    ML_file mathml.sml

    ML_file datatypes.sml

    ML_file "pbl-met-hierarchy.sml"

    ML_file "thy-hierarchy.sml" 

    ML_file "interface-xml.sml"

    ML_file interface.sml

*)        "BridgeLibisabelle/BridgeLibisabelle"

          "Knowledge/Build_Thydata" (*imports Isac.thy etc*)

(*//-----------------------------------------------------------------------------------------\\*)

(*\\-----------------------------------------------------------------------------------------//*)

begin

text \<open>

  show theory dependencies using the graph browser, 

  open "browser_info/HOL/Isac/session.graph"

  and proceed from the ancestors towards the siblings.

\<close>

section \<open>check presence of definitions from directories\<close>

(*declare [[ML_print_depth = 999]]*)

ML \<open>

\<close> ML \<open>

parseNEW @{context} "xxx #> aaa bbb"

\<close> ML \<open>

#> : ('a -> 'b) * ('b -> 'c) -> 'a -> 'c

\<close> ML \<open>

\<close>

ML \<open>Num_Calc.adhoc_thm; (*from "ProgLang/calculate.sml" *)\<close>

ML \<open>Rewrite.rewrite_; (*from "ProgLang/rewrite.sml" *)\<close>

ML \<open>Input_Descript.is_reall_dsc; (*from "ProgLang/scrtools.sml" *)\<close>

ML \<open>Test_Code.me;\<close>

text \<open>contextthyOK2xml; (*"xmlsrc/interface-xml.sml"*)\<close>

ML \<open>prog_expr\<close>

ML \<open>Prog_Expr.eval_occurs_in\<close>

ML \<open>@{thm last_thmI}\<close>

ML \<open>@{thm Querkraft_Belastung}\<close>

ML \<open>Celem.check_guhs_unique := false;\<close>

ML \<open>writeln "**** isac kernel = math-engine + Knowledge complete ******"\<close>

ML \<open>@{theory "Isac_Knowledge"}\<close>

ML \<open>(*get_the ["IsacKnowledge", "Diff", "Theorems", "diff_sin_chain"]

  ERROR: app_py: not found: ["IsacKnowledge","Diff","Theorems","diff_sin_chain"]*)\<close>

section \<open>State of approaching Isabelle by Isac\<close>

text \<open>

  Mathias Lehnfeld gives the following list in his thesis in section 

  4.2.3 Relation to Ongoing Isabelle Development.

\<close>

subsection \<open>(0) Survey on remaining Unsynchronized.ref\<close>

text \<open>

  REPLACE BY KEStore... (has been overlooked)

    calcelems.sml:val rew_ord' = Unsynchronized.ref ...

  KEEP FOR TRACING

    calcelems.sml:val trace_rewrite = Unsynchronized.ref false;

    calcelems.sml:val depth = Unsynchronized.ref 99999;

    calcelems.sml:val lim_rewrite = Unsynchronized.ref 99999;

    calcelems.sml:val lim_deriv = Unsynchronized.ref 100;

    Interpret/script.sml:val trace_LI = Unsynchronized.ref false;

  KEEP FOR EASIER DEVELOPMENT

    calcelems.sml:val check_guhs_unique = Unsynchronized.ref true;

  KEEP FOR DEMOS

    Knowledge/GCD_Poly_ML.thy:  val trace_div = Unsynchronized.ref true;

    Knowledge/GCD_Poly_ML.thy:  val trace_div_invariant = Unsynchronized.ref false;

    Knowledge/GCD_Poly_ML.thy:  val trace_Euclid = Unsynchronized.ref true;

\<close>

subsection \<open>(1) Exploit parallelism for concurrent session management\<close>

subsection \<open>(2) Make Isac’s programming language usable\<close>

subsection \<open>(3) Adopt Isabelle’s numeral computation for Isac\<close>

text \<open>

  In 2002 isac already strived for floating point numbers. Since that time

  isac represents numerals as "Free", see below (*1*). These experiments are

  unsatisfactory with respect to logical soundness.

  Since Isabelle now has started to care about floating point numbers, it is high 

  time to adopt these together with the other numerals. Isabelle2012/13's numerals

  are different from Isabelle2011, see "test/Tools/isac/ProgLang/termC.sml".

  The transition from "Free" to standard numerals is a task to be scheduled for 

  several weeks. The urgency of this task follows from the experience, 

  that (1.2) for "thehier" is very hard, because "num_str" seems to destroy 

  some of the long identifiers of theorems which would tremendously simplify

  building a hierarchy of theorems according to (1.2), see (*2*) below.

\<close>

ML \<open>(*1*) Free ("123.456", HOLogic.realT)\<close>

subsection \<open>(4) Improve the efficiency of Isac’s rewrite-engine\<close>

subsection \<open>(5) Adopt Isabelle/jEdit for Isac\<close>

end