src/HOL/Imperative_HOL/Imperative_HOL_ex.thy
author haftmann
Wed, 14 Jul 2010 16:45:30 +0200
changeset 37829 11f813e86305
parent 37826 4c0a5e35931a
child 37831 fa3a2e35c4f1
permissions -rw-r--r--
part of pervasive test

(*  Title:      HOL/Imperative_HOL/Imperative_HOL_ex.thy
    Author:     John Matthews, Galois Connections;
                Alexander Krauss, Lukas Bulwahn & Florian Haftmann, TU Muenchen
*)

header {* Monadic imperative HOL with examples *}

theory Imperative_HOL_ex
imports Imperative_HOL
  "ex/Imperative_Quicksort" "ex/Imperative_Reverse" "ex/Linked_Lists" "ex/SatChecker"
begin

definition "everything = (Array.new, Array.of_list, (*Array.make,*) Array.len, Array.nth,
  Array.upd, Array.map_entry, Array.swap, Array.freeze,
  ref, Ref.lookup, Ref.update(*, Ref.change*))"

export_code everything checking SML SML_imp OCaml? OCaml_imp? Haskell?

end