isabelle: src/HOL/UNITY/UNITY_Main.thy@f1de44e61ec1 (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
16417 9bc16273c2d4 migrated theory headers to new format haftmann parents: 16184 diff changeset	9	theory UNITY_Main imports Detects PPROD Follows ProgressSets
9bc16273c2d4 migrated theory headers to new format haftmann parents: 16184 diff changeset	10	uses "UNITY_tactics.ML" begin
13786 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	wenzelm
	Tue, 16 May 2006 13:01:23 +0200
changeset 19641	f1de44e61ec1
parent 16417	9bc16273c2d4
child 21588	cd0dc678a205
permissions	-rw-r--r--