Metamath Proof Explorer


Theorem restuni3

Description: The underlying set of a subspace induced by the subspace operator ` |``t ` . The result can be applied, for instance, to topologies and sigma-algebras. (Contributed by Glauco Siliprandi, 26-Jun-2021)

Ref Expression
Hypotheses restuni3.1 φ A V
restuni3.2 φ B W
Assertion restuni3 φ A 𝑡 B = A B

Proof

Step Hyp Ref Expression
1 restuni3.1 φ A V
2 restuni3.2 φ B W
3 eluni2 x A 𝑡 B y A 𝑡 B x y
4 3 bilani φ x A 𝑡 B y A 𝑡 B x y
5 simpr φ y A 𝑡 B y A 𝑡 B
6 elrest A V B W y A 𝑡 B z A y = z B
7 1 2 6 syl2anc φ y A 𝑡 B z A y = z B
8 7 adantr φ y A 𝑡 B y A 𝑡 B z A y = z B
9 5 8 mpbid φ y A 𝑡 B z A y = z B
10 9 3adant3 φ y A 𝑡 B x y z A y = z B
11 simpl x y y = z B x y
12 simpr x y y = z B y = z B
13 11 12 eleqtrd x y y = z B x z B
14 13 ex x y y = z B x z B
15 14 3ad2ant3 φ y A 𝑡 B x y y = z B x z B
16 15 reximdv φ y A 𝑡 B x y z A y = z B z A x z B
17 10 16 mpd φ y A 𝑡 B x y z A x z B
18 17 3exp φ y A 𝑡 B x y z A x z B
19 18 rexlimdv φ y A 𝑡 B x y z A x z B
20 19 adantr φ x A 𝑡 B y A 𝑡 B x y z A x z B
21 4 20 mpd φ x A 𝑡 B z A x z B
22 elinel1 x z B x z
23 22 adantl z A x z B x z
24 simpl z A x z B z A
25 elunii x z z A x A
26 23 24 25 syl2anc z A x z B x A
27 elinel2 x z B x B
28 27 adantl z A x z B x B
29 26 28 elind z A x z B x A B
30 29 ex z A x z B x A B
31 30 adantl φ x A 𝑡 B z A x z B x A B
32 31 rexlimdva φ x A 𝑡 B z A x z B x A B
33 21 32 mpd φ x A 𝑡 B x A B
34 33 ralrimiva φ x A 𝑡 B x A B
35 dfss3 A 𝑡 B A B x A 𝑡 B x A B
36 34 35 sylibr φ A 𝑡 B A B
37 elinel1 x A B x A
38 eluni2 x A z A x z
39 37 38 sylib x A B z A x z
40 39 adantl φ x A B z A x z
41 1 adantr φ z A A V
42 2 adantr φ z A B W
43 simpr φ z A z A
44 eqid z B = z B
45 41 42 43 44 elrestd φ z A z B A 𝑡 B
46 45 3adant3 φ z A x z z B A 𝑡 B
47 46 3adant1r φ x A B z A x z z B A 𝑡 B
48 simp3 φ x A B z A x z x z
49 simp1r φ x A B z A x z x A B
50 elinel2 x A B x B
51 49 50 syl φ x A B z A x z x B
52 simpl x z x B x z
53 simpr x z x B x B
54 52 53 elind x z x B x z B
55 48 51 54 syl2anc φ x A B z A x z x z B
56 eleq2 y = z B x y x z B
57 56 rspcev z B A 𝑡 B x z B y A 𝑡 B x y
58 47 55 57 syl2anc φ x A B z A x z y A 𝑡 B x y
59 58 3exp φ x A B z A x z y A 𝑡 B x y
60 59 rexlimdv φ x A B z A x z y A 𝑡 B x y
61 40 60 mpd φ x A B y A 𝑡 B x y
62 61 3 sylibr φ x A B x A 𝑡 B
63 36 62 eqelssd φ A 𝑡 B = A B