HomeHome Metamath Proof Explorer < Previous   Next >
Related theorems
Unicode version

Theorem sbthlem2 4454
Description: Lemma for sbth 4463.
Hypotheses
Ref Expression
sbthlem.1 |- A e. V
sbthlem.2 |- D = {x | (x (_ A /\ (g"(B \ (f"x))) (_ (A \ x))}
Assertion
Ref Expression
sbthlem2 |- (ran g (_ A -> (A \ (g"(B \ (f"U.D)))) (_ U.D)
Distinct variable groups:   x,A   x,B   x,D   x,f   x,g

Proof of Theorem sbthlem2
StepHypRef Expression
1 sbthlem.1 . . . . . . . . . . 11 |- A e. V
2 sbthlem.2 . . . . . . . . . . 11 |- D = {x | (x (_ A /\ (g"(B \ (f"x))) (_ (A \ x))}
31, 2sbthlem1 4453 . . . . . . . . . 10 |- U.D (_ (A \ (g"(B \ (f"U.D))))
4 imass2 3439 . . . . . . . . . 10 |- (U.D (_ (A \ (g"(B \ (f"U.D)))) -> (f"U.D) (_ (f"(A \ (g"(B \ (f"U.D))))))
53, 4ax-mp 7 . . . . . . . . 9 |- (f"U.D) (_ (f"(A \ (g"(B \ (f"U.D)))))
6 sscon 2174 . . . . . . . . 9 |- ((f"U.D) (_ (f"(A \ (g"(B \ (f"U.D))))) -> (B \ (f"(A \ (g"(B \ (f"U.D)))))) (_ (B \ (f"U.D)))
75, 6ax-mp 7 . . . . . . . 8 |- (B \ (f"(A \ (g"(B \ (f"U.D)))))) (_ (B \ (f"U.D))
8 imass2 3439 . . . . . . . 8 |- ((B \ (f"(A \ (g"(B \ (f"U.D)))))) (_ (B \ (f"U.D)) -> (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ (g"(B \ (f"U.D))))
97, 8ax-mp 7 . . . . . . 7 |- (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ (g"(B \ (f"U.D)))
10 sscon 2174 . . . . . . 7 |- ((g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ (g"(B \ (f"U.D))) -> (A \ (g"(B \ (f"U.D)))) (_ (A \ (g"(B \ (f"(A \ (g"(B \ (f"U.D)))))))))
119, 10ax-mp 7 . . . . . 6 |- (A \ (g"(B \ (f"U.D)))) (_ (A \ (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))))
12 imassrn 3421 . . . . . . . 8 |- (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ ran g
13 sstr2 2074 . . . . . . . 8 |- ((g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ ran g -> (ran g (_ A -> (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ A))
1412, 13ax-mp 7 . . . . . . 7 |- (ran g (_ A -> (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ A)
15 difss 2170 . . . . . . . 8 |- (A \ (g"(B \ (f"U.D)))) (_ A
16 ssconb 2173 . . . . . . . 8 |- (((g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ A /\ (A \ (g"(B \ (f"U.D)))) (_ A) -> ((g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ (A \ (A \ (g"(B \ (f"U.D))))) <-> (A \ (g"(B \ (f"U.D)))) (_ (A \ (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))))))
1715, 16mpan2 698 . . . . . . 7 |- ((g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ A -> ((g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ (A \ (A \ (g"(B \ (f"U.D))))) <-> (A \ (g"(B \ (f"U.D)))) (_ (A \ (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))))))
1814, 17syl 10 . . . . . 6 |- (ran g (_ A -> ((g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ (A \ (A \ (g"(B \ (f"U.D))))) <-> (A \ (g"(B \ (f"U.D)))) (_ (A \ (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))))))
1911, 18mpbiri 194 . . . . 5 |- (ran g (_ A -> (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ (A \ (A \ (g"(B \ (f"U.D))))))
2019, 15jctil 292 . . . 4 |- (ran g (_ A -> ((A \ (g"(B \ (f"U.D)))) (_ A /\ (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ (A \ (A \ (g"(B \ (f"U.D)))))))
211, 15ssexi 2725 . . . . 5 |- (A \ (g"(B \ (f"U.D)))) e. V
22 sseq1 2085 . . . . . 6 |- (x = (A \ (g"(B \ (f"U.D)))) -> (x (_ A <-> (A \ (g"(B \ (f"U.D)))) (_ A))
23 difeq2 2157 . . . . . . . 8 |- (x = (A \ (g"(B \ (f"U.D)))) -> (A \ x) = (A \ (A \ (g"(B \ (f"U.D))))))
2423sseq2d 2092 . . . . . . 7 |- (x = (A \ (g"(B \ (f"U.D)))) -> ((g"(B \ (f"x))) (_ (A \ x) <-> (g"(B \ (f"x))) (_ (A \ (A \ (g"(B \ (f"U.D)))))))
25 imaeq2 3408 . . . . . . . . 9 |- (x = (A \ (g"(B \ (f"U.D)))) -> (f"x) = (f"(A \ (g"(B \ (f"U.D))))))
2625difeq2d 2162 . . . . . . . 8 |- (x = (A \ (g"(B \ (f"U.D)))) -> (B \ (f"x)) = (B \ (f"(A \ (g"(B \ (f"U.D)))))))
27 imaeq2 3408 . . . . . . . 8 |- ((B \ (f"x)) = (B \ (f"(A \ (g"(B \ (f"U.D)))))) -> (g"(B \ (f"x))) = (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))))
28 sseq1 2085 . . . . . . . 8 |- ((g"(B \ (f"x))) = (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) -> ((g"(B \ (f"x))) (_ (A \ (A \ (g"(B \ (f"U.D))))) <-> (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ (A \ (A \ (g"(B \ (f"U.D)))))))
2926, 27, 283syl 20 . . . . . . 7 |- (x = (A \ (g"(B \ (f"U.D)))) -> ((g"(B \ (f"x))) (_ (A \ (A \ (g"(B \ (f"U.D))))) <-> (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ (A \ (A \ (g"(B \ (f"U.D)))))))
3024, 29bitrd 530 . . . . . 6 |- (x = (A \ (g"(B \ (f"U.D)))) -> ((g"(B \ (f"x))) (_ (A \ x) <-> (g"(B \ (f"(A \ (g"(B \ (f"U.D))))))) (_ (A \ (A \ (g"(B \ (f"U.D)))))))
3122, 30anbi12d 630 . . . . 5 |- (x = (A \ (g"(B \ (f"U.D)