Metamath Proof Explorer


Theorem neitr

Description: The neighborhood of a trace is the trace of the neighborhood. (Contributed by Thierry Arnoux, 17-Jan-2018)

Ref Expression
Hypothesis neitr.1 𝑋 = 𝐽
Assertion neitr ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → ( ( nei ‘ ( 𝐽t 𝐴 ) ) ‘ 𝐵 ) = ( ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↾t 𝐴 ) )

Proof

Step Hyp Ref Expression
1 neitr.1 𝑋 = 𝐽
2 nfv 𝑑 ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 )
3 nfv 𝑑 𝑐 ( 𝐽t 𝐴 )
4 nfre1 𝑑𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 )
5 3 4 nfan 𝑑 ( 𝑐 ( 𝐽t 𝐴 ) ∧ ∃ 𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 ) )
6 2 5 nfan 𝑑 ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ ( 𝑐 ( 𝐽t 𝐴 ) ∧ ∃ 𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 ) ) )
7 simpl ( ( 𝑐 ( 𝐽t 𝐴 ) ∧ ∃ 𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 ) ) → 𝑐 ( 𝐽t 𝐴 ) )
8 7 anim2i ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ ( 𝑐 ( 𝐽t 𝐴 ) ∧ ∃ 𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 ) ) ) → ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) )
9 simp-5r ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → 𝑐 ( 𝐽t 𝐴 ) )
10 simp1 ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → 𝐽 ∈ Top )
11 simp2 ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → 𝐴𝑋 )
12 1 restuni ( ( 𝐽 ∈ Top ∧ 𝐴𝑋 ) → 𝐴 = ( 𝐽t 𝐴 ) )
13 10 11 12 syl2anc ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → 𝐴 = ( 𝐽t 𝐴 ) )
14 13 ad5antr ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → 𝐴 = ( 𝐽t 𝐴 ) )
15 9 14 sseqtrrd ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → 𝑐𝐴 )
16 11 ad5antr ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → 𝐴𝑋 )
17 15 16 sstrd ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → 𝑐𝑋 )
18 10 ad5antr ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → 𝐽 ∈ Top )
19 simplr ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → 𝑒𝐽 )
20 1 eltopss ( ( 𝐽 ∈ Top ∧ 𝑒𝐽 ) → 𝑒𝑋 )
21 18 19 20 syl2anc ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → 𝑒𝑋 )
22 21 ssdifssd ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → ( 𝑒𝐴 ) ⊆ 𝑋 )
23 17 22 unssd ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → ( 𝑐 ∪ ( 𝑒𝐴 ) ) ⊆ 𝑋 )
24 simpr1l ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( ( 𝐵𝑑𝑑𝑐 ) ∧ 𝑒𝐽𝑑 = ( 𝑒𝐴 ) ) ) → 𝐵𝑑 )
25 24 3anassrs ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → 𝐵𝑑 )
26 simpr ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → 𝑑 = ( 𝑒𝐴 ) )
27 25 26 sseqtrd ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → 𝐵 ⊆ ( 𝑒𝐴 ) )
28 inss1 ( 𝑒𝐴 ) ⊆ 𝑒
29 27 28 sstrdi ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → 𝐵𝑒 )
30 inundif ( ( 𝑒𝐴 ) ∪ ( 𝑒𝐴 ) ) = 𝑒
31 simpr1r ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( ( 𝐵𝑑𝑑𝑐 ) ∧ 𝑒𝐽𝑑 = ( 𝑒𝐴 ) ) ) → 𝑑𝑐 )
32 31 3anassrs ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → 𝑑𝑐 )
33 26 32 eqsstrrd ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → ( 𝑒𝐴 ) ⊆ 𝑐 )
34 unss1 ( ( 𝑒𝐴 ) ⊆ 𝑐 → ( ( 𝑒𝐴 ) ∪ ( 𝑒𝐴 ) ) ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) )
35 33 34 syl ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → ( ( 𝑒𝐴 ) ∪ ( 𝑒𝐴 ) ) ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) )
36 30 35 eqsstrrid ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → 𝑒 ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) )
37 sseq2 ( 𝑏 = 𝑒 → ( 𝐵𝑏𝐵𝑒 ) )
38 sseq1 ( 𝑏 = 𝑒 → ( 𝑏 ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) ↔ 𝑒 ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) ) )
39 37 38 anbi12d ( 𝑏 = 𝑒 → ( ( 𝐵𝑏𝑏 ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) ) ↔ ( 𝐵𝑒𝑒 ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) ) ) )
40 39 rspcev ( ( 𝑒𝐽 ∧ ( 𝐵𝑒𝑒 ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) ) ) → ∃ 𝑏𝐽 ( 𝐵𝑏𝑏 ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) ) )
41 19 29 36 40 syl12anc ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → ∃ 𝑏𝐽 ( 𝐵𝑏𝑏 ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) ) )
42 indir ( ( 𝑐 ∪ ( 𝑒𝐴 ) ) ∩ 𝐴 ) = ( ( 𝑐𝐴 ) ∪ ( ( 𝑒𝐴 ) ∩ 𝐴 ) )
43 incom ( 𝐴 ∩ ( 𝑒𝐴 ) ) = ( ( 𝑒𝐴 ) ∩ 𝐴 )
44 disjdif ( 𝐴 ∩ ( 𝑒𝐴 ) ) = ∅
45 43 44 eqtr3i ( ( 𝑒𝐴 ) ∩ 𝐴 ) = ∅
46 45 uneq2i ( ( 𝑐𝐴 ) ∪ ( ( 𝑒𝐴 ) ∩ 𝐴 ) ) = ( ( 𝑐𝐴 ) ∪ ∅ )
47 un0 ( ( 𝑐𝐴 ) ∪ ∅ ) = ( 𝑐𝐴 )
48 42 46 47 3eqtri ( ( 𝑐 ∪ ( 𝑒𝐴 ) ) ∩ 𝐴 ) = ( 𝑐𝐴 )
49 df-ss ( 𝑐𝐴 ↔ ( 𝑐𝐴 ) = 𝑐 )
50 49 biimpi ( 𝑐𝐴 → ( 𝑐𝐴 ) = 𝑐 )
51 48 50 syl5req ( 𝑐𝐴𝑐 = ( ( 𝑐 ∪ ( 𝑒𝐴 ) ) ∩ 𝐴 ) )
52 15 51 syl ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → 𝑐 = ( ( 𝑐 ∪ ( 𝑒𝐴 ) ) ∩ 𝐴 ) )
53 vex 𝑐 ∈ V
54 vex 𝑒 ∈ V
55 54 difexi ( 𝑒𝐴 ) ∈ V
56 53 55 unex ( 𝑐 ∪ ( 𝑒𝐴 ) ) ∈ V
57 sseq1 ( 𝑎 = ( 𝑐 ∪ ( 𝑒𝐴 ) ) → ( 𝑎𝑋 ↔ ( 𝑐 ∪ ( 𝑒𝐴 ) ) ⊆ 𝑋 ) )
58 sseq2 ( 𝑎 = ( 𝑐 ∪ ( 𝑒𝐴 ) ) → ( 𝑏𝑎𝑏 ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) ) )
59 58 anbi2d ( 𝑎 = ( 𝑐 ∪ ( 𝑒𝐴 ) ) → ( ( 𝐵𝑏𝑏𝑎 ) ↔ ( 𝐵𝑏𝑏 ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) ) ) )
60 59 rexbidv ( 𝑎 = ( 𝑐 ∪ ( 𝑒𝐴 ) ) → ( ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ↔ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏 ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) ) ) )
61 57 60 anbi12d ( 𝑎 = ( 𝑐 ∪ ( 𝑒𝐴 ) ) → ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ↔ ( ( 𝑐 ∪ ( 𝑒𝐴 ) ) ⊆ 𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏 ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) ) ) ) )
62 ineq1 ( 𝑎 = ( 𝑐 ∪ ( 𝑒𝐴 ) ) → ( 𝑎𝐴 ) = ( ( 𝑐 ∪ ( 𝑒𝐴 ) ) ∩ 𝐴 ) )
63 62 eqeq2d ( 𝑎 = ( 𝑐 ∪ ( 𝑒𝐴 ) ) → ( 𝑐 = ( 𝑎𝐴 ) ↔ 𝑐 = ( ( 𝑐 ∪ ( 𝑒𝐴 ) ) ∩ 𝐴 ) ) )
64 61 63 anbi12d ( 𝑎 = ( 𝑐 ∪ ( 𝑒𝐴 ) ) → ( ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ↔ ( ( ( 𝑐 ∪ ( 𝑒𝐴 ) ) ⊆ 𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏 ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) ) ) ∧ 𝑐 = ( ( 𝑐 ∪ ( 𝑒𝐴 ) ) ∩ 𝐴 ) ) ) )
65 56 64 spcev ( ( ( ( 𝑐 ∪ ( 𝑒𝐴 ) ) ⊆ 𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏 ⊆ ( 𝑐 ∪ ( 𝑒𝐴 ) ) ) ) ∧ 𝑐 = ( ( 𝑐 ∪ ( 𝑒𝐴 ) ) ∩ 𝐴 ) ) → ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) )
66 23 41 52 65 syl21anc ( ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) ∧ 𝑒𝐽 ) ∧ 𝑑 = ( 𝑒𝐴 ) ) → ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) )
67 10 ad3antrrr ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) → 𝐽 ∈ Top )
68 10 uniexd ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → 𝐽 ∈ V )
69 1 68 eqeltrid ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → 𝑋 ∈ V )
70 69 11 ssexd ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → 𝐴 ∈ V )
71 70 ad3antrrr ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) → 𝐴 ∈ V )
72 simplr ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) → 𝑑 ∈ ( 𝐽t 𝐴 ) )
73 elrest ( ( 𝐽 ∈ Top ∧ 𝐴 ∈ V ) → ( 𝑑 ∈ ( 𝐽t 𝐴 ) ↔ ∃ 𝑒𝐽 𝑑 = ( 𝑒𝐴 ) ) )
74 73 biimpa ( ( ( 𝐽 ∈ Top ∧ 𝐴 ∈ V ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) → ∃ 𝑒𝐽 𝑑 = ( 𝑒𝐴 ) )
75 67 71 72 74 syl21anc ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) → ∃ 𝑒𝐽 𝑑 = ( 𝑒𝐴 ) )
76 66 75 r19.29a ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 ( 𝐽t 𝐴 ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) → ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) )
77 8 76 sylanl1 ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ ( 𝑐 ( 𝐽t 𝐴 ) ∧ ∃ 𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 ) ) ) ∧ 𝑑 ∈ ( 𝐽t 𝐴 ) ) ∧ ( 𝐵𝑑𝑑𝑐 ) ) → ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) )
78 simprr ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ ( 𝑐 ( 𝐽t 𝐴 ) ∧ ∃ 𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 ) ) ) → ∃ 𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 ) )
79 6 77 78 r19.29af ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ ( 𝑐 ( 𝐽t 𝐴 ) ∧ ∃ 𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 ) ) ) → ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) )
80 inss2 ( 𝑎𝐴 ) ⊆ 𝐴
81 sseq1 ( 𝑐 = ( 𝑎𝐴 ) → ( 𝑐𝐴 ↔ ( 𝑎𝐴 ) ⊆ 𝐴 ) )
82 80 81 mpbiri ( 𝑐 = ( 𝑎𝐴 ) → 𝑐𝐴 )
83 82 adantl ( ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) → 𝑐𝐴 )
84 83 exlimiv ( ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) → 𝑐𝐴 )
85 84 adantl ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ) → 𝑐𝐴 )
86 13 adantr ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ) → 𝐴 = ( 𝐽t 𝐴 ) )
87 85 86 sseqtrd ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ) → 𝑐 ( 𝐽t 𝐴 ) )
88 10 ad4antr ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ∧ 𝑎𝑋 ) ∧ 𝑏𝐽 ) ∧ ( 𝐵𝑏𝑏𝑎 ) ) → 𝐽 ∈ Top )
89 70 ad4antr ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ∧ 𝑎𝑋 ) ∧ 𝑏𝐽 ) ∧ ( 𝐵𝑏𝑏𝑎 ) ) → 𝐴 ∈ V )
90 simplr ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ∧ 𝑎𝑋 ) ∧ 𝑏𝐽 ) ∧ ( 𝐵𝑏𝑏𝑎 ) ) → 𝑏𝐽 )
91 elrestr ( ( 𝐽 ∈ Top ∧ 𝐴 ∈ V ∧ 𝑏𝐽 ) → ( 𝑏𝐴 ) ∈ ( 𝐽t 𝐴 ) )
92 88 89 90 91 syl3anc ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ∧ 𝑎𝑋 ) ∧ 𝑏𝐽 ) ∧ ( 𝐵𝑏𝑏𝑎 ) ) → ( 𝑏𝐴 ) ∈ ( 𝐽t 𝐴 ) )
93 simprl ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ∧ 𝑎𝑋 ) ∧ 𝑏𝐽 ) ∧ ( 𝐵𝑏𝑏𝑎 ) ) → 𝐵𝑏 )
94 simp3 ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → 𝐵𝐴 )
95 94 ad4antr ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ∧ 𝑎𝑋 ) ∧ 𝑏𝐽 ) ∧ ( 𝐵𝑏𝑏𝑎 ) ) → 𝐵𝐴 )
96 93 95 ssind ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ∧ 𝑎𝑋 ) ∧ 𝑏𝐽 ) ∧ ( 𝐵𝑏𝑏𝑎 ) ) → 𝐵 ⊆ ( 𝑏𝐴 ) )
97 simprr ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ∧ 𝑎𝑋 ) ∧ 𝑏𝐽 ) ∧ ( 𝐵𝑏𝑏𝑎 ) ) → 𝑏𝑎 )
98 97 ssrind ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ∧ 𝑎𝑋 ) ∧ 𝑏𝐽 ) ∧ ( 𝐵𝑏𝑏𝑎 ) ) → ( 𝑏𝐴 ) ⊆ ( 𝑎𝐴 ) )
99 simp-4r ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ∧ 𝑎𝑋 ) ∧ 𝑏𝐽 ) ∧ ( 𝐵𝑏𝑏𝑎 ) ) → 𝑐 = ( 𝑎𝐴 ) )
100 98 99 sseqtrrd ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ∧ 𝑎𝑋 ) ∧ 𝑏𝐽 ) ∧ ( 𝐵𝑏𝑏𝑎 ) ) → ( 𝑏𝐴 ) ⊆ 𝑐 )
101 92 96 100 jca32 ( ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ∧ 𝑎𝑋 ) ∧ 𝑏𝐽 ) ∧ ( 𝐵𝑏𝑏𝑎 ) ) → ( ( 𝑏𝐴 ) ∈ ( 𝐽t 𝐴 ) ∧ ( 𝐵 ⊆ ( 𝑏𝐴 ) ∧ ( 𝑏𝐴 ) ⊆ 𝑐 ) ) )
102 101 ex ( ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ∧ 𝑎𝑋 ) ∧ 𝑏𝐽 ) → ( ( 𝐵𝑏𝑏𝑎 ) → ( ( 𝑏𝐴 ) ∈ ( 𝐽t 𝐴 ) ∧ ( 𝐵 ⊆ ( 𝑏𝐴 ) ∧ ( 𝑏𝐴 ) ⊆ 𝑐 ) ) ) )
103 102 reximdva ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ∧ 𝑎𝑋 ) → ( ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) → ∃ 𝑏𝐽 ( ( 𝑏𝐴 ) ∈ ( 𝐽t 𝐴 ) ∧ ( 𝐵 ⊆ ( 𝑏𝐴 ) ∧ ( 𝑏𝐴 ) ⊆ 𝑐 ) ) ) )
104 103 impr ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ∧ ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ) → ∃ 𝑏𝐽 ( ( 𝑏𝐴 ) ∈ ( 𝐽t 𝐴 ) ∧ ( 𝐵 ⊆ ( 𝑏𝐴 ) ∧ ( 𝑏𝐴 ) ⊆ 𝑐 ) ) )
105 104 an32s ( ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) → ∃ 𝑏𝐽 ( ( 𝑏𝐴 ) ∈ ( 𝐽t 𝐴 ) ∧ ( 𝐵 ⊆ ( 𝑏𝐴 ) ∧ ( 𝑏𝐴 ) ⊆ 𝑐 ) ) )
106 105 expl ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → ( ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) → ∃ 𝑏𝐽 ( ( 𝑏𝐴 ) ∈ ( 𝐽t 𝐴 ) ∧ ( 𝐵 ⊆ ( 𝑏𝐴 ) ∧ ( 𝑏𝐴 ) ⊆ 𝑐 ) ) ) )
107 106 exlimdv ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → ( ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) → ∃ 𝑏𝐽 ( ( 𝑏𝐴 ) ∈ ( 𝐽t 𝐴 ) ∧ ( 𝐵 ⊆ ( 𝑏𝐴 ) ∧ ( 𝑏𝐴 ) ⊆ 𝑐 ) ) ) )
108 107 imp ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ) → ∃ 𝑏𝐽 ( ( 𝑏𝐴 ) ∈ ( 𝐽t 𝐴 ) ∧ ( 𝐵 ⊆ ( 𝑏𝐴 ) ∧ ( 𝑏𝐴 ) ⊆ 𝑐 ) ) )
109 sseq2 ( 𝑑 = ( 𝑏𝐴 ) → ( 𝐵𝑑𝐵 ⊆ ( 𝑏𝐴 ) ) )
110 sseq1 ( 𝑑 = ( 𝑏𝐴 ) → ( 𝑑𝑐 ↔ ( 𝑏𝐴 ) ⊆ 𝑐 ) )
111 109 110 anbi12d ( 𝑑 = ( 𝑏𝐴 ) → ( ( 𝐵𝑑𝑑𝑐 ) ↔ ( 𝐵 ⊆ ( 𝑏𝐴 ) ∧ ( 𝑏𝐴 ) ⊆ 𝑐 ) ) )
112 111 rspcev ( ( ( 𝑏𝐴 ) ∈ ( 𝐽t 𝐴 ) ∧ ( 𝐵 ⊆ ( 𝑏𝐴 ) ∧ ( 𝑏𝐴 ) ⊆ 𝑐 ) ) → ∃ 𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 ) )
113 112 rexlimivw ( ∃ 𝑏𝐽 ( ( 𝑏𝐴 ) ∈ ( 𝐽t 𝐴 ) ∧ ( 𝐵 ⊆ ( 𝑏𝐴 ) ∧ ( 𝑏𝐴 ) ⊆ 𝑐 ) ) → ∃ 𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 ) )
114 108 113 syl ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ) → ∃ 𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 ) )
115 87 114 jca ( ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) ∧ ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ) → ( 𝑐 ( 𝐽t 𝐴 ) ∧ ∃ 𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 ) ) )
116 79 115 impbida ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → ( ( 𝑐 ( 𝐽t 𝐴 ) ∧ ∃ 𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 ) ) ↔ ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ) )
117 resttop ( ( 𝐽 ∈ Top ∧ 𝐴 ∈ V ) → ( 𝐽t 𝐴 ) ∈ Top )
118 10 70 117 syl2anc ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → ( 𝐽t 𝐴 ) ∈ Top )
119 94 13 sseqtrd ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → 𝐵 ( 𝐽t 𝐴 ) )
120 eqid ( 𝐽t 𝐴 ) = ( 𝐽t 𝐴 )
121 120 isnei ( ( ( 𝐽t 𝐴 ) ∈ Top ∧ 𝐵 ( 𝐽t 𝐴 ) ) → ( 𝑐 ∈ ( ( nei ‘ ( 𝐽t 𝐴 ) ) ‘ 𝐵 ) ↔ ( 𝑐 ( 𝐽t 𝐴 ) ∧ ∃ 𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 ) ) ) )
122 118 119 121 syl2anc ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → ( 𝑐 ∈ ( ( nei ‘ ( 𝐽t 𝐴 ) ) ‘ 𝐵 ) ↔ ( 𝑐 ( 𝐽t 𝐴 ) ∧ ∃ 𝑑 ∈ ( 𝐽t 𝐴 ) ( 𝐵𝑑𝑑𝑐 ) ) ) )
123 fvex ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ∈ V
124 restval ( ( ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ∈ V ∧ 𝐴 ∈ V ) → ( ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↾t 𝐴 ) = ran ( 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↦ ( 𝑎𝐴 ) ) )
125 123 70 124 sylancr ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → ( ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↾t 𝐴 ) = ran ( 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↦ ( 𝑎𝐴 ) ) )
126 125 eleq2d ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → ( 𝑐 ∈ ( ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↾t 𝐴 ) ↔ 𝑐 ∈ ran ( 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↦ ( 𝑎𝐴 ) ) ) )
127 94 11 sstrd ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → 𝐵𝑋 )
128 eqid ( 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↦ ( 𝑎𝐴 ) ) = ( 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↦ ( 𝑎𝐴 ) )
129 128 elrnmpt ( 𝑐 ∈ V → ( 𝑐 ∈ ran ( 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↦ ( 𝑎𝐴 ) ) ↔ ∃ 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) 𝑐 = ( 𝑎𝐴 ) ) )
130 129 elv ( 𝑐 ∈ ran ( 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↦ ( 𝑎𝐴 ) ) ↔ ∃ 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) 𝑐 = ( 𝑎𝐴 ) )
131 df-rex ( ∃ 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) 𝑐 = ( 𝑎𝐴 ) ↔ ∃ 𝑎 ( 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) )
132 130 131 bitri ( 𝑐 ∈ ran ( 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↦ ( 𝑎𝐴 ) ) ↔ ∃ 𝑎 ( 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) )
133 1 isnei ( ( 𝐽 ∈ Top ∧ 𝐵𝑋 ) → ( 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↔ ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ) )
134 133 anbi1d ( ( 𝐽 ∈ Top ∧ 𝐵𝑋 ) → ( ( 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ↔ ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ) )
135 134 exbidv ( ( 𝐽 ∈ Top ∧ 𝐵𝑋 ) → ( ∃ 𝑎 ( 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ↔ ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ) )
136 132 135 syl5bb ( ( 𝐽 ∈ Top ∧ 𝐵𝑋 ) → ( 𝑐 ∈ ran ( 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↦ ( 𝑎𝐴 ) ) ↔ ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ) )
137 10 127 136 syl2anc ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → ( 𝑐 ∈ ran ( 𝑎 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↦ ( 𝑎𝐴 ) ) ↔ ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ) )
138 126 137 bitrd ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → ( 𝑐 ∈ ( ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↾t 𝐴 ) ↔ ∃ 𝑎 ( ( 𝑎𝑋 ∧ ∃ 𝑏𝐽 ( 𝐵𝑏𝑏𝑎 ) ) ∧ 𝑐 = ( 𝑎𝐴 ) ) ) )
139 116 122 138 3bitr4d ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → ( 𝑐 ∈ ( ( nei ‘ ( 𝐽t 𝐴 ) ) ‘ 𝐵 ) ↔ 𝑐 ∈ ( ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↾t 𝐴 ) ) )
140 139 eqrdv ( ( 𝐽 ∈ Top ∧ 𝐴𝑋𝐵𝐴 ) → ( ( nei ‘ ( 𝐽t 𝐴 ) ) ‘ 𝐵 ) = ( ( ( nei ‘ 𝐽 ) ‘ 𝐵 ) ↾t 𝐴 ) )