Metamath Proof Explorer


Theorem 3cyclfrgrrn1

Description: Every vertex in a friendship graph (with more than 1 vertex) is part of a 3-cycle. (Contributed by Alexander van der Vekens, 16-Nov-2017) (Revised by AV, 2-Apr-2021)

Ref Expression
Hypotheses 3cyclfrgrrn1.v 𝑉 = ( Vtx ‘ 𝐺 )
3cyclfrgrrn1.e 𝐸 = ( Edg ‘ 𝐺 )
Assertion 3cyclfrgrrn1 ( ( 𝐺 ∈ FriendGraph ∧ ( 𝐴𝑉𝐶𝑉 ) ∧ 𝐴𝐶 ) → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) )

Proof

Step Hyp Ref Expression
1 3cyclfrgrrn1.v 𝑉 = ( Vtx ‘ 𝐺 )
2 3cyclfrgrrn1.e 𝐸 = ( Edg ‘ 𝐺 )
3 1 2 2pthfrgrrn2 ( 𝐺 ∈ FriendGraph → ∀ 𝑎𝑉𝑧 ∈ ( 𝑉 ∖ { 𝑎 } ) ∃ 𝑥𝑉 ( ( { 𝑎 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝑎𝑥𝑥𝑧 ) ) )
4 necom ( 𝐴𝐶𝐶𝐴 )
5 eldifsn ( 𝐶 ∈ ( 𝑉 ∖ { 𝐴 } ) ↔ ( 𝐶𝑉𝐶𝐴 ) )
6 5 simplbi2com ( 𝐶𝐴 → ( 𝐶𝑉𝐶 ∈ ( 𝑉 ∖ { 𝐴 } ) ) )
7 4 6 sylbi ( 𝐴𝐶 → ( 𝐶𝑉𝐶 ∈ ( 𝑉 ∖ { 𝐴 } ) ) )
8 7 com12 ( 𝐶𝑉 → ( 𝐴𝐶𝐶 ∈ ( 𝑉 ∖ { 𝐴 } ) ) )
9 8 adantl ( ( 𝐴𝑉𝐶𝑉 ) → ( 𝐴𝐶𝐶 ∈ ( 𝑉 ∖ { 𝐴 } ) ) )
10 9 imp ( ( ( 𝐴𝑉𝐶𝑉 ) ∧ 𝐴𝐶 ) → 𝐶 ∈ ( 𝑉 ∖ { 𝐴 } ) )
11 sneq ( 𝑎 = 𝐴 → { 𝑎 } = { 𝐴 } )
12 11 difeq2d ( 𝑎 = 𝐴 → ( 𝑉 ∖ { 𝑎 } ) = ( 𝑉 ∖ { 𝐴 } ) )
13 preq1 ( 𝑎 = 𝐴 → { 𝑎 , 𝑥 } = { 𝐴 , 𝑥 } )
14 13 eleq1d ( 𝑎 = 𝐴 → ( { 𝑎 , 𝑥 } ∈ 𝐸 ↔ { 𝐴 , 𝑥 } ∈ 𝐸 ) )
15 14 anbi1d ( 𝑎 = 𝐴 → ( ( { 𝑎 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ↔ ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ) )
16 neeq1 ( 𝑎 = 𝐴 → ( 𝑎𝑥𝐴𝑥 ) )
17 16 anbi1d ( 𝑎 = 𝐴 → ( ( 𝑎𝑥𝑥𝑧 ) ↔ ( 𝐴𝑥𝑥𝑧 ) ) )
18 15 17 anbi12d ( 𝑎 = 𝐴 → ( ( ( { 𝑎 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝑎𝑥𝑥𝑧 ) ) ↔ ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝑧 ) ) ) )
19 18 rexbidv ( 𝑎 = 𝐴 → ( ∃ 𝑥𝑉 ( ( { 𝑎 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝑎𝑥𝑥𝑧 ) ) ↔ ∃ 𝑥𝑉 ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝑧 ) ) ) )
20 12 19 raleqbidv ( 𝑎 = 𝐴 → ( ∀ 𝑧 ∈ ( 𝑉 ∖ { 𝑎 } ) ∃ 𝑥𝑉 ( ( { 𝑎 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝑎𝑥𝑥𝑧 ) ) ↔ ∀ 𝑧 ∈ ( 𝑉 ∖ { 𝐴 } ) ∃ 𝑥𝑉 ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝑧 ) ) ) )
21 20 rspcv ( 𝐴𝑉 → ( ∀ 𝑎𝑉𝑧 ∈ ( 𝑉 ∖ { 𝑎 } ) ∃ 𝑥𝑉 ( ( { 𝑎 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝑎𝑥𝑥𝑧 ) ) → ∀ 𝑧 ∈ ( 𝑉 ∖ { 𝐴 } ) ∃ 𝑥𝑉 ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝑧 ) ) ) )
22 21 ad2antrr ( ( ( 𝐴𝑉𝐶𝑉 ) ∧ 𝐴𝐶 ) → ( ∀ 𝑎𝑉𝑧 ∈ ( 𝑉 ∖ { 𝑎 } ) ∃ 𝑥𝑉 ( ( { 𝑎 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝑎𝑥𝑥𝑧 ) ) → ∀ 𝑧 ∈ ( 𝑉 ∖ { 𝐴 } ) ∃ 𝑥𝑉 ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝑧 ) ) ) )
23 preq2 ( 𝑧 = 𝐶 → { 𝑥 , 𝑧 } = { 𝑥 , 𝐶 } )
24 23 eleq1d ( 𝑧 = 𝐶 → ( { 𝑥 , 𝑧 } ∈ 𝐸 ↔ { 𝑥 , 𝐶 } ∈ 𝐸 ) )
25 24 anbi2d ( 𝑧 = 𝐶 → ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ↔ ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) ) )
26 neeq2 ( 𝑧 = 𝐶 → ( 𝑥𝑧𝑥𝐶 ) )
27 26 anbi2d ( 𝑧 = 𝐶 → ( ( 𝐴𝑥𝑥𝑧 ) ↔ ( 𝐴𝑥𝑥𝐶 ) ) )
28 25 27 anbi12d ( 𝑧 = 𝐶 → ( ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝑧 ) ) ↔ ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝐶 ) ) ) )
29 28 rexbidv ( 𝑧 = 𝐶 → ( ∃ 𝑥𝑉 ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝑧 ) ) ↔ ∃ 𝑥𝑉 ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝐶 ) ) ) )
30 29 rspcv ( 𝐶 ∈ ( 𝑉 ∖ { 𝐴 } ) → ( ∀ 𝑧 ∈ ( 𝑉 ∖ { 𝐴 } ) ∃ 𝑥𝑉 ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝑧 ) ) → ∃ 𝑥𝑉 ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝐶 ) ) ) )
31 10 22 30 sylsyld ( ( ( 𝐴𝑉𝐶𝑉 ) ∧ 𝐴𝐶 ) → ( ∀ 𝑎𝑉𝑧 ∈ ( 𝑉 ∖ { 𝑎 } ) ∃ 𝑥𝑉 ( ( { 𝑎 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝑎𝑥𝑥𝑧 ) ) → ∃ 𝑥𝑉 ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝐶 ) ) ) )
32 1 2 2pthfrgrrn ( 𝐺 ∈ FriendGraph → ∀ 𝑢𝑉𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) )
33 necom ( 𝐴𝑥𝑥𝐴 )
34 eldifsn ( 𝑥 ∈ ( 𝑉 ∖ { 𝐴 } ) ↔ ( 𝑥𝑉𝑥𝐴 ) )
35 34 simplbi2com ( 𝑥𝐴 → ( 𝑥𝑉𝑥 ∈ ( 𝑉 ∖ { 𝐴 } ) ) )
36 33 35 sylbi ( 𝐴𝑥 → ( 𝑥𝑉𝑥 ∈ ( 𝑉 ∖ { 𝐴 } ) ) )
37 36 adantr ( ( 𝐴𝑥𝐴𝑉 ) → ( 𝑥𝑉𝑥 ∈ ( 𝑉 ∖ { 𝐴 } ) ) )
38 37 imp ( ( ( 𝐴𝑥𝐴𝑉 ) ∧ 𝑥𝑉 ) → 𝑥 ∈ ( 𝑉 ∖ { 𝐴 } ) )
39 sneq ( 𝑢 = 𝐴 → { 𝑢 } = { 𝐴 } )
40 39 difeq2d ( 𝑢 = 𝐴 → ( 𝑉 ∖ { 𝑢 } ) = ( 𝑉 ∖ { 𝐴 } ) )
41 preq1 ( 𝑢 = 𝐴 → { 𝑢 , 𝑦 } = { 𝐴 , 𝑦 } )
42 41 eleq1d ( 𝑢 = 𝐴 → ( { 𝑢 , 𝑦 } ∈ 𝐸 ↔ { 𝐴 , 𝑦 } ∈ 𝐸 ) )
43 42 anbi1d ( 𝑢 = 𝐴 → ( ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) ↔ ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) ) )
44 43 rexbidv ( 𝑢 = 𝐴 → ( ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) ↔ ∃ 𝑦𝑉 ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) ) )
45 40 44 raleqbidv ( 𝑢 = 𝐴 → ( ∀ 𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) ↔ ∀ 𝑣 ∈ ( 𝑉 ∖ { 𝐴 } ) ∃ 𝑦𝑉 ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) ) )
46 45 rspcv ( 𝐴𝑉 → ( ∀ 𝑢𝑉𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) → ∀ 𝑣 ∈ ( 𝑉 ∖ { 𝐴 } ) ∃ 𝑦𝑉 ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) ) )
47 46 adantl ( ( 𝐴𝑥𝐴𝑉 ) → ( ∀ 𝑢𝑉𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) → ∀ 𝑣 ∈ ( 𝑉 ∖ { 𝐴 } ) ∃ 𝑦𝑉 ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) ) )
48 47 adantr ( ( ( 𝐴𝑥𝐴𝑉 ) ∧ 𝑥𝑉 ) → ( ∀ 𝑢𝑉𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) → ∀ 𝑣 ∈ ( 𝑉 ∖ { 𝐴 } ) ∃ 𝑦𝑉 ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) ) )
49 preq2 ( 𝑣 = 𝑥 → { 𝑦 , 𝑣 } = { 𝑦 , 𝑥 } )
50 49 eleq1d ( 𝑣 = 𝑥 → ( { 𝑦 , 𝑣 } ∈ 𝐸 ↔ { 𝑦 , 𝑥 } ∈ 𝐸 ) )
51 50 anbi2d ( 𝑣 = 𝑥 → ( ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) ↔ ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑥 } ∈ 𝐸 ) ) )
52 51 rexbidv ( 𝑣 = 𝑥 → ( ∃ 𝑦𝑉 ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) ↔ ∃ 𝑦𝑉 ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑥 } ∈ 𝐸 ) ) )
53 52 rspcv ( 𝑥 ∈ ( 𝑉 ∖ { 𝐴 } ) → ( ∀ 𝑣 ∈ ( 𝑉 ∖ { 𝐴 } ) ∃ 𝑦𝑉 ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) → ∃ 𝑦𝑉 ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑥 } ∈ 𝐸 ) ) )
54 38 48 53 sylsyld ( ( ( 𝐴𝑥𝐴𝑉 ) ∧ 𝑥𝑉 ) → ( ∀ 𝑢𝑉𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) → ∃ 𝑦𝑉 ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑥 } ∈ 𝐸 ) ) )
55 prcom { 𝐴 , 𝑦 } = { 𝑦 , 𝐴 }
56 55 eleq1i ( { 𝐴 , 𝑦 } ∈ 𝐸 ↔ { 𝑦 , 𝐴 } ∈ 𝐸 )
57 prcom { 𝑦 , 𝑥 } = { 𝑥 , 𝑦 }
58 57 eleq1i ( { 𝑦 , 𝑥 } ∈ 𝐸 ↔ { 𝑥 , 𝑦 } ∈ 𝐸 )
59 56 58 anbi12ci ( ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑥 } ∈ 𝐸 ) ↔ ( { 𝑥 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝐴 } ∈ 𝐸 ) )
60 preq2 ( 𝑏 = 𝑥 → { 𝐴 , 𝑏 } = { 𝐴 , 𝑥 } )
61 60 eleq1d ( 𝑏 = 𝑥 → ( { 𝐴 , 𝑏 } ∈ 𝐸 ↔ { 𝐴 , 𝑥 } ∈ 𝐸 ) )
62 preq1 ( 𝑏 = 𝑥 → { 𝑏 , 𝑐 } = { 𝑥 , 𝑐 } )
63 62 eleq1d ( 𝑏 = 𝑥 → ( { 𝑏 , 𝑐 } ∈ 𝐸 ↔ { 𝑥 , 𝑐 } ∈ 𝐸 ) )
64 biidd ( 𝑏 = 𝑥 → ( { 𝑐 , 𝐴 } ∈ 𝐸 ↔ { 𝑐 , 𝐴 } ∈ 𝐸 ) )
65 61 63 64 3anbi123d ( 𝑏 = 𝑥 → ( ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ↔ ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) )
66 biidd ( 𝑐 = 𝑦 → ( { 𝐴 , 𝑥 } ∈ 𝐸 ↔ { 𝐴 , 𝑥 } ∈ 𝐸 ) )
67 preq2 ( 𝑐 = 𝑦 → { 𝑥 , 𝑐 } = { 𝑥 , 𝑦 } )
68 67 eleq1d ( 𝑐 = 𝑦 → ( { 𝑥 , 𝑐 } ∈ 𝐸 ↔ { 𝑥 , 𝑦 } ∈ 𝐸 ) )
69 preq1 ( 𝑐 = 𝑦 → { 𝑐 , 𝐴 } = { 𝑦 , 𝐴 } )
70 69 eleq1d ( 𝑐 = 𝑦 → ( { 𝑐 , 𝐴 } ∈ 𝐸 ↔ { 𝑦 , 𝐴 } ∈ 𝐸 ) )
71 66 68 70 3anbi123d ( 𝑐 = 𝑦 → ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ↔ ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝐴 } ∈ 𝐸 ) ) )
72 65 71 rspc2ev ( ( 𝑥𝑉𝑦𝑉 ∧ ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝐴 } ∈ 𝐸 ) ) → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) )
73 72 3expa ( ( ( 𝑥𝑉𝑦𝑉 ) ∧ ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝐴 } ∈ 𝐸 ) ) → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) )
74 73 expcom ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝐴 } ∈ 𝐸 ) → ( ( 𝑥𝑉𝑦𝑉 ) → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) )
75 74 3expib ( { 𝐴 , 𝑥 } ∈ 𝐸 → ( ( { 𝑥 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝐴 } ∈ 𝐸 ) → ( ( 𝑥𝑉𝑦𝑉 ) → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) )
76 59 75 syl5bi ( { 𝐴 , 𝑥 } ∈ 𝐸 → ( ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑥 } ∈ 𝐸 ) → ( ( 𝑥𝑉𝑦𝑉 ) → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) )
77 76 adantr ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) → ( ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑥 } ∈ 𝐸 ) → ( ( 𝑥𝑉𝑦𝑉 ) → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) )
78 77 com13 ( ( 𝑥𝑉𝑦𝑉 ) → ( ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑥 } ∈ 𝐸 ) → ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) )
79 78 rexlimdva ( 𝑥𝑉 → ( ∃ 𝑦𝑉 ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑥 } ∈ 𝐸 ) → ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) )
80 79 com13 ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) → ( ∃ 𝑦𝑉 ( { 𝐴 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑥 } ∈ 𝐸 ) → ( 𝑥𝑉 → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) )
81 54 80 syl9 ( ( ( 𝐴𝑥𝐴𝑉 ) ∧ 𝑥𝑉 ) → ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) → ( ∀ 𝑢𝑉𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) → ( 𝑥𝑉 → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) ) )
82 81 exp31 ( 𝐴𝑥 → ( 𝐴𝑉 → ( 𝑥𝑉 → ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) → ( ∀ 𝑢𝑉𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) → ( 𝑥𝑉 → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) ) ) ) )
83 82 com24 ( 𝐴𝑥 → ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) → ( 𝑥𝑉 → ( 𝐴𝑉 → ( ∀ 𝑢𝑉𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) → ( 𝑥𝑉 → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) ) ) ) )
84 83 adantr ( ( 𝐴𝑥𝑥𝐶 ) → ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) → ( 𝑥𝑉 → ( 𝐴𝑉 → ( ∀ 𝑢𝑉𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) → ( 𝑥𝑉 → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) ) ) ) )
85 84 impcom ( ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝐶 ) ) → ( 𝑥𝑉 → ( 𝐴𝑉 → ( ∀ 𝑢𝑉𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) → ( 𝑥𝑉 → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) ) ) )
86 85 com15 ( 𝑥𝑉 → ( 𝑥𝑉 → ( 𝐴𝑉 → ( ∀ 𝑢𝑉𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) → ( ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝐶 ) ) → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) ) ) )
87 86 pm2.43i ( 𝑥𝑉 → ( 𝐴𝑉 → ( ∀ 𝑢𝑉𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) → ( ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝐶 ) ) → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) ) )
88 87 com12 ( 𝐴𝑉 → ( 𝑥𝑉 → ( ∀ 𝑢𝑉𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) → ( ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝐶 ) ) → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) ) )
89 88 ad2antrr ( ( ( 𝐴𝑉𝐶𝑉 ) ∧ 𝐴𝐶 ) → ( 𝑥𝑉 → ( ∀ 𝑢𝑉𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) → ( ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝐶 ) ) → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) ) )
90 89 com4t ( ∀ 𝑢𝑉𝑣 ∈ ( 𝑉 ∖ { 𝑢 } ) ∃ 𝑦𝑉 ( { 𝑢 , 𝑦 } ∈ 𝐸 ∧ { 𝑦 , 𝑣 } ∈ 𝐸 ) → ( ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝐶 ) ) → ( ( ( 𝐴𝑉𝐶𝑉 ) ∧ 𝐴𝐶 ) → ( 𝑥𝑉 → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) ) )
91 32 90 syl ( 𝐺 ∈ FriendGraph → ( ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝐶 ) ) → ( ( ( 𝐴𝑉𝐶𝑉 ) ∧ 𝐴𝐶 ) → ( 𝑥𝑉 → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) ) )
92 91 com14 ( 𝑥𝑉 → ( ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝐶 ) ) → ( ( ( 𝐴𝑉𝐶𝑉 ) ∧ 𝐴𝐶 ) → ( 𝐺 ∈ FriendGraph → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) ) )
93 92 rexlimiv ( ∃ 𝑥𝑉 ( ( { 𝐴 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝐶 } ∈ 𝐸 ) ∧ ( 𝐴𝑥𝑥𝐶 ) ) → ( ( ( 𝐴𝑉𝐶𝑉 ) ∧ 𝐴𝐶 ) → ( 𝐺 ∈ FriendGraph → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) )
94 31 93 syl6 ( ( ( 𝐴𝑉𝐶𝑉 ) ∧ 𝐴𝐶 ) → ( ∀ 𝑎𝑉𝑧 ∈ ( 𝑉 ∖ { 𝑎 } ) ∃ 𝑥𝑉 ( ( { 𝑎 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝑎𝑥𝑥𝑧 ) ) → ( ( ( 𝐴𝑉𝐶𝑉 ) ∧ 𝐴𝐶 ) → ( 𝐺 ∈ FriendGraph → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) ) )
95 94 pm2.43a ( ( ( 𝐴𝑉𝐶𝑉 ) ∧ 𝐴𝐶 ) → ( ∀ 𝑎𝑉𝑧 ∈ ( 𝑉 ∖ { 𝑎 } ) ∃ 𝑥𝑉 ( ( { 𝑎 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝑎𝑥𝑥𝑧 ) ) → ( 𝐺 ∈ FriendGraph → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) )
96 95 ex ( ( 𝐴𝑉𝐶𝑉 ) → ( 𝐴𝐶 → ( ∀ 𝑎𝑉𝑧 ∈ ( 𝑉 ∖ { 𝑎 } ) ∃ 𝑥𝑉 ( ( { 𝑎 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝑎𝑥𝑥𝑧 ) ) → ( 𝐺 ∈ FriendGraph → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) ) )
97 96 com4t ( ∀ 𝑎𝑉𝑧 ∈ ( 𝑉 ∖ { 𝑎 } ) ∃ 𝑥𝑉 ( ( { 𝑎 , 𝑥 } ∈ 𝐸 ∧ { 𝑥 , 𝑧 } ∈ 𝐸 ) ∧ ( 𝑎𝑥𝑥𝑧 ) ) → ( 𝐺 ∈ FriendGraph → ( ( 𝐴𝑉𝐶𝑉 ) → ( 𝐴𝐶 → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) ) )
98 3 97 mpcom ( 𝐺 ∈ FriendGraph → ( ( 𝐴𝑉𝐶𝑉 ) → ( 𝐴𝐶 → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) ) ) )
99 98 3imp ( ( 𝐺 ∈ FriendGraph ∧ ( 𝐴𝑉𝐶𝑉 ) ∧ 𝐴𝐶 ) → ∃ 𝑏𝑉𝑐𝑉 ( { 𝐴 , 𝑏 } ∈ 𝐸 ∧ { 𝑏 , 𝑐 } ∈ 𝐸 ∧ { 𝑐 , 𝐴 } ∈ 𝐸 ) )