src/Tools/isac/Build_Isac.thy
author Walther Neuper <walther.neuper@jku.at>
Wed, 02 Oct 2019 16:02:17 +0200
changeset 59637 8881c5d28f82
parent 59634 c4676196bc15
child 59674 3da177a07c3e
permissions -rw-r--r--
lucin: use #> in Program in analogy to #> in Isabelle/ML
walther@59632
     1
(*  Title:  build the Isac-Kernel: MathEngine & Knowledge
neuper@38057
     2
    Author: Walther Neuper, TU Graz, 100808
neuper@38051
     3
   (c) due to copyright terms
neuper@38051
     4
neuper@52062
     5
For creating a heap image of isac see ~~/ROOT.
walther@59632
     6
For debugging see text at begin below, e.g. theory dependencies:
walther@59632
     7
  ~$ evince file:///home/wneuper/.isabelle/isabisac/browser_info/Unsorted/Isac/session_graph.pdf &
neuper@52062
     8
wneuper@59586
     9
ATTENTION: no errors in this theory do not mean that there are no errors in Isac ..
wneuper@59586
    10
.. open theories collecting files from folders: CalcElements.thy, ProgLang.thy etc.
walther@59632
    11
Errors are rigorously detected by isabelle build.
neuper@37906
    12
*)
neuper@37906
    13
wneuper@59347
    14
theory Build_Isac 
wneuper@59206
    15
imports
walther@59632
    16
(*  theory KEStore imports Complex_Main
walther@59632
    17
      ML_file libraryC.sml
walther@59632
    18
      ML_file rule.sml
walther@59632
    19
      ML_file calcelems.sml
walther@59632
    20
  theory CalcElements imports KEStore
walther@59632
    21
    ML_file termC.sml
walther@59632
    22
    ML_file contextC.sml
wneuper@59586
    23
*)        "CalcElements/CalcElements"
wneuper@59586
    24
walther@59632
    25
(*    theory Calculate imports "~~/src/Tools/isac/CalcElements/CalcElements"
walther@59632
    26
        ML_file calculate.sml
walther@59632
    27
      theory ListC imports "~~/src/Tools/isac/CalcElements/CalcElements"
walther@59632
    28
    theory Prog_Expr imports Calculate ListC
walther@59632
    29
      theory Program imports "~~/src/Tools/isac/CalcElements/CalcElements"
walther@59632
    30
      theory Prog_Tac imports "~~/src/Tools/isac/CalcElements/CalcElements"
walther@59632
    31
      theory Tactical imports "~~/src/Tools/isac/CalcElements/CalcElements"
walther@59632
    32
    theory Auto_Prog imports Program Prog_Tac Tactical begin
walther@59632
    33
  theory ProgLang imports Prog_Expr Auto_Prog
walther@59632
    34
    ML_file rewrite.sml
neuper@52062
    35
*)        "ProgLang/ProgLang"
wneuper@59600
    36
(*
walther@59632
    37
    theory Input_Descript imports "~~/src/Tools/isac/CalcElements/CalcElements"
walther@59632
    38
  theory Specify imports "~~/src/Tools/isac/ProgLang/ProgLang" Input_Descript
walther@59632
    39
    ML_file model.sml
walther@59632
    40
    ML_file mstools.sml
walther@59632
    41
    ML_file "specification-elems.sml"
walther@59632
    42
    ML_file istate.sml
walther@59632
    43
    ML_file tactic.sml
walther@59632
    44
    ML_file "ctree-basic.sml" (*shift to base in common with Interpret*)
walther@59632
    45
    ML_file "ctree-access.sml"(*shift to base in common with Interpret*)
walther@59632
    46
    ML_file "ctree-navi.sml"  (*shift to base in common with Interpret*)
walther@59632
    47
    ML_file ctree.sml         (*shift to base in common with Interpret*)
walther@59632
    48
    ML_file ptyps.sml
walther@59632
    49
    ML_file generate.sml
walther@59632
    50
    ML_file calchead.sml
walther@59632
    51
    ML_file appl.sml
wneuper@59595
    52
*)        "Specify/Specify"
wneuper@59600
    53
(*
walther@59632
    54
  theory Interpret imports "~~/src/Tools/isac/Specify/Specify"
walther@59632
    55
    ML_file rewtools.sml
walther@59632
    56
    ML_file script.sml
walther@59632
    57
    ML_file inform.sml
walther@59632
    58
    ML_file "lucas-interpreter.sml"
wneuper@59600
    59
*)        "Interpret/Interpret"
wneuper@59600
    60
(*
walther@59632
    61
  theory MathEngine imports "~~/src/Tools/isac/Interpret/Interpret"
walther@59632
    62
    ML_file solve.sml
walther@59634
    63
    ML_file "mathengine-stateless.sml"
walther@59632
    64
    ML_file messages.sml
walther@59632
    65
    ML_file states.sml
wneuper@59600
    66
*)        "MathEngine/MathEngine"
wneuper@59600
    67
(*
walther@59632
    68
  theory BridgeLibisabelle imports "~~/src/Tools/isac/MathEngine/MathEngine"
walther@59632
    69
    ML_file mathml.sml
walther@59632
    70
    ML_file datatypes.sml
walther@59632
    71
    ML_file "pbl-met-hierarchy.sml"
walther@59632
    72
    ML_file "thy-hierarchy.sml" 
walther@59632
    73
    ML_file "interface-xml.sml"
walther@59632
    74
    ML_file interface.sml
walther@59614
    75
*)        "BridgeLibisabelle/BridgeLibisabelle"
wneuper@59147
    76
walther@59612
    77
          "Knowledge/Build_Thydata" (*imports Isac.thy etc*)
wneuper@59469
    78
wneuper@59601
    79
(*//-----------------------------------------------------------------------------------------\\*)
wneuper@59601
    80
(*\\-----------------------------------------------------------------------------------------//*)
neuper@48763
    81
begin
neuper@48760
    82
wneuper@59472
    83
text \<open>
neuper@55276
    84
  show theory dependencies using the graph browser, 
neuper@55276
    85
  open "browser_info/HOL/Isac/session.graph"
neuper@55276
    86
  and proceed from the ancestors towards the siblings.
wneuper@59472
    87
\<close>
neuper@55276
    88
wneuper@59472
    89
section \<open>check presence of definitions from directories\<close>
neuper@48763
    90
wneuper@59263
    91
(*declare [[ML_print_depth = 999]]*)
wneuper@59472
    92
ML \<open>
wneuper@59472
    93
\<close> ML \<open>
walther@59637
    94
parseNEW @{context} "xxx #> aaa bbb"
walther@59637
    95
\<close> ML \<open>
walther@59637
    96
#> : ('a -> 'b) * ('b -> 'c) -> 'a -> 'c
wneuper@59587
    97
\<close> ML \<open>
wneuper@59472
    98
\<close>
wneuper@59472
    99
ML \<open>Calc.adhoc_thm; (*from "ProgLang/calculate.sml" *)\<close>
wneuper@59472
   100
ML \<open>Rewrite.rewrite_; (*from "ProgLang/rewrite.sml" *)\<close>
wneuper@59595
   101
ML \<open>Input_Descript.is_reall_dsc; (*from "ProgLang/scrtools.sml" *)\<close>
walther@59603
   102
ML \<open>Math_Engine.me;\<close>
walther@59613
   103
text \<open>contextthyOK2xml; (*"xmlsrc/interface-xml.sml"*)\<close>
walther@59603
   104
ML \<open>list_rls\<close>
wneuper@59562
   105
                                                         
walther@59603
   106
ML \<open>Prog_Expr.eval_occurs_in\<close>
walther@59603
   107
ML \<open>@{thm last_thmI}\<close>
wneuper@59472
   108
ML \<open>@{thm Querkraft_Belastung}\<close>
neuper@41905
   109
wneuper@59472
   110
ML \<open>Celem.check_guhs_unique := false;\<close>
wneuper@59472
   111
ML \<open>writeln "**** isac kernel = math-engine + Knowledge complete ******"\<close>
wneuper@59592
   112
ML \<open>@{theory "Isac_Knowledge"}\<close>
wneuper@59472
   113
ML \<open>(*get_the ["IsacKnowledge", "Diff", "Theorems", "diff_sin_chain"]
wneuper@59472
   114
  ERROR: app_py: not found: ["IsacKnowledge","Diff","Theorems","diff_sin_chain"]*)\<close>
neuper@42412
   115
wneuper@59472
   116
section \<open>State of approaching Isabelle by Isac\<close>
wneuper@59472
   117
text \<open>
neuper@55431
   118
  Mathias Lehnfeld gives the following list in his thesis in section 
neuper@55431
   119
  4.2.3 Relation to Ongoing Isabelle Development.
wneuper@59472
   120
\<close>
wneuper@59472
   121
subsection \<open>(0) Survey on remaining Unsynchronized.ref\<close>
wneuper@59472
   122
text \<open>
neuper@55433
   123
  REPLACE BY KEStore... (has been overlooked)
neuper@55433
   124
    calcelems.sml:val rew_ord' = Unsynchronized.ref ...
neuper@55433
   125
  KEEP FOR TRACING
neuper@55433
   126
    calcelems.sml:val trace_rewrite = Unsynchronized.ref false;
neuper@55433
   127
    calcelems.sml:val depth = Unsynchronized.ref 99999;
neuper@55433
   128
    calcelems.sml:val lim_rewrite = Unsynchronized.ref 99999;
neuper@55433
   129
    calcelems.sml:val lim_deriv = Unsynchronized.ref 100;
neuper@55433
   130
    Interpret/script.sml:val trace_script = Unsynchronized.ref false;
neuper@55433
   131
  KEEP FOR EASIER DEVELOPMENT
neuper@55433
   132
    calcelems.sml:val check_guhs_unique = Unsynchronized.ref true;
neuper@55433
   133
  KEEP FOR DEMOS
neuper@55433
   134
    Knowledge/GCD_Poly_ML.thy:  val trace_div = Unsynchronized.ref true;
neuper@55433
   135
    Knowledge/GCD_Poly_ML.thy:  val trace_div_invariant = Unsynchronized.ref false;
neuper@55433
   136
    Knowledge/GCD_Poly_ML.thy:  val trace_Euclid = Unsynchronized.ref true;
wneuper@59472
   137
\<close>
wneuper@59472
   138
subsection \<open>(1) Exploit parallelism for concurrent session management\<close>
wneuper@59472
   139
subsection \<open>(2) Make Isac’s programming language usable\<close>
wneuper@59472
   140
subsection \<open>(3) Adopt Isabelle’s numeral computation for Isac\<close>
wneuper@59472
   141
text \<open>
neuper@55431
   142
  In 2002 isac already strived for floating point numbers. Since that time
neuper@55431
   143
  isac represents numerals as "Free", see below (*1*). These experiments are
neuper@55431
   144
  unsatisfactory with respect to logical soundness.
neuper@55431
   145
  Since Isabelle now has started to care about floating point numbers, it is high 
neuper@55431
   146
  time to adopt these together with the other numerals. Isabelle2012/13's numerals
neuper@55431
   147
  are different from Isabelle2011, see "test/Tools/isac/ProgLang/termC.sml".
neuper@55431
   148
  
neuper@55431
   149
  The transition from "Free" to standard numerals is a task to be scheduled for 
neuper@55431
   150
  several weeks. The urgency of this task follows from the experience, 
neuper@55431
   151
  that (1.2) for "thehier" is very hard, because "num_str" seems to destroy 
neuper@55431
   152
  some of the long identifiers of theorems which would tremendously simplify
neuper@55431
   153
  building a hierarchy of theorems according to (1.2), see (*2*) below.
wneuper@59472
   154
\<close>
wneuper@59472
   155
ML \<open>(*1*) Free ("123.456", HOLogic.realT)\<close>
neuper@55484
   156
wneuper@59472
   157
subsection \<open>(4) Improve the efficiency of Isac’s rewrite-engine\<close>
wneuper@59472
   158
subsection \<open>(5) Adopt Isabelle/jEdit for Isac\<close>
neuper@55431
   159
neuper@37906
   160
end