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

Theorem infxpidmlem11 7563
Description: Lemma for infxpidm 7565. We show that the union of a bijection g in H with a disjoint bijection u is a member h of H that is larger than (properly extends) g. Thus if the antecedent is true then g cannot be maximal.
Hypotheses
Ref Expression
infxpidmlem.1 |- H = {f | (f = (/) \/ E.t((om ~<_ t /\ t (_ A) /\ f:(t X. t)-1-1-onto->t))}
infxpidmlem.2 |- A e. V
Assertion
Ref Expression
infxpidmlem11 |- (((((om ~<_ x /\ x (_ A) /\ g:(x X. x)-1-1-onto->x) /\ (x ~~ y /\ y (_ (A \ x))) /\ u:((x X. y) u. ((y X. x) u. (y X. y)))-1-1-onto->y) -> E.h e. H g (. h)
Distinct variable groups:   x,y,f,g,h,u,t,A   x,H,y,u,g,h

Proof of Theorem infxpidmlem11
StepHypRef Expression
1 psseq2 2139 . . . . . 6 |- (h = (g u. u) -> (g (. h <-> g (. (g u. u)))
21rcla4ev 1880 . . . . 5 |- (((g u. u) e. H /\ g (. (g u. u)) -> E.h e. H g (. h)
3 f1oun 3712 . . . . . . . . . . 11 |- (((g:(x X. x)-1-1-onto->x /\ u:((x X. y) u. ((y X. x) u. (y X. y)))-1-1-onto->y) /\ (((x X. x) i^i ((x X. y) u. ((y X. x) u. (y X. y)))) = (/) /\ (x i^i y) = (/))) -> (g u. u):((x X. x) u. ((x X. y) u. ((y X. x) u. (y X. y))))-1-1-onto->(x u. y))
4 xpdisj2 3475 . . . . . . . . . . . . . 14 |- ((x i^i y) = (/) -> ((x X. x) i^i (x X. y)) = (/))
5 xpdisj1 3474 . . . . . . . . . . . . . . . 16 |- ((x i^i y) = (/) -> ((x X. x) i^i (y X. x)) = (/))
6 xpdisj1 3474 . . . . . . . . . . . . . . . 16 |- ((x i^i y) = (/) -> ((x X. x) i^i (y X. y)) = (/))
75, 6jca 288 . . . . . . . . . . . . . . 15 |- ((x i^i y) = (/) -> (((x X. x) i^i (y X. x)) = (/) /\ ((x X. x) i^i (y X. y)) = (/)))
8 undisj2 2325 . . . . . . . . . . . . . . 15 |- ((((x X. x) i^i (y X. x)) = (/) /\ ((x X. x) i^i (y X. y)) = (/)) <-> ((x X. x) i^i ((y X. x) u. (y X. y))) = (/))
97, 8sylib 198 . . . . . . . . . . . . . 14 |- ((x i^i y) = (/) -> ((x X. x) i^i ((y X. x) u. (y X. y))) = (/))
104, 9jca 288 . . . . . . . . . . . . 13 |- ((x i^i y) = (/) -> (((x X. x) i^i (x X. y)) = (/) /\ ((x X. x) i^i ((y X. x) u. (y X. y))) = (/)))
11 undisj2 2325 . . . . . . . . . . . . 13 |- ((((x X. x) i^i (x X. y)) = (/) /\ ((x X. x) i^i ((y X. x) u. (y X. y))) = (/)) <-> ((x X. x) i^i ((x X. y) u. ((y X. x) u. (y X. y)))) = (/))
1210, 11sylib 198 . . . . . . . . . . . 12 |- ((x i^i y) = (/) -> ((x X. x) i^i ((x X. y) u. ((y X. x) u. (y X. y)))) = (/))
1312ancri 297 . . . . . . . . . . 11 |- ((x i^i y) = (/) -> (((x X. x) i^i ((x X. y) u. ((y X. x) u. (y X. y)))) = (/) /\ (x i^i y) = (/)))
143, 13sylan2 453 . . . . . . . . . 10 |- (((g:(x X. x)-1-1-onto->x /\ u:((x X. y) u. ((y X. x) u. (y X. y)))-1-1-onto->y) /\ (x i^i y) = (/)) -> (g u. u):((x X. x) u. ((x X. y) u. ((y X. x) u. (y X. y))))-1-1-onto->(x u. y))
15 xpun 3233 . . . . . . . . . . . 12 |- ((x u. y) X. (x u. y)) = (((x X. x) u. (x X. y)) u. ((y X. x) u. (y X. y)))
16 unass 2190 . . . . . . . . . . . 12 |- (((x X. x) u. (x X. y)) u. ((y X. x) u. (y X. y))) = ((x X. x) u. ((x X. y) u. ((y X. x) u. (y X. y))))
1715, 16eqtr 1498 . . . . . . . . . . 11 |- ((x u. y) X. (x u. y)) = ((x X. x) u. ((x X. y) u. ((y X. x) u. (y X. y))))
18 f1oeq2 3691 . . . . . . . . . . 11 |- (((x u. y) X. (x u. y)) = ((x X. x) u. ((x X. y) u. ((y X. x) u. (y X. y)))) -> ((g u. u):((x u. y) X. (x u. y))-1-1-onto->(x u. y) <-> (g u. u):((x X. x) u. ((x X. y) u. ((y X. x) u. (y X. y))))-1-1-onto->(x u. y)))
1917, 18ax-mp 7 . . . . . . . . . 10 |- ((g u. u):((x u. y) X. (x u. y))-1-1-onto->(x u. y) <-> (g u. u):((x X. x) u. ((x X. y) u. ((y X. x) u. (y X. y))))-1-1-onto->(x u. y))
2014, 19sylibr 200 . . . . . . . . 9 |- (((g:(x X. x)-1-1-onto->x /\ u:((x X. y) u. ((y X. x) u. (y X. y)))-1-1-onto->y) /\ (x i^i y) = (/)) -> (g u. u):((x u. y) X. (x u. y))-1-1-onto->(x u. y))
21 sslin 2238 . . . . . . . . . . 11 |- (y (_ (A \ x) -> (x i^i y) (_ (x i^i (A \ x)))
22 difdisj 2341 . . . . . . . . . . 11 |- (x i^i (A \ x)) = (/)
2321, 22syl6ss 2110 . . . . . . . . . 10 |- (y (_ (A \ x) -> (x i^i y) (_ (/))
24 ss0b 2306 . . . . . . . . . 10 |- ((x i^i y) (_ (/) <-> (x i^i y) = (/))
2523, 24sylib 198 . . . . . . . . 9 |- (y (_ (A \ x) -> (x i^i y) = (/))
2620, 25sylan2 453 . . . . . . . 8 |- (((g:(x X. x)-1-1-onto->x /\ u:((x X. y) u. ((y X. x) u. (y X. y)))-1-1-onto->y) /\ y (_ (A \ x)) -> (g u. u):((x u. y) X. (x u. y))-1-1-onto->(x u. y))
2726adantll 394 . . . . . . 7 |- ((((om ~<_ x /\ x (_ A) /\ (g:(x X. x)-1-1-onto->x /\ u:((x X. y) u. ((y X. x) u. (y X. y)))-1-1-onto->y)) /\ y (_ (A \ x)) -> (g u. u):((x u. y) X. (x u. y))-1-1-onto->(x u. y))
28 infxpidmlem.1 . . . . . . . . . . 11 |- H = {f | (f = (/) \/ E.t((om ~<_ t /\ t (_ A) /\ f:(t X. t)-1-1-onto->t))}
29 visset 1816 . . . . . . . . . . . 12 |- g e. V
30 visset 1816 . . . . . . . . . . . 12 |- u e. V
3129, 30unex 2878 . . . . . . . . . . 11 |- (g u. u) e. V
32 visset 1816 . . . . . . . . . . . 12 |- x e. V
33 visset 1816 . . . . . . . . . . . 12 |- y e. V
3432, 33unex 2878 . . . . . . . . . . 11 |- (x u. y) e. V
3528, 31, 34infxpidmlem3 7555 . . . . . . . . . 10 |- (((om ~<_ (x u. y) /\ (x u. y) (_ A) /\ (g u. u):((x u. y) X. (x u. y))-1-1-onto->(x u. y)) -> (g u. u) e. H)
36 ssun1 2196 . . . . . . . . . . . . . 14 |- x (_ (x u. y)
37 ssdomg 4414 . . . . . . . . . . . . . 14 |- (x e. V -> (x (_ (x u. y) -> x ~<_ (x u. y)))
3832, 36, 37mp2 43 . . . . . . . . . . . . 13 |- x ~<_ (x u. y)
39 domtr 4421 . . . . . . . . . . . . 13 |- ((om ~<_ x /\ x ~<_ (x u. y)) -> om ~<_ (x u. y))
4038, 39mpan2 698 . . . . . . . . . . . 12 |- (om ~<_ x -> om ~<_ (x u. y))
41 difss 2170 . . . . . . . . . . . . . . 15 |- (A \ x) (_ A
42 sstr 2075 . . . . . . . . . . . . . . 15 |- ((y (_ (A \ x) /\ (A \ x) (_ A) -> y (_ A)
4341, 42mpan2 698 . . . . . . . . . . . . . 14 |- (y (_ (A \ x) -> y (_ A)
4443anim2i 335 . . . . . . . . . . . . 13 |- ((x (_ A /\ y (_ (A \ x)) -> (x (_ A /\ y (_ A))
45 unss 2207 . . . . . . . . . . . . 13 |- ((x (_ A /\ y (_ A) <-> (x u. y) (_ A)
4644, 45sylib 198 . . . . . . . . . . . 12 |- ((x (_ A /\ y (_ (A \ x)) -> (x u. y) (_ A)
4740, 46anim12i 333 . . . . . . . . . . 11 |- ((om ~<_ x /\ (x (_ A /\ y (_ (A \ x))) -> (om ~<_ (x u. y) /\ (x u. y) (_ A))
4847anassrs 443 . . . . . . . . . 10 |- (((om ~<_ x /\ x (_ A) /\ y (_ (A \ x)) -> (om ~<_ (x u. y) /\ (x u. y) (_ A))
4935, 48sylan 450 . . . . . . . . 9 |- ((((om ~<_ x /\ x (_ A) /\ y (_ (A \ x)) /\ (g u. u):((x u. y) X. (x u. y))-1-1-onto->(x u. y)) -> (g u. u) e. H)
5049ex 373 . . . . . . . 8 |- (((om ~<_ x /\ x (_ A) /\ y (_ (A \ x)) -> ((g u. u):((x u. y) X. (x u. y))-1-1-onto->(x u. y) -> (g u. u) e. H))
5150adantlr 395 . . . . . . 7 |-