TPTP Problem File: SWV791_5.p
View Solutions
- Solve Problem
%------------------------------------------------------------------------------
% File : SWV791_5 : TPTP v9.0.0. Released v6.0.0.
% Domain : Software Verification
% Problem : Needham-Schroeder shared-key protocol line 438
% Version : Especial.
% English :
% Refs : [BN10] Boehme & Nipkow (2010), Sledgehammer: Judgement Day
% : [Bla13] Blanchette (2011), Email to Geoff Sutcliffe
% Source : [Bla13]
% Names : ns_438 [Bla13]
% Status : Unknown
% Rating : 1.00 v6.4.0
% Syntax : Number of formulae : 165 ( 37 unt; 48 typ; 0 def)
% Number of atoms : 259 ( 122 equ)
% Maximal formula atoms : 7 ( 1 avg)
% Number of connectives : 184 ( 42 ~; 12 |; 20 &)
% ( 34 <=>; 76 =>; 0 <=; 0 <~>)
% Maximal formula depth : 17 ( 5 avg)
% Maximal term depth : 9 ( 2 avg)
% Number of types : 6 ( 5 usr)
% Number of type conns : 36 ( 23 >; 13 *; 0 +; 0 <<)
% Number of predicates : 4 ( 3 usr; 0 prp; 1-3 aty)
% Number of functors : 40 ( 40 usr; 18 con; 0-5 aty)
% Number of variables : 372 ( 351 !; 5 ?; 372 :)
% ( 16 !>; 0 ?*; 0 @-; 0 @+)
% SPC : TF1_UNK_EQU_NAR
% Comments : This file was generated by Isabelle (most likely Sledgehammer)
% 2011-12-13 16:26:48
%------------------------------------------------------------------------------
%----Should-be-implicit typings (7)
tff(ty_tc_Event_Oevent,type,
event: $tType ).
tff(ty_tc_HOL_Obool,type,
bool: $tType ).
tff(ty_tc_List_Olist,type,
list: $tType > $tType ).
tff(ty_tc_Message_Oagent,type,
agent1: $tType ).
tff(ty_tc_Message_Omsg,type,
msg: $tType ).
tff(ty_tc_Nat_Onat,type,
nat: $tType ).
tff(ty_tc_fun,type,
fun: ( $tType * $tType ) > $tType ).
%----Explicit typings (41)
tff(sy_c_COMBB,type,
combb:
!>[B: $tType,C: $tType,A: $tType] : ( ( fun(B,C) * fun(A,B) ) > fun(A,C) ) ).
tff(sy_c_COMBC,type,
combc:
!>[A: $tType,B: $tType,C: $tType] : ( ( fun(A,fun(B,C)) * B ) > fun(A,C) ) ).
tff(sy_c_Event_Obad,type,
bad: fun(agent1,bool) ).
tff(sy_c_Event_Oevent_OSays,type,
says: ( agent1 * agent1 * msg ) > event ).
tff(sy_c_Event_Oknows,type,
knows: ( agent1 * list(event) ) > fun(msg,bool) ).
tff(sy_c_List_Oappend,type,
append:
!>[A: $tType] : ( ( list(A) * list(A) ) > list(A) ) ).
tff(sy_c_List_Olist_OCons,type,
cons:
!>[A: $tType] : ( ( A * list(A) ) > list(A) ) ).
tff(sy_c_List_Olist_ONil,type,
nil:
!>[A: $tType] : list(A) ).
tff(sy_c_List_Orev,type,
rev:
!>[A: $tType] : ( list(A) > list(A) ) ).
tff(sy_c_List_Oset,type,
set:
!>[A: $tType] : ( list(A) > fun(A,bool) ) ).
tff(sy_c_List_OtakeWhile,type,
takeWhile:
!>[A: $tType] : ( ( fun(A,bool) * list(A) ) > list(A) ) ).
tff(sy_c_Message_Oagent_OServer,type,
server: agent1 ).
tff(sy_c_Message_Oagent_OSpy,type,
spy: agent1 ).
tff(sy_c_Message_Oanalz,type,
analz: fun(msg,bool) > fun(msg,bool) ).
tff(sy_c_Message_Omsg_OAgent,type,
agent: agent1 > msg ).
tff(sy_c_Message_Omsg_OCrypt,type,
crypt: ( nat * msg ) > msg ).
tff(sy_c_Message_Omsg_OKey,type,
key: nat > msg ).
tff(sy_c_Message_Omsg_OMPair,type,
mPair: ( msg * msg ) > msg ).
tff(sy_c_Message_Omsg_ONonce,type,
nonce: nat > msg ).
tff(sy_c_Message_Oparts,type,
parts: fun(msg,bool) > fun(msg,bool) ).
tff(sy_c_NS__Shared__Mirabelle__iywubrjwsc_Ons__shared,type,
nS_Sha254967238shared: fun(list(event),bool) ).
tff(sy_c_NS__Shared__Mirabelle__iywubrjwsc_Ons__sharedp,type,
nS_Sha993195050haredp: list(event) > $o ).
tff(sy_c_Public_OshrK,type,
shrK: agent1 > nat ).
tff(sy_c_aa,type,
aa1:
!>[A: $tType,B: $tType] : ( ( fun(A,B) * A ) > B ) ).
tff(sy_c_fFalse,type,
fFalse: bool ).
tff(sy_c_fNot,type,
fNot: fun(bool,bool) ).
tff(sy_c_fTrue,type,
fTrue: bool ).
tff(sy_c_fequal,type,
fequal:
!>[A: $tType] : fun(A,fun(A,bool)) ).
tff(sy_c_member,type,
member:
!>[A: $tType] : ( ( A * fun(A,bool) ) > $o ) ).
tff(sy_c_pp,type,
pp: bool > $o ).
tff(sy_v_A,type,
a: agent1 ).
tff(sy_v_Aa,type,
aa: agent1 ).
tff(sy_v_B,type,
b: agent1 ).
tff(sy_v_Ba,type,
ba: agent1 ).
tff(sy_v_K,type,
k: nat ).
tff(sy_v_Ka,type,
ka: nat ).
tff(sy_v_NA,type,
na: nat ).
tff(sy_v_Nb,type,
nb: nat ).
tff(sy_v_S,type,
s: agent1 ).
tff(sy_v_X,type,
x: msg ).
tff(sy_v_evs3,type,
evs3: list(event) ).
%----Relevant facts (100)
tff(fact_0_ns__shared_ONil,axiom,
member(list(event),nil(event),nS_Sha254967238shared) ).
tff(fact_1_spies__evs__rev,axiom,
! [Evsa: list(event)] : ( knows(spy,Evsa) = knows(spy,rev(event,Evsa)) ) ).
tff(fact_2_B__trusts__NS5__lemma,axiom,
! [NB: nat,NA: msg,Aa: agent1,Ka: nat,Evsa: list(event),Ba: agent1] :
( ~ member(agent1,Ba,bad)
=> ( member(list(event),Evsa,nS_Sha254967238shared)
=> ( ~ member(msg,key(Ka),analz(knows(spy,Evsa)))
=> ( member(event,says(server,Aa,crypt(shrK(Aa),mPair(NA,mPair(agent(Ba),mPair(key(Ka),crypt(shrK(Ba),mPair(key(Ka),agent(Aa)))))))),set(event,Evsa))
=> ( member(msg,crypt(Ka,mPair(nonce(NB),nonce(NB))),parts(knows(spy,Evsa)))
=> member(event,says(Aa,Ba,crypt(Ka,mPair(nonce(NB),nonce(NB)))),set(event,Evsa)) ) ) ) ) ) ).
tff(fact_3_Spy__analz__shrK,axiom,
! [Aa: agent1,Evsa: list(event)] :
( member(list(event),Evsa,nS_Sha254967238shared)
=> ( member(msg,key(shrK(Aa)),analz(knows(spy,Evsa)))
<=> member(agent1,Aa,bad) ) ) ).
tff(fact_4_Spy__see__shrK,axiom,
! [Aa: agent1,Evsa: list(event)] :
( member(list(event),Evsa,nS_Sha254967238shared)
=> ( member(msg,key(shrK(Aa)),parts(knows(spy,Evsa)))
<=> member(agent1,Aa,bad) ) ) ).
tff(fact_5_ns__shared_ONS3,axiom,
! [X1: msg,Ka: nat,Ba: agent1,NA: nat,S: agent1,Aa: agent1,Evs3: list(event)] :
( member(list(event),Evs3,nS_Sha254967238shared)
=> ( ( Aa != server )
=> ( member(event,says(S,Aa,crypt(shrK(Aa),mPair(nonce(NA),mPair(agent(Ba),mPair(key(Ka),X1))))),set(event,Evs3))
=> ( member(event,says(Aa,server,mPair(agent(Aa),mPair(agent(Ba),nonce(NA)))),set(event,Evs3))
=> member(list(event),cons(event,says(Aa,Ba,X1),Evs3),nS_Sha254967238shared) ) ) ) ) ).
tff(fact_6_A__trusts__NS4__lemma,axiom,
! [NB: nat,X1: msg,Ba: agent1,NA: msg,Aa: agent1,Ka: nat,Evsa: list(event)] :
( member(list(event),Evsa,nS_Sha254967238shared)
=> ( ~ member(msg,key(Ka),analz(knows(spy,Evsa)))
=> ( member(event,says(server,Aa,crypt(shrK(Aa),mPair(NA,mPair(agent(Ba),mPair(key(Ka),X1))))),set(event,Evsa))
=> ( member(msg,crypt(Ka,nonce(NB)),parts(knows(spy,Evsa)))
=> member(event,says(Ba,Aa,crypt(Ka,nonce(NB))),set(event,Evsa)) ) ) ) ) ).
tff(fact_7_A__trusts__NS2,axiom,
! [Evsa: list(event),X1: msg,Ka: nat,Ba: agent1,NA: msg,Aa: agent1] :
( member(msg,crypt(shrK(Aa),mPair(NA,mPair(agent(Ba),mPair(key(Ka),X1)))),parts(knows(spy,Evsa)))
=> ( ~ member(agent1,Aa,bad)
=> ( member(list(event),Evsa,nS_Sha254967238shared)
=> member(event,says(server,Aa,crypt(shrK(Aa),mPair(NA,mPair(agent(Ba),mPair(key(Ka),X1))))),set(event,Evsa)) ) ) ) ).
tff(fact_8_Oops__parts__spies,axiom,
! [Evsa: list(event),X1: msg,Ka: msg,Ba: msg,NA: msg,Aa: agent1] :
( member(event,says(server,Aa,crypt(shrK(Aa),mPair(NA,mPair(Ba,mPair(Ka,X1))))),set(event,Evsa))
=> member(msg,Ka,parts(knows(spy,Evsa))) ) ).
tff(fact_9_unique__session__keys,axiom,
! [X6: msg,B1: agent1,NA2: msg,A5: agent1,Evsa: list(event),X1: msg,Ka: nat,Ba: agent1,NA: msg,Aa: agent1] :
( member(event,says(server,Aa,crypt(shrK(Aa),mPair(NA,mPair(agent(Ba),mPair(key(Ka),X1))))),set(event,Evsa))
=> ( member(event,says(server,A5,crypt(shrK(A5),mPair(NA2,mPair(agent(B1),mPair(key(Ka),X6))))),set(event,Evsa))
=> ( member(list(event),Evsa,nS_Sha254967238shared)
=> ( ( Aa = A5 )
& ( NA = NA2 )
& ( Ba = B1 )
& ( X1 = X6 ) ) ) ) ) ).
tff(fact_10_NS3__msg__in__parts__spies,axiom,
! [Evsa: list(event),X1: msg,Ka: msg,Ba: msg,N: msg,KA: nat,Aa: agent1,S: agent1] :
( member(event,says(S,Aa,crypt(KA,mPair(N,mPair(Ba,mPair(Ka,X1))))),set(event,Evsa))
=> member(msg,X1,parts(knows(spy,Evsa))) ) ).
tff(fact_11_NS4__implies__NS3,axiom,
! [NB: nat,X1: msg,Ba: agent1,NA: msg,Aa: agent1,Ka: nat,Evsa: list(event)] :
( member(list(event),Evsa,nS_Sha254967238shared)
=> ( ~ member(msg,key(Ka),analz(knows(spy,Evsa)))
=> ( member(event,says(server,Aa,crypt(shrK(Aa),mPair(NA,mPair(agent(Ba),mPair(key(Ka),X1))))),set(event,Evsa))
=> ( member(msg,crypt(Ka,nonce(NB)),parts(knows(spy,Evsa)))
=> ? [A4: agent1] : member(event,says(A4,Ba,X1),set(event,Evsa)) ) ) ) ) ).
tff(fact_12_B__trusts__NS3,axiom,
! [Evsa: list(event),Aa: agent1,Ka: nat,Ba: agent1] :
( member(msg,crypt(shrK(Ba),mPair(key(Ka),agent(Aa))),parts(knows(spy,Evsa)))
=> ( ~ member(agent1,Ba,bad)
=> ( member(list(event),Evsa,nS_Sha254967238shared)
=> ? [NA1: msg] : member(event,says(server,Aa,crypt(shrK(Aa),mPair(NA1,mPair(agent(Ba),mPair(key(Ka),crypt(shrK(Ba),mPair(key(Ka),agent(Aa)))))))),set(event,Evsa)) ) ) ) ).
tff(fact_13_Spy__spies__bad__shrK,axiom,
! [Evsa: list(event),Aa: agent1] :
( member(agent1,Aa,bad)
=> member(msg,key(shrK(Aa)),knows(spy,Evsa)) ) ).
tff(fact_14_rev_Osimps_I2_J,axiom,
! [A: $tType,Xs1: list(A),X: A] : ( rev(A,cons(A,X,Xs1)) = append(A,rev(A,Xs1),cons(A,X,nil(A))) ) ).
tff(fact_15_rev__eq__Cons__iff,axiom,
! [A: $tType,Ys: list(A),Y2: A,Xs: list(A)] :
( ( rev(A,Xs) = cons(A,Y2,Ys) )
<=> ( Xs = append(A,rev(A,Ys),cons(A,Y2,nil(A))) ) ) ).
tff(fact_16_shrK__in__knows,axiom,
! [Evsa: list(event),Aa: agent1] : member(msg,key(shrK(Aa)),knows(Aa,Evsa)) ).
tff(fact_17_takeWhile_Osimps_I2_J,axiom,
! [A: $tType,Xs: list(A),X3: A,P1: fun(A,bool)] :
( ( pp(aa1(A,bool,P1,X3))
=> ( takeWhile(A,P1,cons(A,X3,Xs)) = cons(A,X3,takeWhile(A,P1,Xs)) ) )
& ( ~ pp(aa1(A,bool,P1,X3))
=> ( takeWhile(A,P1,cons(A,X3,Xs)) = nil(A) ) ) ) ).
tff(fact_18_rev__singleton__conv,axiom,
! [A: $tType,X3: A,Xs: list(A)] :
( ( rev(A,Xs) = cons(A,X3,nil(A)) )
<=> ( Xs = cons(A,X3,nil(A)) ) ) ).
tff(fact_19_singleton__rev__conv,axiom,
! [A: $tType,Xs: list(A),X3: A] :
( ( cons(A,X3,nil(A)) = rev(A,Xs) )
<=> ( Xs = cons(A,X3,nil(A)) ) ) ).
tff(fact_20_append1__eq__conv,axiom,
! [A: $tType,Y2: A,Ys: list(A),X3: A,Xs: list(A)] :
( ( append(A,Xs,cons(A,X3,nil(A))) = append(A,Ys,cons(A,Y2,nil(A))) )
<=> ( ( Xs = Ys )
& ( X3 = Y2 ) ) ) ).
tff(fact_21_Crypt__Spy__analz__bad,axiom,
! [Evsa: list(event),X1: msg,Aa: agent1] :
( member(msg,crypt(shrK(Aa),X1),analz(knows(spy,Evsa)))
=> ( member(agent1,Aa,bad)
=> member(msg,X1,analz(knows(spy,Evsa))) ) ) ).
tff(fact_22_Spy__in__bad,axiom,
member(agent1,spy,bad) ).
tff(fact_23_list_Oinject,axiom,
! [A: $tType,List2: list(A),A3: A,List1: list(A),A2: A] :
( ( cons(A,A2,List1) = cons(A,A3,List2) )
<=> ( ( A2 = A3 )
& ( List1 = List2 ) ) ) ).
tff(fact_24_append__same__eq,axiom,
! [A: $tType,Zs: list(A),Xs: list(A),Ys: list(A)] :
( ( append(A,Ys,Xs) = append(A,Zs,Xs) )
<=> ( Ys = Zs ) ) ).
tff(fact_25_same__append__eq,axiom,
! [A: $tType,Zs: list(A),Ys: list(A),Xs: list(A)] :
( ( append(A,Xs,Ys) = append(A,Xs,Zs) )
<=> ( Ys = Zs ) ) ).
tff(fact_26_append__assoc,axiom,
! [A: $tType,Zs1: list(A),Ys2: list(A),Xs1: list(A)] : ( append(A,append(A,Xs1,Ys2),Zs1) = append(A,Xs1,append(A,Ys2,Zs1)) ) ).
tff(fact_27_event_Osimps_I1_J,axiom,
! [Msg3: msg,Agent21: agent1,Agent12: agent1,Msg: msg,Agent2: agent1,Agent11: agent1] :
( ( says(Agent11,Agent2,Msg) = says(Agent12,Agent21,Msg3) )
<=> ( ( Agent11 = Agent12 )
& ( Agent2 = Agent21 )
& ( Msg = Msg3 ) ) ) ).
tff(fact_28_shrK__injective,axiom,
! [Y2: agent1,X3: agent1] :
( ( shrK(X3) = shrK(Y2) )
<=> ( X3 = Y2 ) ) ).
tff(fact_29_rev__is__rev__conv,axiom,
! [A: $tType,Ys: list(A),Xs: list(A)] :
( ( rev(A,Xs) = rev(A,Ys) )
<=> ( Xs = Ys ) ) ).
tff(fact_30_append__Cons,axiom,
! [A: $tType,Ys2: list(A),Xs1: list(A),X: A] : ( append(A,cons(A,X,Xs1),Ys2) = cons(A,X,append(A,Xs1,Ys2)) ) ).
tff(fact_31_append__self__conv2,axiom,
! [A: $tType,Ys: list(A),Xs: list(A)] :
( ( append(A,Xs,Ys) = Ys )
<=> ( Xs = nil(A) ) ) ).
tff(fact_32_append__self__conv,axiom,
! [A: $tType,Ys: list(A),Xs: list(A)] :
( ( append(A,Xs,Ys) = Xs )
<=> ( Ys = nil(A) ) ) ).
tff(fact_33_append__is__Nil__conv,axiom,
! [A: $tType,Ys: list(A),Xs: list(A)] :
( ( append(A,Xs,Ys) = nil(A) )
<=> ( ( Xs = nil(A) )
& ( Ys = nil(A) ) ) ) ).
tff(fact_34_self__append__conv2,axiom,
! [A: $tType,Xs: list(A),Ys: list(A)] :
( ( Ys = append(A,Xs,Ys) )
<=> ( Xs = nil(A) ) ) ).
tff(fact_35_self__append__conv,axiom,
! [A: $tType,Ys: list(A),Xs: list(A)] :
( ( Xs = append(A,Xs,Ys) )
<=> ( Ys = nil(A) ) ) ).
tff(fact_36_Nil__is__append__conv,axiom,
! [A: $tType,Ys: list(A),Xs: list(A)] :
( ( nil(A) = append(A,Xs,Ys) )
<=> ( ( Xs = nil(A) )
& ( Ys = nil(A) ) ) ) ).
tff(fact_37_set__rev,axiom,
! [A: $tType,Xs: list(A)] : ( set(A,rev(A,Xs)) = set(A,Xs) ) ).
tff(fact_38_rev__is__Nil__conv,axiom,
! [A: $tType,Xs: list(A)] :
( ( rev(A,Xs) = nil(A) )
<=> ( Xs = nil(A) ) ) ).
tff(fact_39_Nil__is__rev__conv,axiom,
! [A: $tType,Xs: list(A)] :
( ( nil(A) = rev(A,Xs) )
<=> ( Xs = nil(A) ) ) ).
tff(fact_40_rev_Osimps_I1_J,axiom,
! [A: $tType] : ( rev(A,nil(A)) = nil(A) ) ).
tff(fact_41_rev__append,axiom,
! [A: $tType,Ys2: list(A),Xs1: list(A)] : ( rev(A,append(A,Xs1,Ys2)) = append(A,rev(A,Ys2),rev(A,Xs1)) ) ).
tff(fact_42_takeWhile__eq__all__conv,axiom,
! [A: $tType,Xs: list(A),P1: fun(A,bool)] :
( ( takeWhile(A,P1,Xs) = Xs )
<=> ! [X5: A] :
( member(A,X5,set(A,Xs))
=> pp(aa1(A,bool,P1,X5)) ) ) ).
tff(fact_43_takeWhile_Osimps_I1_J,axiom,
! [A: $tType,P1: fun(A,bool)] : ( takeWhile(A,P1,nil(A)) = nil(A) ) ).
tff(fact_44_not__Cons__self2,axiom,
! [A: $tType,Xs1: list(A),X: A] : ( cons(A,X,Xs1) != Xs1 ) ).
tff(fact_45_not__Cons__self,axiom,
! [A: $tType,X: A,Xs1: list(A)] : ( Xs1 != cons(A,X,Xs1) ) ).
tff(fact_46_append__eq__appendI,axiom,
! [A: $tType,Us1: list(A),Ys2: list(A),Zs1: list(A),Xs11: list(A),Xs1: list(A)] :
( ( append(A,Xs1,Xs11) = Zs1 )
=> ( ( Ys2 = append(A,Xs11,Us1) )
=> ( append(A,Xs1,Ys2) = append(A,Zs1,Us1) ) ) ) ).
tff(fact_47_append__eq__append__conv2,axiom,
! [A: $tType,Ts: list(A),Zs: list(A),Ys: list(A),Xs: list(A)] :
( ( append(A,Xs,Ys) = append(A,Zs,Ts) )
<=> ? [Us: list(A)] :
( ( ( Xs = append(A,Zs,Us) )
& ( append(A,Us,Ys) = Ts ) )
| ( ( append(A,Xs,Us) = Zs )
& ( Ys = append(A,Us,Ts) ) ) ) ) ).
tff(fact_48_rev__swap,axiom,
! [A: $tType,Ys: list(A),Xs: list(A)] :
( ( rev(A,Xs) = Ys )
<=> ( Xs = rev(A,Ys) ) ) ).
tff(fact_49_rev__rev__ident,axiom,
! [A: $tType,Xs1: list(A)] : ( rev(A,rev(A,Xs1)) = Xs1 ) ).
tff(fact_50_set__ConsD,axiom,
! [A: $tType,Xs: list(A),X3: A,Y2: A] :
( member(A,Y2,set(A,cons(A,X3,Xs)))
=> ( ( Y2 = X3 )
| member(A,Y2,set(A,Xs)) ) ) ).
tff(fact_51_list_Osimps_I3_J,axiom,
! [A: $tType,List: list(A),A1: A] : ( cons(A,A1,List) != nil(A) ) ).
tff(fact_52_list_Osimps_I2_J,axiom,
! [A: $tType,List: list(A),A1: A] : ( nil(A) != cons(A,A1,List) ) ).
tff(fact_53_Cons__eq__appendI,axiom,
! [A: $tType,Zs1: list(A),Xs1: list(A),Ys2: list(A),Xs11: list(A),X: A] :
( ( cons(A,X,Xs11) = Ys2 )
=> ( ( Xs1 = append(A,Xs11,Zs1) )
=> ( cons(A,X,Xs1) = append(A,Ys2,Zs1) ) ) ) ).
tff(fact_54_eq__Nil__appendI,axiom,
! [A: $tType,Ys2: list(A),Xs1: list(A)] :
( ( Xs1 = Ys2 )
=> ( Xs1 = append(A,nil(A),Ys2) ) ) ).
tff(fact_55_append__Nil2,axiom,
! [A: $tType,Xs1: list(A)] : ( append(A,Xs1,nil(A)) = Xs1 ) ).
tff(fact_56_append__Nil,axiom,
! [A: $tType,Ys2: list(A)] : ( append(A,nil(A),Ys2) = Ys2 ) ).
tff(fact_57_spies__partsEs_I2_J,axiom,
! [H: fun(msg,bool),X1: msg,Ka: nat] :
( member(msg,crypt(Ka,X1),parts(H))
=> member(msg,X1,parts(H)) ) ).
tff(fact_58_set__takeWhileD,axiom,
! [A: $tType,Xs: list(A),P1: fun(A,bool),X3: A] :
( member(A,X3,set(A,takeWhile(A,P1,Xs)))
=> ( member(A,X3,set(A,Xs))
& pp(aa1(A,bool,P1,X3)) ) ) ).
tff(fact_59_Server__not__bad,axiom,
~ member(agent1,server,bad) ).
tff(fact_60_Cons__eq__append__conv,axiom,
! [A: $tType,Zs: list(A),Ys: list(A),Xs: list(A),X3: A] :
( ( cons(A,X3,Xs) = append(A,Ys,Zs) )
<=> ( ( ( Ys = nil(A) )
& ( cons(A,X3,Xs) = Zs ) )
| ? [Ys1: list(A)] :
( ( cons(A,X3,Ys1) = Ys )
& ( Xs = append(A,Ys1,Zs) ) ) ) ) ).
tff(fact_61_append__eq__Cons__conv,axiom,
! [A: $tType,Xs: list(A),X3: A,Zs: list(A),Ys: list(A)] :
( ( append(A,Ys,Zs) = cons(A,X3,Xs) )
<=> ( ( ( Ys = nil(A) )
& ( Zs = cons(A,X3,Xs) ) )
| ? [Ys1: list(A)] :
( ( Ys = cons(A,X3,Ys1) )
& ( append(A,Ys1,Zs) = Xs ) ) ) ) ).
tff(fact_62_analz__impI,axiom,
! [Q1: bool,Evsa: list(event),Y1: msg] :
( ( ~ member(msg,Y1,analz(knows(spy,Evsa)))
=> pp(Q1) )
=> ( ~ member(msg,Y1,analz(knows(spy,Evsa)))
=> pp(Q1) ) ) ).
tff(fact_63_takeWhile__tail,axiom,
! [A: $tType,L: list(A),Xs: list(A),X3: A,P1: fun(A,bool)] :
( ~ pp(aa1(A,bool,P1,X3))
=> ( takeWhile(A,P1,append(A,Xs,cons(A,X3,L))) = takeWhile(A,P1,Xs) ) ) ).
tff(fact_64_takeWhile__append1,axiom,
! [A: $tType,Ys: list(A),P1: fun(A,bool),Xs: list(A),X3: A] :
( member(A,X3,set(A,Xs))
=> ( ~ pp(aa1(A,bool,P1,X3))
=> ( takeWhile(A,P1,append(A,Xs,Ys)) = takeWhile(A,P1,Xs) ) ) ) ).
tff(fact_65_Says__imp__knows,axiom,
! [Evsa: list(event),X1: msg,Ba: agent1,Aa: agent1] :
( member(event,says(Aa,Ba,X1),set(event,Evsa))
=> member(msg,X1,knows(Aa,Evsa)) ) ).
tff(fact_66_analz__shrK__Decrypt,axiom,
! [H: fun(msg,bool),X1: msg,Aa: agent1] :
( member(msg,crypt(shrK(Aa),X1),analz(H))
=> ( member(msg,key(shrK(Aa)),analz(H))
=> member(msg,X1,analz(H)) ) ) ).
tff(fact_67_Says__imp__spies,axiom,
! [Evsa: list(event),X1: msg,Ba: agent1,Aa: agent1] :
( member(event,says(Aa,Ba,X1),set(event,Evsa))
=> member(msg,X1,knows(spy,Evsa)) ) ).
tff(fact_68_Says__imp__analz__Spy,axiom,
! [Evsa: list(event),X1: msg,Ba: agent1,Aa: agent1] :
( member(event,says(Aa,Ba,X1),set(event,Evsa))
=> member(msg,X1,analz(knows(spy,Evsa))) ) ).
tff(fact_69_Says__imp__parts__knows__Spy,axiom,
! [Evsa: list(event),X1: msg,Ba: agent1,Aa: agent1] :
( member(event,says(Aa,Ba,X1),set(event,Evsa))
=> member(msg,X1,parts(knows(spy,Evsa))) ) ).
tff(fact_70_analz__mono__contra_I1_J,axiom,
! [Evsa: list(event),X1: msg,Ba: agent1,Aa: agent1,C1: msg] :
( ~ member(msg,C1,analz(knows(spy,cons(event,says(Aa,Ba,X1),Evsa))))
=> ~ member(msg,C1,analz(knows(spy,Evsa))) ) ).
tff(fact_71_MPair__parts,axiom,
! [H: fun(msg,bool),Y1: msg,X1: msg] :
( member(msg,mPair(X1,Y1),parts(H))
=> ~ ( member(msg,X1,parts(H))
=> ~ member(msg,Y1,parts(H)) ) ) ).
tff(fact_72_analz__disj__parts,axiom,
! [H: fun(msg,bool),X1: msg] :
( ( member(msg,X1,analz(H))
| member(msg,X1,parts(H)) )
<=> member(msg,X1,parts(H)) ) ).
tff(fact_73_analz__conj__parts,axiom,
! [H: fun(msg,bool),X1: msg] :
( ( member(msg,X1,analz(H))
& member(msg,X1,parts(H)) )
<=> member(msg,X1,analz(H)) ) ).
tff(fact_74_parts__analz,axiom,
! [H: fun(msg,bool)] : ( parts(analz(H)) = parts(H) ) ).
tff(fact_75_ext,axiom,
! [B: $tType,A: $tType,G: fun(A,B),F: fun(A,B)] :
( ! [X4: A] : ( aa1(A,B,F,X4) = aa1(A,B,G,X4) )
=> ( F = G ) ) ).
tff(fact_76_mem__def,axiom,
! [A: $tType,Aa: fun(A,bool),X3: A] :
( member(A,X3,Aa)
<=> pp(aa1(A,bool,Aa,X3)) ) ).
tff(fact_77_analz__parts,axiom,
! [H: fun(msg,bool)] : ( analz(parts(H)) = parts(H) ) ).
tff(fact_78_MPair__analz,axiom,
! [H: fun(msg,bool),Y1: msg,X1: msg] :
( member(msg,mPair(X1,Y1),analz(H))
=> ~ ( member(msg,X1,analz(H))
=> ~ member(msg,Y1,analz(H)) ) ) ).
tff(fact_79_ns__sharedp_ONS3,axiom,
! [X1: msg,Ka: nat,Ba: agent1,NA: nat,S: agent1,Aa: agent1,Evs3: list(event)] :
( nS_Sha993195050haredp(Evs3)
=> ( ( Aa != server )
=> ( member(event,says(S,Aa,crypt(shrK(Aa),mPair(nonce(NA),mPair(agent(Ba),mPair(key(Ka),X1))))),set(event,Evs3))
=> ( member(event,says(Aa,server,mPair(agent(Aa),mPair(agent(Ba),nonce(NA)))),set(event,Evs3))
=> nS_Sha993195050haredp(cons(event,says(Aa,Ba,X1),Evs3)) ) ) ) ) ).
tff(fact_80_analz__idem,axiom,
! [H: fun(msg,bool)] : ( analz(analz(H)) = analz(H) ) ).
tff(fact_81_analz_OInj,axiom,
! [H: fun(msg,bool),X1: msg] :
( member(msg,X1,H)
=> member(msg,X1,analz(H)) ) ).
tff(fact_82_msg_Osimps_I6_J,axiom,
! [Msg22: msg,Msg12: msg,Msg21: msg,Msg11: msg] :
( ( mPair(Msg11,Msg21) = mPair(Msg12,Msg22) )
<=> ( ( Msg11 = Msg12 )
& ( Msg21 = Msg22 ) ) ) ).
tff(fact_83_msg_Osimps_I4_J,axiom,
! [Nat2: nat,Nat1: nat] :
( ( key(Nat1) = key(Nat2) )
<=> ( Nat1 = Nat2 ) ) ).
tff(fact_84_parts__idem,axiom,
! [H: fun(msg,bool)] : ( parts(parts(H)) = parts(H) ) ).
tff(fact_85_parts_OInj,axiom,
! [H: fun(msg,bool),X1: msg] :
( member(msg,X1,H)
=> member(msg,X1,parts(H)) ) ).
tff(fact_86_msg_Osimps_I7_J,axiom,
! [Msg3: msg,Nat2: nat,Msg: msg,Nat1: nat] :
( ( crypt(Nat1,Msg) = crypt(Nat2,Msg3) )
<=> ( ( Nat1 = Nat2 )
& ( Msg = Msg3 ) ) ) ).
tff(fact_87_msg_Osimps_I3_J,axiom,
! [Nat2: nat,Nat1: nat] :
( ( nonce(Nat1) = nonce(Nat2) )
<=> ( Nat1 = Nat2 ) ) ).
tff(fact_88_msg_Osimps_I1_J,axiom,
! [Agent1: agent1,Agent: agent1] :
( ( agent(Agent) = agent(Agent1) )
<=> ( Agent = Agent1 ) ) ).
tff(fact_89_ns__sharedp__ns__shared__eq,axiom,
! [X2: list(event)] :
( nS_Sha993195050haredp(X2)
<=> member(list(event),X2,nS_Sha254967238shared) ) ).
tff(fact_90_ns__sharedp_ONil,axiom,
nS_Sha993195050haredp(nil(event)) ).
tff(fact_91_analz__analzD,axiom,
! [H: fun(msg,bool),X1: msg] :
( member(msg,X1,analz(analz(H)))
=> member(msg,X1,analz(H)) ) ).
tff(fact_92_parts__partsD,axiom,
! [H: fun(msg,bool),X1: msg] :
( member(msg,X1,parts(parts(H)))
=> member(msg,X1,parts(H)) ) ).
tff(fact_93_analz_OFst,axiom,
! [H: fun(msg,bool),Y1: msg,X1: msg] :
( member(msg,mPair(X1,Y1),analz(H))
=> member(msg,X1,analz(H)) ) ).
tff(fact_94_analz_OSnd,axiom,
! [H: fun(msg,bool),Y1: msg,X1: msg] :
( member(msg,mPair(X1,Y1),analz(H))
=> member(msg,Y1,analz(H)) ) ).
tff(fact_95_not__parts__not__analz,axiom,
! [H: fun(msg,bool),C1: msg] :
( ~ member(msg,C1,parts(H))
=> ~ member(msg,C1,analz(H)) ) ).
tff(fact_96_analz__into__parts,axiom,
! [H: fun(msg,bool),C1: msg] :
( member(msg,C1,analz(H))
=> member(msg,C1,parts(H)) ) ).
tff(fact_97_msg_Osimps_I40_J,axiom,
! [Msg2: msg,Msg1: msg,Nat: nat] : ( key(Nat) != mPair(Msg1,Msg2) ) ).
tff(fact_98_msg_Osimps_I41_J,axiom,
! [Nat: nat,Msg2: msg,Msg1: msg] : ( mPair(Msg1,Msg2) != key(Nat) ) ).
tff(fact_99_parts_OFst,axiom,
! [H: fun(msg,bool),Y1: msg,X1: msg] :
( member(msg,mPair(X1,Y1),parts(H))
=> member(msg,X1,parts(H)) ) ).
%----Helper facts (8)
tff(help_pp_1_1_U,axiom,
~ pp(fFalse) ).
tff(help_pp_2_1_U,axiom,
pp(fTrue) ).
tff(help_fNot_1_1_U,axiom,
! [P: bool] :
( ~ pp(aa1(bool,bool,fNot,P))
| ~ pp(P) ) ).
tff(help_fNot_2_1_U,axiom,
! [P: bool] :
( pp(P)
| pp(aa1(bool,bool,fNot,P)) ) ).
tff(help_COMBB_1_1_U,axiom,
! [C: $tType,B: $tType,A: $tType,R: A,Q: fun(A,B),P: fun(B,C)] : ( aa1(A,C,combb(B,C,A,P,Q),R) = aa1(B,C,P,aa1(A,B,Q,R)) ) ).
tff(help_COMBC_1_1_U,axiom,
! [A: $tType,C: $tType,B: $tType,R: A,Q: B,P: fun(A,fun(B,C))] : ( aa1(A,C,combc(A,B,C,P,Q),R) = aa1(B,C,aa1(A,fun(B,C),P,R),Q) ) ).
tff(help_fequal_1_1_T,axiom,
! [A: $tType,Y: A,X: A] :
( ~ pp(aa1(A,bool,aa1(A,fun(A,bool),fequal(A),X),Y))
| ( X = Y ) ) ).
tff(help_fequal_2_1_T,axiom,
! [A: $tType,Y: A,X: A] :
( ( X != Y )
| pp(aa1(A,bool,aa1(A,fun(A,bool),fequal(A),X),Y)) ) ).
%----Conjectures (9)
tff(conj_0,hypothesis,
~ member(agent1,a,bad) ).
tff(conj_1,hypothesis,
~ member(agent1,b,bad) ).
tff(conj_2,hypothesis,
member(list(event),evs3,nS_Sha254967238shared) ).
tff(conj_3,hypothesis,
aa != server ).
tff(conj_4,hypothesis,
member(event,says(s,aa,crypt(shrK(aa),mPair(nonce(na),mPair(agent(ba),mPair(key(ka),x))))),set(event,evs3)) ).
tff(conj_5,hypothesis,
member(event,says(aa,server,mPair(agent(aa),mPair(agent(ba),nonce(na)))),set(event,evs3)) ).
tff(conj_6,hypothesis,
~ member(msg,key(k),analz(knows(spy,evs3))) ).
tff(conj_7,hypothesis,
( member(event,says(b,a,crypt(k,nonce(nb))),set(event,evs3))
=> ~ member(msg,crypt(k,nonce(nb)),parts(knows(spy,takeWhile(event,combb(bool,bool,event,fNot,combc(event,event,bool,fequal(event),says(b,a,crypt(k,nonce(nb))))),rev(event,evs3))))) ) ).
tff(conj_8,conjecture,
( ( b != aa )
| ( a != ba )
| ( crypt(k,nonce(nb)) != x )
| ~ member(msg,x,parts(knows(spy,takeWhile(event,combb(bool,bool,event,fNot,combc(event,event,bool,fequal(event),says(aa,ba,x))),append(event,rev(event,evs3),cons(event,says(aa,ba,x),nil(event))))))) ) ).
%------------------------------------------------------------------------------