isabelle: src/HOL/UNITY/UNITY_Main.thy@80617b8d33c5 (annotated)

13786 ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	1	(* Title: HOL/UNITY/UNITY_Main.thy
ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	2	ID: $Id$
ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	3	Author: Lawrence C Paulson, Cambridge University Computer Laboratory
ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	4	Copyright 2003 University of Cambridge
13798 4c1a53627500 conversion to new-style theories and tidying paulson parents: 13786 diff changeset	5	*)
13786 ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	6
13798 4c1a53627500 conversion to new-style theories and tidying paulson parents: 13786 diff changeset	7	header{Comprehensive UNITY Theory}
13786 ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	8
13853 89131afa9f01 New theory ProgressSets. Definition of closure sets paulson parents: 13851 diff changeset	9	theory UNITY_Main = Detects + PPROD + Follows + ProgressSets
13786 ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	10	files "UNITY_tactics.ML":
ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	11
16184 80617b8d33c5 renamed "constrains" to "safety" to avoid keyword clash paulson parents: 15032 diff changeset	12	method_setup safety = {*
13786 ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	13	Method.ctxt_args (fn ctxt =>
ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	14	Method.METHOD (fn facts =>
15032 02aed07e01bf local_cla/simpset_of; wenzelm parents: 13853 diff changeset	15	gen_constrains_tac (local_clasimpset_of ctxt) 1)) *}
13786 ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	16	"for proving safety properties"
ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	17
ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	18	method_setup ensures_tac = {*
ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	19	fn args => fn ctxt =>
ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	20	Method.goal_args' (Scan.lift Args.name)
15032 02aed07e01bf local_cla/simpset_of; wenzelm parents: 13853 diff changeset	21	(gen_ensures_tac (local_clasimpset_of ctxt))
13786 ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	22	args ctxt *}
ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	23	"for proving progress properties"
ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	24
ab8f39f48a6f More conversion of UNITY to Isar new-style theories paulson parents: diff changeset	25	end

author	paulson
	Thu, 02 Jun 2005 13:47:08 +0200
changeset 16184	80617b8d33c5
parent 15032	02aed07e01bf
child 16417	9bc16273c2d4
permissions	-rw-r--r--