src/HOL/SPARK/Manual/Proc2.thy
author blanchet
Mon, 01 Sep 2014 18:42:02 +0200
changeset 58130 5e9170812356
parent 56798 939e88e79724
child 64593 50c715579715
permissions -rw-r--r--
ported to use new-style datatypes * * * compile
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
45044
2fae15f8984d Added documentation for HOL-SPARK
berghofe
parents:
diff changeset
     1
theory Proc2
58130
5e9170812356 ported to use new-style datatypes
blanchet
parents: 56798
diff changeset
     2
imports "../SPARK"
45044
2fae15f8984d Added documentation for HOL-SPARK
berghofe
parents:
diff changeset
     3
begin
2fae15f8984d Added documentation for HOL-SPARK
berghofe
parents:
diff changeset
     4
56798
939e88e79724 Discontinued old spark_open; spark_open_siv is now spark_open
berghofe
parents: 45044
diff changeset
     5
spark_open "loop_invariant/proc2"
45044
2fae15f8984d Added documentation for HOL-SPARK
berghofe
parents:
diff changeset
     6
2fae15f8984d Added documentation for HOL-SPARK
berghofe
parents:
diff changeset
     7
spark_vc procedure_proc2_7
2fae15f8984d Added documentation for HOL-SPARK
berghofe
parents:
diff changeset
     8
  by (simp add: ring_distribs pull_mods)
2fae15f8984d Added documentation for HOL-SPARK
berghofe
parents:
diff changeset
     9
2fae15f8984d Added documentation for HOL-SPARK
berghofe
parents:
diff changeset
    10
spark_end
2fae15f8984d Added documentation for HOL-SPARK
berghofe
parents:
diff changeset
    11
2fae15f8984d Added documentation for HOL-SPARK
berghofe
parents:
diff changeset
    12
end