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 sseldi θ 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 sseldi θ 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 syl5bb 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 syl6bb θ 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