src/Tools/isac/Build_Isac.thy
author Walther Neuper <neuper@ist.tugraz.at>
Tue, 28 Sep 2010 07:28:10 +0200
branchisac-update-Isa09-2
changeset 38025 67a110289e4e
parent 38015 67ba02dffacc
child 38051 efdeff9df986
permissions -rw-r--r--
repaired fun uminus_to_string, fun rewrite_terms_

rewrite now adjusts to 2 changes from 2002 to 2009-2
(1) Pattern.match requires _Trueprop $_ pat
(2) rewrite returns assumptions without _Trueprop $_ asm
neuper@37906
     1
(*  Title:   ~~~/isac/Isac_Mathengine.thy
neuper@37906
     2
    Author: Walther Neuper, TU Graz
neuper@37906
     3
neuper@37910
     4
$ cd /usr/local/Isabelle2009-1/src/Tools/isac
neuper@37947
     5
$ /usr/local/isabisac/bin/isabelle emacs Build_Isac.thy &
neuper@37947
     6
$ /usr/local/isabisac/bin/isabelle jedit Build_Isac.thy &
neuper@37906
     7
neuper@37924
     8
12345678901234567890123456789012345678901234567890123456789012345678901234567890
neuper@37924
     9
        10        20        30        40        50        60        70        80
neuper@37906
    10
*)
neuper@37906
    11
neuper@37906
    12
header {* Loading the isac mathengine *}
neuper@37906
    13
neuper@37947
    14
theory Build_Isac
neuper@38008
    15
imports Complex_Main "ProgLang/Language" (*"Knowledge/Test"*)
neuper@37906
    16
begin
neuper@37906
    17
neuper@37943
    18
ML {* 
neuper@38015
    19
tracing "**** build the isac kernel = math-engine + Knowledge ***********";
neuper@38015
    20
tracing "**** build the math-engine *************************************" *}
neuper@37943
    21
neuper@37906
    22
ML {* Toplevel.debug := true; *}
neuper@37906
    23
use "library.sml"
neuper@37906
    24
use "calcelems.sml"
neuper@37906
    25
ML {* check_guhs_unique := true *}
neuper@37906
    26
neuper@38025
    27
use "ProgLang/termC.sml"
neuper@37947
    28
use "ProgLang/calculate.sml"
neuper@37947
    29
use "ProgLang/rewrite.sml"
neuper@38008
    30
use_thy"ProgLang/Script"    (*ListC, Tools, Script*)
neuper@37947
    31
use "ProgLang/scrtools.sml"
neuper@38008
    32
use_thy"ProgLang/Language"  (*just for integrating scrtools.sml*)
neuper@37906
    33
neuper@37947
    34
use "Interpret/mstools.sml"
neuper@37947
    35
use "Interpret/ctree.sml"
neuper@37947
    36
use "Interpret/ptyps.sml"
neuper@37947
    37
use "Interpret/generate.sml"
neuper@37947
    38
use "Interpret/calchead.sml"
neuper@37947
    39
use "Interpret/appl.sml"
neuper@37947
    40
use "Interpret/rewtools.sml"
neuper@37947
    41
use "Interpret/script.sml"
neuper@37947
    42
use "Interpret/solve.sml"
neuper@37947
    43
use "Interpret/inform.sml"
neuper@37947
    44
use "Interpret/mathengine.sml"
neuper@37936
    45
neuper@37940
    46
use "xmlsrc/mathml.sml"
neuper@37940
    47
use "xmlsrc/datatypes.sml"
neuper@37940
    48
use "xmlsrc/pbl-met-hierarchy.sml"
neuper@37940
    49
use "xmlsrc/thy-hierarchy.sml" 
neuper@37941
    50
use "xmlsrc/interface-xml.sml"
neuper@37941
    51
neuper@37947
    52
use "Frontend/messages.sml"
neuper@37947
    53
use "Frontend/states.sml"
neuper@37947
    54
use "Frontend/interface.sml"
neuper@37906
    55
neuper@37906
    56
use "print_exn_G.sml"
neuper@38015
    57
ML {* tracing "**** build math-engine complete **************************" *}
neuper@37906
    58
neuper@38015
    59
ML {* tracing "**** build the Knowledge *********************************" *}
neuper@38007
    60
(*use_thy "Knowledge/Delete"
neuper@37979
    61
  use_thy "Knowledge/Descript"
neuper@37979
    62
  use_thy "Knowledge/Atools"
neuper@37979
    63
  use_thy "Knowledge/Simplify"
neuper@37979
    64
  use_thy "Knowledge/Poly"
neuper@38004
    65
  use_thy "Knowledge/Rational"
neuper@38004
    66
  use_thy "Knowledge/PolyMinus"
neuper@38004
    67
  use_thy "Knowledge/Equation"
neuper@38004
    68
  use_thy "Knowledge/LinEq"
neuper@38004
    69
  use_thy "Knowledge/Root"
neuper@38004
    70
  use_thy "Knowledge/RootEq"
neuper@38004
    71
  use_thy "Knowledge/RatEq"
neuper@38004
    72
  use_thy "Knowledge/RootRat"
neuper@38004
    73
  use_thy "Knowledge/RootRatEq"
neuper@38004
    74
  use_thy "Knowledge/PolyEq"
neuper@38004
    75
  use_thy "Knowledge/Vect"
neuper@38004
    76
  use_thy "Knowledge/Calculus"
neuper@38004
    77
  use_thy "Knowledge/Trig"
neuper@38004
    78
  use_thy "Knowledge/LogExp"
neuper@38004
    79
  use_thy "Knowledge/Diff"
neuper@38004
    80
  use_thy "Knowledge/DiffApp"
neuper@38004
    81
  use_thy "Knowledge/Integrate"
neuper@38004
    82
  use_thy "Knowledge/EqSystem"
neuper@38004
    83
  use_thy "Knowledge/Biegelinie"
neuper@38004
    84
  use_thy "Knowledge/AlgEin"
neuper@38007
    85
*)
neuper@38010
    86
  use_thy "Knowledge/Test" (*required _only_ for ROOT.ML !?!*)
neuper@38005
    87
use_thy "Knowledge/Isac"
neuper@38009
    88
ML {* check_guhs_unique := false; *}
neuper@38015
    89
ML {* tracing "**** isac kernel = math-engine + Knowledge complete ******" *}
neuper@38005
    90
neuper@38011
    91
neuper@38011
    92
(*
neuper@38011
    93
use "../../../test/Tools/isac/Interpret/calchead.sml" (*part.*)
neuper@38011
    94
*** get_pbt not found: ["linear","system"]
neuper@38011
    95
use"../../../test/Tools/isac/Knowledge/integrate.sml";
neuper@38011
    96
*)
neuper@38011
    97
neuper@37906
    98
end
neuper@37906
    99