src/HOL/Modelcheck/ROOT.ML
author haftmann
Fri, 11 Jun 2010 17:14:02 +0200
changeset 37407 61dd8c145da7
parent 28263 69eaa97e7e96
permissions -rw-r--r--
declare lex_prod_def [code del]
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
3210
e80db1660614 Invoking Model Checkers in Isabelle/HOL;
mueller
parents:
diff changeset
     1
(*  Title:      HOL/Modelcheck/ROOT.ML
e80db1660614 Invoking Model Checkers in Isabelle/HOL;
mueller
parents:
diff changeset
     2
    ID:         $Id$
7295
fe09a0c5cebe quite a lot of tuning an cleanup;
wenzelm
parents: 6465
diff changeset
     3
    Author:     Olaf Mueller and Tobias Hamberger and Robert Sandner, TU Muenchen
3210
e80db1660614 Invoking Model Checkers in Isabelle/HOL;
mueller
parents:
diff changeset
     4
7295
fe09a0c5cebe quite a lot of tuning an cleanup;
wenzelm
parents: 6465
diff changeset
     5
Basic Modelchecker examples.
3210
e80db1660614 Invoking Model Checkers in Isabelle/HOL;
mueller
parents:
diff changeset
     6
*)
e80db1660614 Invoking Model Checkers in Isabelle/HOL;
mueller
parents:
diff changeset
     7
17272
c63e5220ed77 converted to Isar theory format;
wenzelm
parents: 9000
diff changeset
     8
time_use_thy "CTL";
c63e5220ed77 converted to Isar theory format;
wenzelm
parents: 9000
diff changeset
     9
c63e5220ed77 converted to Isar theory format;
wenzelm
parents: 9000
diff changeset
    10
c63e5220ed77 converted to Isar theory format;
wenzelm
parents: 9000
diff changeset
    11
(* Einhoven model checker *)
c63e5220ed77 converted to Isar theory format;
wenzelm
parents: 9000
diff changeset
    12
28263
69eaa97e7e96 moved global ML bindings to global place;
wenzelm
parents: 23556
diff changeset
    13
(*check if user has pmu installed*)
69eaa97e7e96 moved global ML bindings to global place;
wenzelm
parents: 23556
diff changeset
    14
fun eindhoven_enabled () = getenv "EINDHOVEN_HOME" <> "";
69eaa97e7e96 moved global ML bindings to global place;
wenzelm
parents: 23556
diff changeset
    15
fun if_eindhoven_enabled f x = if eindhoven_enabled () then f x else ();
69eaa97e7e96 moved global ML bindings to global place;
wenzelm
parents: 23556
diff changeset
    16
17272
c63e5220ed77 converted to Isar theory format;
wenzelm
parents: 9000
diff changeset
    17
time_use_thy "EindhovenSyn";
c63e5220ed77 converted to Isar theory format;
wenzelm
parents: 9000
diff changeset
    18
if_eindhoven_enabled time_use_thy "EindhovenExample";
c63e5220ed77 converted to Isar theory format;
wenzelm
parents: 9000
diff changeset
    19
7295
fe09a0c5cebe quite a lot of tuning an cleanup;
wenzelm
parents: 6465
diff changeset
    20
fe09a0c5cebe quite a lot of tuning an cleanup;
wenzelm
parents: 6465
diff changeset
    21
(* Mucke -- mu-calculus model checker from Karlsruhe *)
fe09a0c5cebe quite a lot of tuning an cleanup;
wenzelm
parents: 6465
diff changeset
    22
9000
c20d58286a51 cleaned up;
wenzelm
parents: 7295
diff changeset
    23
time_use_thy "MuckeSyn";
3210
e80db1660614 Invoking Model Checkers in Isabelle/HOL;
mueller
parents:
diff changeset
    24
28263
69eaa97e7e96 moved global ML bindings to global place;
wenzelm
parents: 23556
diff changeset
    25
(*check if user has mucke installed*)
69eaa97e7e96 moved global ML bindings to global place;
wenzelm
parents: 23556
diff changeset
    26
fun mucke_enabled () = getenv "MUCKE_HOME" <> "";
69eaa97e7e96 moved global ML bindings to global place;
wenzelm
parents: 23556
diff changeset
    27
fun if_mucke_enabled f x = if mucke_enabled () then f x else ();
69eaa97e7e96 moved global ML bindings to global place;
wenzelm
parents: 23556
diff changeset
    28
9000
c20d58286a51 cleaned up;
wenzelm
parents: 7295
diff changeset
    29
if_mucke_enabled time_use_thy "MuckeExample1";
c20d58286a51 cleaned up;
wenzelm
parents: 7295
diff changeset
    30
if_mucke_enabled time_use_thy "MuckeExample2";