src/HOL/Auth/KerberosV.thy
changeset 36096 abc6a2ea4b88
parent 35416 d8d7d1b785af
child 36866 426d5781bb25
--- a/src/HOL/Auth/KerberosV.thy	Fri Apr 02 13:33:48 2010 +0200
+++ b/src/HOL/Auth/KerberosV.thy	Wed Apr 07 19:17:10 2010 +0200
@@ -92,8 +92,7 @@
 
 
 (* Predicate formalising the association between authKeys and servKeys *)
-constdefs
-  AKcryptSK :: "[key, key, event list] => bool"
+definition AKcryptSK :: "[key, key, event list] => bool" where
   "AKcryptSK authK servK evs ==
      \<exists>A B tt.
        Says Tgs A \<lbrace>Crypt authK \<lbrace>Key servK, Agent B, tt\<rbrace>,