Metamath Proof Explorer


Theorem bnj1417

Description: Technical lemma for bnj60 . This lemma may no longer be used or have become an indirect lemma of the theorem in question (i.e. a lemma of a lemma... of the theorem). (Contributed by Jonathan Ben-Naim, 3-Jun-2011) (Proof shortened by Mario Carneiro, 22-Dec-2016) (New usage is discouraged.)

Ref Expression
Hypotheses bnj1417.1 ⊢ φ ↔ R FrSe A
bnj1417.2 ⊢ ψ ↔ ¬ x ∈ trCl x A R
bnj1417.3 ⊢ χ ↔ ∀ y ∈ A y R x → [˙y / x]˙ ψ
bnj1417.4 ⊢ θ ↔ φ ∧ x ∈ A ∧ χ
bnj1417.5 ⊢ B = pred x A R ∪ ⋃ y ∈ pred x A R trCl y A R
Assertion bnj1417 ⊢ φ → ∀ x ∈ A ¬ x ∈ trCl x A R

Proof

Step Hyp Ref Expression
1 bnj1417.1 ⊢ φ ↔ R FrSe A
2 bnj1417.2 ⊢ ψ ↔ ¬ x ∈ trCl x A R
3 bnj1417.3 ⊢ χ ↔ ∀ y ∈ A y R x → [˙y / x]˙ ψ
4 bnj1417.4 ⊢ θ ↔ φ ∧ x ∈ A ∧ χ
5 bnj1417.5 ⊢ B = pred x A R ∪ ⋃ y ∈ pred x A R trCl y A R
6 1 biimpi ⊢ φ → R FrSe A
7 bnj1418 ⊢ x ∈ pred x A R → x R x
8 7 adantl ⊢ θ ∧ x ∈ pred x A R → x R x
9 4 6 bnj835 ⊢ θ → R FrSe A
10 df-bnj15 ⊢ R FrSe A ↔ R Fr A ∧ R Se A
11 10 simplbi ⊢ R FrSe A → R Fr A
12 9 11 syl ⊢ θ → R Fr A
13 bnj213 ⊢ pred x A R ⊆ A
14 13 sseli ⊢ x ∈ pred x A R → x ∈ A
15 frirr ⊢ R Fr A ∧ x ∈ A → ¬ x R x
16 12 14 15 syl2an ⊢ θ ∧ x ∈ pred x A R → ¬ x R x
17 8 16 pm2.65da ⊢ θ → ¬ x ∈ pred x A R
18 nfv ⊢ Ⅎ y φ
19 nfv ⊢ Ⅎ y x ∈ A
20 3 bnj1095 ⊢ χ → ∀ y χ
21 20 nf5i ⊢ Ⅎ y χ
22 18 19 21 nf3an ⊢ Ⅎ y φ ∧ x ∈ A ∧ χ
23 4 22 nfxfr ⊢ Ⅎ y θ
24 9 ad2antrr ⊢ θ ∧ y ∈ pred x A R ∧ x ∈ trCl y A R → R FrSe A
25 simplr ⊢ θ ∧ y ∈ pred x A R ∧ x ∈ trCl y A R → y ∈ pred x A R
26 13 25 sselid ⊢ θ ∧ y ∈ pred x A R ∧ x ∈ trCl y A R → y ∈ A
27 simpr ⊢ θ ∧ y ∈ pred x A R ∧ x ∈ trCl y A R → x ∈ trCl y A R
28 bnj1125 ⊢ R FrSe A ∧ y ∈ A ∧ x ∈ trCl y A R → trCl x A R ⊆ trCl y A R
29 24 26 27 28 syl3anc ⊢ θ ∧ y ∈ pred x A R ∧ x ∈ trCl y A R → trCl x A R ⊆ trCl y A R
30 bnj1147 ⊢ trCl y A R ⊆ A
31 30 27 sselid ⊢ θ ∧ y ∈ pred x A R ∧ x ∈ trCl y A R → x ∈ A
32 bnj906 ⊢ R FrSe A ∧ x ∈ A → pred x A R ⊆ trCl x A R
33 24 31 32 syl2anc ⊢ θ ∧ y ∈ pred x A R ∧ x ∈ trCl y A R → pred x A R ⊆ trCl x A R
34 33 25 sseldd ⊢ θ ∧ y ∈ pred x A R ∧ x ∈ trCl y A R → y ∈ trCl x A R
35 29 34 sseldd ⊢ θ ∧ y ∈ pred x A R ∧ x ∈ trCl y A R → y ∈ trCl y A R
36 3 biimpi ⊢ χ → ∀ y ∈ A y R x → [˙y / x]˙ ψ
37 4 36 bnj837 ⊢ θ → ∀ y ∈ A y R x → [˙y / x]˙ ψ
38 37 ad2antrr ⊢ θ ∧ y ∈ pred x A R ∧ x ∈ trCl y A R → ∀ y ∈ A y R x → [˙y / x]˙ ψ
39 bnj1418 ⊢ y ∈ pred x A R → y R x
40 39 ad2antlr ⊢ θ ∧ y ∈ pred x A R ∧ x ∈ trCl y A R → y R x
41 rsp ⊢ ∀ y ∈ A y R x → [˙y / x]˙ ψ → y ∈ A → y R x → [˙y / x]˙ ψ
42 38 26 40 41 syl3c ⊢ θ ∧ y ∈ pred x A R ∧ x ∈ trCl y A R → [˙y / x]˙ ψ
43 vex ⊢ y ∈ V
44 eleq1w ⊢ x = y → x ∈ trCl x A R ↔ y ∈ trCl x A R
45 bnj1318 ⊢ x = y → trCl x A R = trCl y A R
46 45 eleq2d ⊢ x = y → y ∈ trCl x A R ↔ y ∈ trCl y A R
47 44 46 bitrd ⊢ x = y → x ∈ trCl x A R ↔ y ∈ trCl y A R
48 47 notbid ⊢ x = y → ¬ x ∈ trCl x A R ↔ ¬ y ∈ trCl y A R
49 2 48 bitrid ⊢ x = y → ψ ↔ ¬ y ∈ trCl y A R
50 43 49 sbcie ⊢ [˙y / x]˙ ψ ↔ ¬ y ∈ trCl y A R
51 42 50 sylib ⊢ θ ∧ y ∈ pred x A R ∧ x ∈ trCl y A R → ¬ y ∈ trCl y A R
52 35 51 pm2.65da ⊢ θ ∧ y ∈ pred x A R → ¬ x ∈ trCl y A R
53 52 ex ⊢ θ → y ∈ pred x A R → ¬ x ∈ trCl y A R
54 23 53 ralrimi ⊢ θ → ∀ y ∈ pred x A R ¬ x ∈ trCl y A R
55 ralnex ⊢ ∀ y ∈ pred x A R ¬ x ∈ trCl y A R ↔ ¬ ∃ y ∈ pred x A R x ∈ trCl y A R
56 54 55 sylib ⊢ θ → ¬ ∃ y ∈ pred x A R x ∈ trCl y A R
57 eliun ⊢ x ∈ ⋃ y ∈ pred x A R trCl y A R ↔ ∃ y ∈ pred x A R x ∈ trCl y A R
58 56 57 sylnibr ⊢ θ → ¬ x ∈ ⋃ y ∈ pred x A R trCl y A R
59 ioran ⊢ ¬ x ∈ pred x A R ∨ x ∈ ⋃ y ∈ pred x A R trCl y A R ↔ ¬ x ∈ pred x A R ∧ ¬ x ∈ ⋃ y ∈ pred x A R trCl y A R
60 17 58 59 sylanbrc ⊢ θ → ¬ x ∈ pred x A R ∨ x ∈ ⋃ y ∈ pred x A R trCl y A R
61 4 simp2bi ⊢ θ → x ∈ A
62 5 bnj1414 ⊢ R FrSe A ∧ x ∈ A → trCl x A R = B
63 9 61 62 syl2anc ⊢ θ → trCl x A R = B
64 63 eleq2d ⊢ θ → x ∈ trCl x A R ↔ x ∈ B
65 5 bnj1138 ⊢ x ∈ B ↔ x ∈ pred x A R ∨ x ∈ ⋃ y ∈ pred x A R trCl y A R
66 64 65 bitrdi ⊢ θ → x ∈ trCl x A R ↔ x ∈ pred x A R ∨ x ∈ ⋃ y ∈ pred x A R trCl y A R
67 60 66 mtbird ⊢ θ → ¬ x ∈ trCl x A R
68 67 2 sylibr ⊢ θ → ψ
69 4 68 sylbir ⊢ φ ∧ x ∈ A ∧ χ → ψ
70 69 3exp ⊢ φ → x ∈ A → χ → ψ
71 70 ralrimiv ⊢ φ → ∀ x ∈ A χ → ψ
72 3 bnj1204 ⊢ R FrSe A ∧ ∀ x ∈ A χ → ψ → ∀ x ∈ A ψ
73 6 71 72 syl2anc ⊢ φ → ∀ x ∈ A ψ
74 2 ralbii ⊢ ∀ x ∈ A ψ ↔ ∀ x ∈ A ¬ x ∈ trCl x A R
75 73 74 sylib ⊢ φ → ∀ x ∈ A ¬ x ∈ trCl x A R