src/HOL/Auth/Yahalom2.ML
changeset 2323 3ae9b0ccee21
parent 2284 80ebd1a213fd
child 2377 ad9d2dedaeaa
--- a/src/HOL/Auth/Yahalom2.ML	Thu Dec 05 18:58:46 1996 +0100
+++ b/src/HOL/Auth/Yahalom2.ML	Thu Dec 05 19:00:28 1996 +0100
@@ -18,8 +18,7 @@
 HOL_quantifiers := false;
 
 
-(*Weak liveness: there are traces that reach the end*)
-
+(*A "possibility property": there are traces that reach the end*)
 goal thy 
  "!!A B. [| A ~= B; A ~= Server; B ~= Server |]   \
 \        ==> EX X NB K. EX evs: yahalom lost.          \
@@ -358,7 +357,7 @@
 by (parts_induct_tac 1);
 (*The nested conjunctions are entirely useless*)
 by (REPEAT_FIRST (rtac conjI ORELSE' fast_tac (!claset delrules [conjI])));
-qed "A_trust_YM3";
+qed "A_trusts_YM3";
 
 
 (*B knows, by the first part of A's message, that the Server distributed 
@@ -395,4 +394,4 @@
 \                   : set_of_list evs";
 by (etac (Says_imp_sees_Spy RS parts.Inj RS MPair_parts) 1);
 by (fast_tac (!claset addSDs [B_trusts_YM4_shrK]) 1);
-qed "B_trust_YM4";
+qed "B_trusts_YM4";