test/Tools/isac/Test_Isac.thy
author Alexander Kargl <akargl@brgkepler.net>
Tue, 26 Jul 2011 09:09:49 +0200
branchdecompose-isar
changeset 42188 f7b348d64d0c
parent 42182 0d3a5df8422c
child 42189 0ea13b51e7cd
permissions -rwxr-xr-x
intermed: uncommented tests, updated protocoll
neuper@41945
     1
(* Title:  All tests on isac; observe outcommented
neuper@41943
     2
   Author: Walther Neuper 101001
neuper@41943
     3
   (c) copyright due to lincense terms.
neuper@41943
     4
neuper@41943
     5
$ cd /usr/local/isabisac/test/Tools/isac
neuper@41978
     6
$ /usr/local/Isabelle/bin/isabelle jedit -l Isac Test_Isac.thy &
neuper@41968
     7
1234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890
neuper@41968
     8
        10        20        30        40        50        60        70        80         90      100
neuper@41943
     9
*)
neuper@41943
    10
neuper@41979
    11
theory Test_Isac imports 
neuper@41979
    12
  Isac
neuper@41979
    13
  "Knowledge/Rational_Test"
neuper@41980
    14
  "ADDTESTS/Ctxt"
neuper@42048
    15
  "ADDTESTS/test-depend/Build_Test"
neuper@42023
    16
  "ADDTESTS/All_Ctxt"
neuper@42179
    17
  "ADDTESTS/course/phst11/T1_Basics"
neuper@42092
    18
  "ADDTESTS/course/phst11/T2_Rewriting"
neuper@42179
    19
  "ADDTESTS/course/phst11/T3_MathEngine"
neuper@42048
    20
  "ADDTESTS/file-depend/Build_Test"
neuper@42048
    21
  "../../Pure/Isar/Test_Parsers"
neuper@42048
    22
(*"../../Pure/Isar/Pure/Isar/Struct_Deriv" update 2009-2-->2011*)
neuper@42048
    23
  "../../Pure/Isar/Test_Parse_Term"
neuper@41979
    24
 
neuper@41945
    25
uses 
neuper@41945
    26
  (         "library.sml")
neuper@41945
    27
  (         "calcelems.sml")
neuper@41945
    28
  ("ProgLang/termC.sml") 
neuper@41945
    29
  ("ProgLang/calculate.sml")
neuper@41945
    30
  ("ProgLang/rewrite.sml")
akargl@42176
    31
(*("ProgLang/listg.sml")*)
akargl@42176
    32
  ("ProgLang/scrtools.sml")
akargl@42176
    33
  ("ProgLang/tools.sml")
neuper@41945
    34
neuper@41985
    35
  ("Minisubpbl/000-comments.sml")
neuper@41985
    36
  ("Minisubpbl/100-init-rootpbl.sml")
neuper@41986
    37
  ("Minisubpbl/150-add-given.sml")
neuper@41985
    38
  ("Minisubpbl/200-start-method.sml")
neuper@41985
    39
  ("Minisubpbl/300-init-subpbl.sml")
neuper@41985
    40
  ("Minisubpbl/400-start-meth-subpbl.sml")
neuper@42022
    41
  ("Minisubpbl/490-nxt-Check_Postcond.sml")
neuper@42022
    42
  ("Minisubpbl/500-met-sub-to-root.sml")
neuper@42022
    43
  ("Minisubpbl/530-error-Check_Elementwise.sml")
neuper@42022
    44
  ("Minisubpbl/600-postcond.sml")
neuper@41985
    45
neuper@41945
    46
  ("Interpret/mstools.sml") 
bonzai@41951
    47
  ("Interpret/ctree.sml")
neuper@41945
    48
  ("Interpret/ptyps.sml") 
akargl@42176
    49
  ("Interpret/generate.sml")
neuper@41945
    50
  ("Interpret/calchead.sml") 
akargl@42176
    51
  ("Interpret/appl.sml")
neuper@41945
    52
  ("Interpret/rewtools.sml") 
akargl@42169
    53
  ("Interpret/script.sml")
akargl@42176
    54
  ("Interpret/solve.sml") 
akargl@42176
    55
  ("Interpret/inform.sml")
neuper@41945
    56
  ("Interpret/mathengine.sml")
neuper@41945
    57
akargl@42176
    58
  ("xmlsrc/mathml.sml")
neuper@41945
    59
  ("xmlsrc/datatypes.sml")
neuper@41945
    60
  ("xmlsrc/pbl-met-hierarchy.sml")
akargl@42176
    61
  ("xmlsrc/thy-hierarchy.sml")
neuper@41945
    62
  ("xmlsrc/interface-xml.sml")
neuper@41945
    63
neuper@41945
    64
  ("Frontend/messages.sml")
neuper@41945
    65
  ("Frontend/states.sml")
neuper@41945
    66
  ("Frontend/interface.sml")
neuper@41945
    67
  ("print_exn_G.sml")
neuper@41945
    68
neuper@41945
    69
  ("Knowledge/delete.sml")
neuper@41945
    70
  ("Knowledge/descript.sml")
neuper@41945
    71
  ("Knowledge/atools.sml")
neuper@41945
    72
  ("Knowledge/simplify.sml")
neuper@41945
    73
  ("Knowledge/poly.sml")
neuper@41945
    74
  ("Knowledge/rational.sml")
neuper@41945
    75
  ("Knowledge/equation.sml")
neuper@41945
    76
  ("Knowledge/root.sml")
neuper@41945
    77
  ("Knowledge/lineq.sml")
neuper@41945
    78
  ("Knowledge/rooteq.sml")
neuper@41945
    79
  ("Knowledge/rateq.sml")
neuper@41945
    80
  ("Knowledge/rootrateq.sml")
neuper@41945
    81
(*("Knowledge/polyeq.sml")*)
neuper@41945
    82
  ("Knowledge/calculus.sml")
neuper@41945
    83
  ("Knowledge/trig.sml")
neuper@41945
    84
  ("Knowledge/logexp.sml")
neuper@41945
    85
  ("Knowledge/diff.sml")
neuper@41945
    86
  ("Knowledge/integrate.sml")
neuper@41945
    87
  ("Knowledge/eqsystem.sml")
neuper@41945
    88
  ("Knowledge/test.sml")
neuper@41945
    89
  ("Knowledge/polyminus.sml")
neuper@41945
    90
  ("Knowledge/vect.sml")
neuper@41945
    91
  ("Knowledge/diffapp.sml")
neuper@41945
    92
  ("Knowledge/biegelinie.sml")
neuper@41945
    93
  ("Knowledge/algein.sml")
neuper@41945
    94
  ("Knowledge/diophanteq.sml")
neuper@41945
    95
  ("Knowledge/isac.sml")
neuper@41945
    96
neuper@41943
    97
begin
neuper@41947
    98
neuper@41943
    99
  ML {*"%%%%%%%%%%%%%%%%% start ProgLang.thy %%%%%%%%%%%%%%%%%%%";*}
neuper@42179
   100
  use          "library.sml"
neuper@42179
   101
  use          "calcelems.sml"
akargl@42188
   102
  use "ProgLang/termC.sml"
neuper@41943
   103
  use "ProgLang/calculate.sml"      (*part.*)
neuper@41943
   104
  use "ProgLang/rewrite.sml"        (*part.*)
neuper@41943
   105
(*use "ProgLang/listg.sml"            2002*)
akargl@42145
   106
  use "ProgLang/scrtools.sml"         (*complete*)
akargl@42145
   107
  use "ProgLang/tools.sml"            (*complete*)
neuper@41943
   108
  ML {*"%%%%%%%%%%%%%%%%% end ProgLang.thy %%%%%%%%%%%%%%%%%%%%%";*}
neuper@41986
   109
  ML {*"%%%%%%%%%%%%%%%%% start Minisubpbl %%%%%%%%%%%%%%%%%%%%%";*}
neuper@41985
   110
  use "Minisubpbl/000-comments.sml"
neuper@41985
   111
  use "Minisubpbl/100-init-rootpbl.sml"
neuper@41986
   112
  use "Minisubpbl/150-add-given.sml"
neuper@41985
   113
  use "Minisubpbl/200-start-method.sml"
neuper@41990
   114
  use "Minisubpbl/300-init-subpbl.sml"
neuper@41997
   115
  use "Minisubpbl/400-start-meth-subpbl.sml"
neuper@42022
   116
  use "Minisubpbl/490-nxt-Check_Postcond.sml"
neuper@41998
   117
  use "Minisubpbl/500-met-sub-to-root.sml"
neuper@42022
   118
  use "Minisubpbl/530-error-Check_Elementwise.sml"
neuper@41998
   119
  use "Minisubpbl/600-postcond.sml"
akargl@42188
   120
  ML {*"%%%%%%%%%%%%%%%%% end Minisubpbl.thy %%%%%%%%%%%%%%%%%%%%%%%";*}
neuper@41943
   121
  ML {*"%%%%%%%%%%%%%%%%% start Interpret.thy %%%%%%%%%%%%%%%%%%";*}
neuper@41975
   122
  use "Interpret/mstools.sml"       (*new 2010*)
neuper@41989
   123
  use "Interpret/ctree.sml"         (*!...!see(25)*)
akargl@42188
   124
  use "Interpret/ptyps.sml"         (*part.*)
neuper@41943
   125
(*use "Interpret/generate.sml"        new 2011*)
akargl@42181
   126
  use "Interpret/calchead.sml"      (*part.*)
neuper@41975
   127
  use "Interpret/appl.sml"          (*!complete WEGEN INTERMED TESTCODE*)
neuper@41972
   128
  use "Interpret/rewtools.sml"      (*!    *)
akargl@42176
   129
  use "Interpret/script.sml"        (*!TODO/part.*)
akargl@42176
   130
  use "Interpret/solve.sml"         (*part.*)
akargl@42176
   131
  use "Interpret/inform.sml"        (*part.*)
neuper@41972
   132
  use "Interpret/mathengine.sml"    (*!part.*)
neuper@41943
   133
  ML {*"%%%%%%%%%%%%%%%%% end Interpret.thy %%%%%%%%%%%%%%%%%%%%";*}
neuper@41943
   134
  ML {*"%%%%%%%%%%%%%%%%% start xmlsrc.thy %%%%%%%%%%%%%%%%%%%%%";*}
akargl@42176
   135
  use "xmlsrc/mathml.sml"            (*part.*)
akargl@42176
   136
  use "xmlsrc/datatypes.sml"         (*TODO/part.*)
akargl@42176
   137
  use "xmlsrc/pbl-met-hierarchy.sml" (*TODO/part.*)
akargl@42176
   138
  use "xmlsrc/thy-hierarchy.sml"     (*TODO after 2009-2/part.*) 
akargl@42176
   139
  use "xmlsrc/interface-xml.sml"     (*TODO after 2009-2*)
neuper@41943
   140
  ML {*"%%%%%%%%%%%%%%%%% end xmlsrc.thy %%%%%%%%%%%%%%%%%%%%%%%";*}
neuper@41943
   141
  ML {*"%%%%%%%%%%%%%%%%% start Frontend.thy %%%%%%%%%%%%%%%%%%%";*}
neuper@41943
   142
  use "Frontend/messages.sml"        (*new 2011*)
neuper@41943
   143
  use "Frontend/states.sml"          (*new 2011*)
n@42143
   144
  use "Frontend/interface.sml"       (*complete*)                            
neuper@41945
   145
  use         "print_exn_G.sml"      (*new 2011*)
neuper@41943
   146
  ML {*"%%%%%%%%%%%%%%%%% end Frontend.thy %%%%%%%%%%%%%%%%%%%%%";*}
neuper@41943
   147
  ML {*"%%%%%%%%%%%%%%%%% start Knowledge.thy %%%%%%%%%%%%%%%%%%";*}
neuper@41943
   148
  use "Knowledge/delete.sml"         (*new 2011*)
neuper@41943
   149
  use "Knowledge/descript.sml"       (*new 2011*)
neuper@41943
   150
(*use "Knowledge/atools.sml"           2002, added termorder.sml 2011*)
neuper@41943
   151
  use "Knowledge/simplify.sml"       (*part.*)
neuper@41943
   152
(*use "Knowledge/poly.sml"             2002*)
neuper@41947
   153
(*use "Knowledge/rational.sml"         part.; diff.emacs--jedit*)
neuper@41943
   154
(*use "Knowledge/equation.sml"         2002*)
neuper@41943
   155
(*use "Knowledge/root.sml"             2002*)
neuper@41943
   156
  use "Knowledge/lineq.sml"          (*new 2011*)
neuper@41943
   157
(*use "Knowledge/rooteq.sml"           2002*)
neuper@41943
   158
(*use "Knowledge/rateq.sml"            2002*)
neuper@41943
   159
(*use "Knowledge/rootrat.sml"          2002*)
neuper@41943
   160
(*use "Knowledge/rootrateq.sml"        2002*)
neuper@41943
   161
(*use "Knowledge/polyeq.sml"           2002*)
neuper@41956
   162
(*use "Knowledge/rlang.sml"            2002???*)
neuper@41943
   163
  use "Knowledge/calculus.sml"       (*new 2011*)
neuper@41943
   164
(*use "Knowledge/trig.sml"             2002*)
neuper@41943
   165
(*use "Knowledge/logexp.sml"           2002*)
neuper@41943
   166
  use "Knowledge/diff.sml"           (*part.*)
neuper@42067
   167
  use "Knowledge/integrate.sml"      (*part. was complete 2009-2
neuper@41947
   168
                                              diff.emacs--jedit*)
t@42166
   169
  use "Knowledge/eqsystem.sml"       (*part.*)
t@42098
   170
  use "Knowledge/test.sml"           (*complete*)
neuper@42141
   171
  use "Knowledge/polyminus.sml"      (*part.*)
t@42166
   172
  use "Knowledge/vect.sml"           (*complete*)
t@42166
   173
  use "Knowledge/diffapp.sml"        (*part.*)
t@42166
   174
  use "Knowledge/biegelinie.sml"     (*part.*)
t@42166
   175
  use "Knowledge/algein.sml"         (*part.*)
neuper@41943
   176
  use "Knowledge/diophanteq.sml"     (*complete*)
neuper@41943
   177
  use "Knowledge/isac.sml"           (*part.*)
neuper@41943
   178
  ML {*"%%%%%%%%%%%%%%%%% end Knowledge.thy %%%%%%%%%%%%%%%%%%%%";*}
neuper@41945
   179
  ML {*"%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%";*}
neuper@41945
   180
  ML {*"%%%%%%%%%%%%%%%%% all tests successful %%%%%%%%%%%%%%%%%";*}
neuper@41945
   181
  ML {*"%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%";*}
neuper@41943
   182
neuper@41943
   183
end
neuper@41943
   184
neuper@41943
   185
(*=== inhibit exn ?=============================================================
neuper@41943
   186
===== inhibit exn ?===========================================================*)
neuper@41943
   187
neuper@42067
   188
(*========== inhibit exn 110628 ================================================
neuper@42067
   189
============ inhibit exn 110628 ==============================================*)
neuper@41943
   190
neuper@41943
   191
(*-.-.-.-.-.-isolate response.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.
neuper@41943
   192
-.-.-.-.-.-.-isolate response.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.*)
neuper@41975
   193