MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  psgnunilem1 Structured version   Visualization version   GIF version

Theorem psgnunilem1 19016
Description: Lemma for psgnuni 19022. Given two consequtive transpositions in a representation of a permutation, either they are equal and therefore equivalent to the identity, or they are not and it is possible to commute them such that a chosen point in the left transposition is preserved in the right. By repeating this process, a point can be removed from a representation of the identity. (Contributed by Stefan O'Rear, 22-Aug-2015.)
Hypotheses
Ref Expression
psgnunilem1.t 𝑇 = ran (pmTrsp‘𝐷)
psgnunilem1.d (𝜑𝐷𝑉)
psgnunilem1.p (𝜑𝑃𝑇)
psgnunilem1.q (𝜑𝑄𝑇)
psgnunilem1.a (𝜑𝐴 ∈ dom (𝑃 ∖ I ))
Assertion
Ref Expression
psgnunilem1 (𝜑 → ((𝑃𝑄) = ( I ↾ 𝐷) ∨ ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I ))))
Distinct variable groups:   𝑠,𝑟,𝐴   𝑃,𝑟,𝑠   𝑄,𝑟,𝑠   𝑇,𝑟,𝑠
Allowed substitution hints:   𝜑(𝑠,𝑟)   𝐷(𝑠,𝑟)   𝑉(𝑠,𝑟)

Proof of Theorem psgnunilem1
StepHypRef Expression
1 psgnunilem1.q . . . . . . . 8 (𝜑𝑄𝑇)
2 eqid 2738 . . . . . . . . 9 (pmTrsp‘𝐷) = (pmTrsp‘𝐷)
3 psgnunilem1.t . . . . . . . . 9 𝑇 = ran (pmTrsp‘𝐷)
42, 3pmtrfinv 18984 . . . . . . . 8 (𝑄𝑇 → (𝑄𝑄) = ( I ↾ 𝐷))
51, 4syl 17 . . . . . . 7 (𝜑 → (𝑄𝑄) = ( I ↾ 𝐷))
6 coeq1 5755 . . . . . . . 8 (𝑃 = 𝑄 → (𝑃𝑄) = (𝑄𝑄))
76eqeq1d 2740 . . . . . . 7 (𝑃 = 𝑄 → ((𝑃𝑄) = ( I ↾ 𝐷) ↔ (𝑄𝑄) = ( I ↾ 𝐷)))
85, 7syl5ibrcom 246 . . . . . 6 (𝜑 → (𝑃 = 𝑄 → (𝑃𝑄) = ( I ↾ 𝐷)))
98adantr 480 . . . . 5 ((𝜑𝐴 ∈ dom (𝑄 ∖ I )) → (𝑃 = 𝑄 → (𝑃𝑄) = ( I ↾ 𝐷)))
109imp 406 . . . 4 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃 = 𝑄) → (𝑃𝑄) = ( I ↾ 𝐷))
1110orcd 869 . . 3 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃 = 𝑄) → ((𝑃𝑄) = ( I ↾ 𝐷) ∨ ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I ))))
12 psgnunilem1.p . . . . . . . . . 10 (𝜑𝑃𝑇)
132, 3pmtrfcnv 18987 . . . . . . . . . 10 (𝑃𝑇𝑃 = 𝑃)
1412, 13syl 17 . . . . . . . . 9 (𝜑𝑃 = 𝑃)
1514eqcomd 2744 . . . . . . . 8 (𝜑𝑃 = 𝑃)
1615coeq2d 5760 . . . . . . 7 (𝜑 → ((𝑃𝑄) ∘ 𝑃) = ((𝑃𝑄) ∘ 𝑃))
172, 3pmtrff1o 18986 . . . . . . . . 9 (𝑃𝑇𝑃:𝐷1-1-onto𝐷)
1812, 17syl 17 . . . . . . . 8 (𝜑𝑃:𝐷1-1-onto𝐷)
192, 3pmtrfconj 18989 . . . . . . . 8 ((𝑄𝑇𝑃:𝐷1-1-onto𝐷) → ((𝑃𝑄) ∘ 𝑃) ∈ 𝑇)
201, 18, 19syl2anc 583 . . . . . . 7 (𝜑 → ((𝑃𝑄) ∘ 𝑃) ∈ 𝑇)
2116, 20eqeltrd 2839 . . . . . 6 (𝜑 → ((𝑃𝑄) ∘ 𝑃) ∈ 𝑇)
2221ad2antrr 722 . . . . 5 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → ((𝑃𝑄) ∘ 𝑃) ∈ 𝑇)
2312ad2antrr 722 . . . . 5 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → 𝑃𝑇)
24 coass 6158 . . . . . . 7 (((𝑃𝑄) ∘ 𝑃) ∘ 𝑃) = ((𝑃𝑄) ∘ (𝑃𝑃))
252, 3pmtrfinv 18984 . . . . . . . . . 10 (𝑃𝑇 → (𝑃𝑃) = ( I ↾ 𝐷))
2612, 25syl 17 . . . . . . . . 9 (𝜑 → (𝑃𝑃) = ( I ↾ 𝐷))
2726coeq2d 5760 . . . . . . . 8 (𝜑 → ((𝑃𝑄) ∘ (𝑃𝑃)) = ((𝑃𝑄) ∘ ( I ↾ 𝐷)))
28 f1of 6700 . . . . . . . . . . 11 (𝑃:𝐷1-1-onto𝐷𝑃:𝐷𝐷)
2918, 28syl 17 . . . . . . . . . 10 (𝜑𝑃:𝐷𝐷)
302, 3pmtrff1o 18986 . . . . . . . . . . . 12 (𝑄𝑇𝑄:𝐷1-1-onto𝐷)
311, 30syl 17 . . . . . . . . . . 11 (𝜑𝑄:𝐷1-1-onto𝐷)
32 f1of 6700 . . . . . . . . . . 11 (𝑄:𝐷1-1-onto𝐷𝑄:𝐷𝐷)
3331, 32syl 17 . . . . . . . . . 10 (𝜑𝑄:𝐷𝐷)
34 fco 6608 . . . . . . . . . 10 ((𝑃:𝐷𝐷𝑄:𝐷𝐷) → (𝑃𝑄):𝐷𝐷)
3529, 33, 34syl2anc 583 . . . . . . . . 9 (𝜑 → (𝑃𝑄):𝐷𝐷)
36 fcoi1 6632 . . . . . . . . 9 ((𝑃𝑄):𝐷𝐷 → ((𝑃𝑄) ∘ ( I ↾ 𝐷)) = (𝑃𝑄))
3735, 36syl 17 . . . . . . . 8 (𝜑 → ((𝑃𝑄) ∘ ( I ↾ 𝐷)) = (𝑃𝑄))
3827, 37eqtrd 2778 . . . . . . 7 (𝜑 → ((𝑃𝑄) ∘ (𝑃𝑃)) = (𝑃𝑄))
3924, 38eqtr2id 2792 . . . . . 6 (𝜑 → (𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑃))
4039ad2antrr 722 . . . . 5 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → (𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑃))
41 psgnunilem1.a . . . . . 6 (𝜑𝐴 ∈ dom (𝑃 ∖ I ))
4241ad2antrr 722 . . . . 5 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → 𝐴 ∈ dom (𝑃 ∖ I ))
4318adantr 480 . . . . . . . . . 10 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → 𝑃:𝐷1-1-onto𝐷)
4431adantr 480 . . . . . . . . . 10 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → 𝑄:𝐷1-1-onto𝐷)
452, 3pmtrfb 18988 . . . . . . . . . . . . 13 (𝑃𝑇 ↔ (𝐷 ∈ V ∧ 𝑃:𝐷1-1-onto𝐷 ∧ dom (𝑃 ∖ I ) ≈ 2o))
4645simp3bi 1145 . . . . . . . . . . . 12 (𝑃𝑇 → dom (𝑃 ∖ I ) ≈ 2o)
4712, 46syl 17 . . . . . . . . . . 11 (𝜑 → dom (𝑃 ∖ I ) ≈ 2o)
4847adantr 480 . . . . . . . . . 10 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → dom (𝑃 ∖ I ) ≈ 2o)
49 2onn 8433 . . . . . . . . . . . . . . 15 2o ∈ ω
50 nnfi 8912 . . . . . . . . . . . . . . 15 (2o ∈ ω → 2o ∈ Fin)
5149, 50ax-mp 5 . . . . . . . . . . . . . 14 2o ∈ Fin
522, 3pmtrfb 18988 . . . . . . . . . . . . . . . . 17 (𝑄𝑇 ↔ (𝐷 ∈ V ∧ 𝑄:𝐷1-1-onto𝐷 ∧ dom (𝑄 ∖ I ) ≈ 2o))
5352simp3bi 1145 . . . . . . . . . . . . . . . 16 (𝑄𝑇 → dom (𝑄 ∖ I ) ≈ 2o)
541, 53syl 17 . . . . . . . . . . . . . . 15 (𝜑 → dom (𝑄 ∖ I ) ≈ 2o)
55 enfi 8933 . . . . . . . . . . . . . . 15 (dom (𝑄 ∖ I ) ≈ 2o → (dom (𝑄 ∖ I ) ∈ Fin ↔ 2o ∈ Fin))
5654, 55syl 17 . . . . . . . . . . . . . 14 (𝜑 → (dom (𝑄 ∖ I ) ∈ Fin ↔ 2o ∈ Fin))
5751, 56mpbiri 257 . . . . . . . . . . . . 13 (𝜑 → dom (𝑄 ∖ I ) ∈ Fin)
5857adantr 480 . . . . . . . . . . . 12 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → dom (𝑄 ∖ I ) ∈ Fin)
5941adantr 480 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → 𝐴 ∈ dom (𝑃 ∖ I ))
60 en2eleq 9695 . . . . . . . . . . . . . 14 ((𝐴 ∈ dom (𝑃 ∖ I ) ∧ dom (𝑃 ∖ I ) ≈ 2o) → dom (𝑃 ∖ I ) = {𝐴, (dom (𝑃 ∖ I ) ∖ {𝐴})})
6159, 48, 60syl2anc 583 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → dom (𝑃 ∖ I ) = {𝐴, (dom (𝑃 ∖ I ) ∖ {𝐴})})
62 simprl 767 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → 𝐴 ∈ dom (𝑄 ∖ I ))
63 f1ofn 6701 . . . . . . . . . . . . . . . . . 18 (𝑃:𝐷1-1-onto𝐷𝑃 Fn 𝐷)
6418, 63syl 17 . . . . . . . . . . . . . . . . 17 (𝜑𝑃 Fn 𝐷)
6564adantr 480 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → 𝑃 Fn 𝐷)
66 fimass 6605 . . . . . . . . . . . . . . . . . 18 (𝑃:𝐷𝐷 → (𝑃 “ dom (𝑄 ∖ I )) ⊆ 𝐷)
6729, 66syl 17 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑃 “ dom (𝑄 ∖ I )) ⊆ 𝐷)
6867adantr 480 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → (𝑃 “ dom (𝑄 ∖ I )) ⊆ 𝐷)
69 simprr 769 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))
70 fnfvima 7091 . . . . . . . . . . . . . . . 16 ((𝑃 Fn 𝐷 ∧ (𝑃 “ dom (𝑄 ∖ I )) ⊆ 𝐷𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I ))) → (𝑃𝐴) ∈ (𝑃 “ (𝑃 “ dom (𝑄 ∖ I ))))
7165, 68, 69, 70syl3anc 1369 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → (𝑃𝐴) ∈ (𝑃 “ (𝑃 “ dom (𝑄 ∖ I ))))
72 difss 4062 . . . . . . . . . . . . . . . . . . . . 21 (𝑃 ∖ I ) ⊆ 𝑃
73 dmss 5800 . . . . . . . . . . . . . . . . . . . . 21 ((𝑃 ∖ I ) ⊆ 𝑃 → dom (𝑃 ∖ I ) ⊆ dom 𝑃)
7472, 73ax-mp 5 . . . . . . . . . . . . . . . . . . . 20 dom (𝑃 ∖ I ) ⊆ dom 𝑃
75 f1odm 6704 . . . . . . . . . . . . . . . . . . . . 21 (𝑃:𝐷1-1-onto𝐷 → dom 𝑃 = 𝐷)
7618, 75syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → dom 𝑃 = 𝐷)
7774, 76sseqtrid 3969 . . . . . . . . . . . . . . . . . . 19 (𝜑 → dom (𝑃 ∖ I ) ⊆ 𝐷)
7877, 41sseldd 3918 . . . . . . . . . . . . . . . . . 18 (𝜑𝐴𝐷)
79 eqid 2738 . . . . . . . . . . . . . . . . . . 19 dom (𝑃 ∖ I ) = dom (𝑃 ∖ I )
802, 3, 79pmtrffv 18982 . . . . . . . . . . . . . . . . . 18 ((𝑃𝑇𝐴𝐷) → (𝑃𝐴) = if(𝐴 ∈ dom (𝑃 ∖ I ), (dom (𝑃 ∖ I ) ∖ {𝐴}), 𝐴))
8112, 78, 80syl2anc 583 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑃𝐴) = if(𝐴 ∈ dom (𝑃 ∖ I ), (dom (𝑃 ∖ I ) ∖ {𝐴}), 𝐴))
8241iftrued 4464 . . . . . . . . . . . . . . . . 17 (𝜑 → if(𝐴 ∈ dom (𝑃 ∖ I ), (dom (𝑃 ∖ I ) ∖ {𝐴}), 𝐴) = (dom (𝑃 ∖ I ) ∖ {𝐴}))
8381, 82eqtrd 2778 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑃𝐴) = (dom (𝑃 ∖ I ) ∖ {𝐴}))
8483adantr 480 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → (𝑃𝐴) = (dom (𝑃 ∖ I ) ∖ {𝐴}))
85 imaco 6144 . . . . . . . . . . . . . . . . 17 ((𝑃𝑃) “ dom (𝑄 ∖ I )) = (𝑃 “ (𝑃 “ dom (𝑄 ∖ I )))
8626imaeq1d 5957 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑃𝑃) “ dom (𝑄 ∖ I )) = (( I ↾ 𝐷) “ dom (𝑄 ∖ I )))
87 difss 4062 . . . . . . . . . . . . . . . . . . . . . 22 (𝑄 ∖ I ) ⊆ 𝑄
88 dmss 5800 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑄 ∖ I ) ⊆ 𝑄 → dom (𝑄 ∖ I ) ⊆ dom 𝑄)
8987, 88ax-mp 5 . . . . . . . . . . . . . . . . . . . . 21 dom (𝑄 ∖ I ) ⊆ dom 𝑄
90 f1odm 6704 . . . . . . . . . . . . . . . . . . . . 21 (𝑄:𝐷1-1-onto𝐷 → dom 𝑄 = 𝐷)
9189, 90sseqtrid 3969 . . . . . . . . . . . . . . . . . . . 20 (𝑄:𝐷1-1-onto𝐷 → dom (𝑄 ∖ I ) ⊆ 𝐷)
9231, 91syl 17 . . . . . . . . . . . . . . . . . . 19 (𝜑 → dom (𝑄 ∖ I ) ⊆ 𝐷)
93 resiima 5973 . . . . . . . . . . . . . . . . . . 19 (dom (𝑄 ∖ I ) ⊆ 𝐷 → (( I ↾ 𝐷) “ dom (𝑄 ∖ I )) = dom (𝑄 ∖ I ))
9492, 93syl 17 . . . . . . . . . . . . . . . . . 18 (𝜑 → (( I ↾ 𝐷) “ dom (𝑄 ∖ I )) = dom (𝑄 ∖ I ))
9586, 94eqtrd 2778 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑃𝑃) “ dom (𝑄 ∖ I )) = dom (𝑄 ∖ I ))
9685, 95eqtr3id 2793 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑃 “ (𝑃 “ dom (𝑄 ∖ I ))) = dom (𝑄 ∖ I ))
9796adantr 480 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → (𝑃 “ (𝑃 “ dom (𝑄 ∖ I ))) = dom (𝑄 ∖ I ))
9871, 84, 973eltr3d 2853 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → (dom (𝑃 ∖ I ) ∖ {𝐴}) ∈ dom (𝑄 ∖ I ))
9962, 98prssd 4752 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → {𝐴, (dom (𝑃 ∖ I ) ∖ {𝐴})} ⊆ dom (𝑄 ∖ I ))
10061, 99eqsstrd 3955 . . . . . . . . . . . 12 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → dom (𝑃 ∖ I ) ⊆ dom (𝑄 ∖ I ))
10154ensymd 8746 . . . . . . . . . . . . . 14 (𝜑 → 2o ≈ dom (𝑄 ∖ I ))
102 entr 8747 . . . . . . . . . . . . . 14 ((dom (𝑃 ∖ I ) ≈ 2o ∧ 2o ≈ dom (𝑄 ∖ I )) → dom (𝑃 ∖ I ) ≈ dom (𝑄 ∖ I ))
10347, 101, 102syl2anc 583 . . . . . . . . . . . . 13 (𝜑 → dom (𝑃 ∖ I ) ≈ dom (𝑄 ∖ I ))
104103adantr 480 . . . . . . . . . . . 12 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → dom (𝑃 ∖ I ) ≈ dom (𝑄 ∖ I ))
105 fisseneq 8963 . . . . . . . . . . . 12 ((dom (𝑄 ∖ I ) ∈ Fin ∧ dom (𝑃 ∖ I ) ⊆ dom (𝑄 ∖ I ) ∧ dom (𝑃 ∖ I ) ≈ dom (𝑄 ∖ I )) → dom (𝑃 ∖ I ) = dom (𝑄 ∖ I ))
10658, 100, 104, 105syl3anc 1369 . . . . . . . . . . 11 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → dom (𝑃 ∖ I ) = dom (𝑄 ∖ I ))
107106eqcomd 2744 . . . . . . . . . 10 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → dom (𝑄 ∖ I ) = dom (𝑃 ∖ I ))
108 f1otrspeq 18970 . . . . . . . . . 10 (((𝑃:𝐷1-1-onto𝐷𝑄:𝐷1-1-onto𝐷) ∧ (dom (𝑃 ∖ I ) ≈ 2o ∧ dom (𝑄 ∖ I ) = dom (𝑃 ∖ I ))) → 𝑃 = 𝑄)
10943, 44, 48, 107, 108syl22anc 835 . . . . . . . . 9 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → 𝑃 = 𝑄)
110109expr 456 . . . . . . . 8 ((𝜑𝐴 ∈ dom (𝑄 ∖ I )) → (𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )) → 𝑃 = 𝑄))
111110necon3ad 2955 . . . . . . 7 ((𝜑𝐴 ∈ dom (𝑄 ∖ I )) → (𝑃𝑄 → ¬ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I ))))
112111imp 406 . . . . . 6 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → ¬ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))
11316difeq1d 4052 . . . . . . . . . 10 (𝜑 → (((𝑃𝑄) ∘ 𝑃) ∖ I ) = (((𝑃𝑄) ∘ 𝑃) ∖ I ))
114113dmeqd 5803 . . . . . . . . 9 (𝜑 → dom (((𝑃𝑄) ∘ 𝑃) ∖ I ) = dom (((𝑃𝑄) ∘ 𝑃) ∖ I ))
115 f1omvdconj 18969 . . . . . . . . . 10 ((𝑄:𝐷𝐷𝑃:𝐷1-1-onto𝐷) → dom (((𝑃𝑄) ∘ 𝑃) ∖ I ) = (𝑃 “ dom (𝑄 ∖ I )))
11633, 18, 115syl2anc 583 . . . . . . . . 9 (𝜑 → dom (((𝑃𝑄) ∘ 𝑃) ∖ I ) = (𝑃 “ dom (𝑄 ∖ I )))
117114, 116eqtrd 2778 . . . . . . . 8 (𝜑 → dom (((𝑃𝑄) ∘ 𝑃) ∖ I ) = (𝑃 “ dom (𝑄 ∖ I )))
118117eleq2d 2824 . . . . . . 7 (𝜑 → (𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I ) ↔ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I ))))
119118ad2antrr 722 . . . . . 6 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → (𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I ) ↔ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I ))))
120112, 119mtbird 324 . . . . 5 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → ¬ 𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I ))
121 coeq1 5755 . . . . . . . 8 (𝑟 = ((𝑃𝑄) ∘ 𝑃) → (𝑟𝑠) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑠))
122121eqeq2d 2749 . . . . . . 7 (𝑟 = ((𝑃𝑄) ∘ 𝑃) → ((𝑃𝑄) = (𝑟𝑠) ↔ (𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑠)))
123 difeq1 4046 . . . . . . . . . 10 (𝑟 = ((𝑃𝑄) ∘ 𝑃) → (𝑟 ∖ I ) = (((𝑃𝑄) ∘ 𝑃) ∖ I ))
124123dmeqd 5803 . . . . . . . . 9 (𝑟 = ((𝑃𝑄) ∘ 𝑃) → dom (𝑟 ∖ I ) = dom (((𝑃𝑄) ∘ 𝑃) ∖ I ))
125124eleq2d 2824 . . . . . . . 8 (𝑟 = ((𝑃𝑄) ∘ 𝑃) → (𝐴 ∈ dom (𝑟 ∖ I ) ↔ 𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I )))
126125notbid 317 . . . . . . 7 (𝑟 = ((𝑃𝑄) ∘ 𝑃) → (¬ 𝐴 ∈ dom (𝑟 ∖ I ) ↔ ¬ 𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I )))
127122, 1263anbi13d 1436 . . . . . 6 (𝑟 = ((𝑃𝑄) ∘ 𝑃) → (((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I )) ↔ ((𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I ))))
128 coeq2 5756 . . . . . . . 8 (𝑠 = 𝑃 → (((𝑃𝑄) ∘ 𝑃) ∘ 𝑠) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑃))
129128eqeq2d 2749 . . . . . . 7 (𝑠 = 𝑃 → ((𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑠) ↔ (𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑃)))
130 difeq1 4046 . . . . . . . . 9 (𝑠 = 𝑃 → (𝑠 ∖ I ) = (𝑃 ∖ I ))
131130dmeqd 5803 . . . . . . . 8 (𝑠 = 𝑃 → dom (𝑠 ∖ I ) = dom (𝑃 ∖ I ))
132131eleq2d 2824 . . . . . . 7 (𝑠 = 𝑃 → (𝐴 ∈ dom (𝑠 ∖ I ) ↔ 𝐴 ∈ dom (𝑃 ∖ I )))
133129, 1323anbi12d 1435 . . . . . 6 (𝑠 = 𝑃 → (((𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I )) ↔ ((𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑃) ∧ 𝐴 ∈ dom (𝑃 ∖ I ) ∧ ¬ 𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I ))))
134127, 133rspc2ev 3564 . . . . 5 ((((𝑃𝑄) ∘ 𝑃) ∈ 𝑇𝑃𝑇 ∧ ((𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑃) ∧ 𝐴 ∈ dom (𝑃 ∖ I ) ∧ ¬ 𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I ))) → ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I )))
13522, 23, 40, 42, 120, 134syl113anc 1380 . . . 4 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I )))
136135olcd 870 . . 3 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → ((𝑃𝑄) = ( I ↾ 𝐷) ∨ ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I ))))
13711, 136pm2.61dane 3031 . 2 ((𝜑𝐴 ∈ dom (𝑄 ∖ I )) → ((𝑃𝑄) = ( I ↾ 𝐷) ∨ ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I ))))
1381adantr 480 . . . 4 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → 𝑄𝑇)
139 coass 6158 . . . . . . 7 ((𝑄𝑃) ∘ 𝑄) = (𝑄 ∘ (𝑃𝑄))
1402, 3pmtrfcnv 18987 . . . . . . . . . 10 (𝑄𝑇𝑄 = 𝑄)
1411, 140syl 17 . . . . . . . . 9 (𝜑𝑄 = 𝑄)
142141eqcomd 2744 . . . . . . . 8 (𝜑𝑄 = 𝑄)
143142coeq2d 5760 . . . . . . 7 (𝜑 → ((𝑄𝑃) ∘ 𝑄) = ((𝑄𝑃) ∘ 𝑄))
144139, 143eqtr3id 2793 . . . . . 6 (𝜑 → (𝑄 ∘ (𝑃𝑄)) = ((𝑄𝑃) ∘ 𝑄))
1452, 3pmtrfconj 18989 . . . . . . 7 ((𝑃𝑇𝑄:𝐷1-1-onto𝐷) → ((𝑄𝑃) ∘ 𝑄) ∈ 𝑇)
14612, 31, 145syl2anc 583 . . . . . 6 (𝜑 → ((𝑄𝑃) ∘ 𝑄) ∈ 𝑇)
147144, 146eqeltrd 2839 . . . . 5 (𝜑 → (𝑄 ∘ (𝑃𝑄)) ∈ 𝑇)
148147adantr 480 . . . 4 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → (𝑄 ∘ (𝑃𝑄)) ∈ 𝑇)
1495coeq1d 5759 . . . . . . 7 (𝜑 → ((𝑄𝑄) ∘ (𝑃𝑄)) = (( I ↾ 𝐷) ∘ (𝑃𝑄)))
150 fcoi2 6633 . . . . . . . 8 ((𝑃𝑄):𝐷𝐷 → (( I ↾ 𝐷) ∘ (𝑃𝑄)) = (𝑃𝑄))
15135, 150syl 17 . . . . . . 7 (𝜑 → (( I ↾ 𝐷) ∘ (𝑃𝑄)) = (𝑃𝑄))
152149, 151eqtr2d 2779 . . . . . 6 (𝜑 → (𝑃𝑄) = ((𝑄𝑄) ∘ (𝑃𝑄)))
153 coass 6158 . . . . . 6 ((𝑄𝑄) ∘ (𝑃𝑄)) = (𝑄 ∘ (𝑄 ∘ (𝑃𝑄)))
154152, 153eqtrdi 2795 . . . . 5 (𝜑 → (𝑃𝑄) = (𝑄 ∘ (𝑄 ∘ (𝑃𝑄))))
155154adantr 480 . . . 4 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → (𝑃𝑄) = (𝑄 ∘ (𝑄 ∘ (𝑃𝑄))))
156 f1ofn 6701 . . . . . . . . . 10 (𝑄:𝐷1-1-onto𝐷𝑄 Fn 𝐷)
15731, 156syl 17 . . . . . . . . 9 (𝜑𝑄 Fn 𝐷)
158 fnelnfp 7031 . . . . . . . . 9 ((𝑄 Fn 𝐷𝐴𝐷) → (𝐴 ∈ dom (𝑄 ∖ I ) ↔ (𝑄𝐴) ≠ 𝐴))
159157, 78, 158syl2anc 583 . . . . . . . 8 (𝜑 → (𝐴 ∈ dom (𝑄 ∖ I ) ↔ (𝑄𝐴) ≠ 𝐴))
160159necon2bbid 2986 . . . . . . 7 (𝜑 → ((𝑄𝐴) = 𝐴 ↔ ¬ 𝐴 ∈ dom (𝑄 ∖ I )))
161160biimpar 477 . . . . . 6 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → (𝑄𝐴) = 𝐴)
162 fnfvima 7091 . . . . . . . 8 ((𝑄 Fn 𝐷 ∧ dom (𝑃 ∖ I ) ⊆ 𝐷𝐴 ∈ dom (𝑃 ∖ I )) → (𝑄𝐴) ∈ (𝑄 “ dom (𝑃 ∖ I )))
163157, 77, 41, 162syl3anc 1369 . . . . . . 7 (𝜑 → (𝑄𝐴) ∈ (𝑄 “ dom (𝑃 ∖ I )))
164163adantr 480 . . . . . 6 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → (𝑄𝐴) ∈ (𝑄 “ dom (𝑃 ∖ I )))
165161, 164eqeltrrd 2840 . . . . 5 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → 𝐴 ∈ (𝑄 “ dom (𝑃 ∖ I )))
166144difeq1d 4052 . . . . . . . 8 (𝜑 → ((𝑄 ∘ (𝑃𝑄)) ∖ I ) = (((𝑄𝑃) ∘ 𝑄) ∖ I ))
167166dmeqd 5803 . . . . . . 7 (𝜑 → dom ((𝑄 ∘ (𝑃𝑄)) ∖ I ) = dom (((𝑄𝑃) ∘ 𝑄) ∖ I ))
168 f1omvdconj 18969 . . . . . . . 8 ((𝑃:𝐷𝐷𝑄:𝐷1-1-onto𝐷) → dom (((𝑄𝑃) ∘ 𝑄) ∖ I ) = (𝑄 “ dom (𝑃 ∖ I )))
16929, 31, 168syl2anc 583 . . . . . . 7 (𝜑 → dom (((𝑄𝑃) ∘ 𝑄) ∖ I ) = (𝑄 “ dom (𝑃 ∖ I )))
170167, 169eqtrd 2778 . . . . . 6 (𝜑 → dom ((𝑄 ∘ (𝑃𝑄)) ∖ I ) = (𝑄 “ dom (𝑃 ∖ I )))
171170adantr 480 . . . . 5 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → dom ((𝑄 ∘ (𝑃𝑄)) ∖ I ) = (𝑄 “ dom (𝑃 ∖ I )))
172165, 171eleqtrrd 2842 . . . 4 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → 𝐴 ∈ dom ((𝑄 ∘ (𝑃𝑄)) ∖ I ))
173 simpr 484 . . . 4 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → ¬ 𝐴 ∈ dom (𝑄 ∖ I ))
174 coeq1 5755 . . . . . . 7 (𝑟 = 𝑄 → (𝑟𝑠) = (𝑄𝑠))
175174eqeq2d 2749 . . . . . 6 (𝑟 = 𝑄 → ((𝑃𝑄) = (𝑟𝑠) ↔ (𝑃𝑄) = (𝑄𝑠)))
176 difeq1 4046 . . . . . . . . 9 (𝑟 = 𝑄 → (𝑟 ∖ I ) = (𝑄 ∖ I ))
177176dmeqd 5803 . . . . . . . 8 (𝑟 = 𝑄 → dom (𝑟 ∖ I ) = dom (𝑄 ∖ I ))
178177eleq2d 2824 . . . . . . 7 (𝑟 = 𝑄 → (𝐴 ∈ dom (𝑟 ∖ I ) ↔ 𝐴 ∈ dom (𝑄 ∖ I )))
179178notbid 317 . . . . . 6 (𝑟 = 𝑄 → (¬ 𝐴 ∈ dom (𝑟 ∖ I ) ↔ ¬ 𝐴 ∈ dom (𝑄 ∖ I )))
180175, 1793anbi13d 1436 . . . . 5 (𝑟 = 𝑄 → (((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I )) ↔ ((𝑃𝑄) = (𝑄𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I ))))
181 coeq2 5756 . . . . . . 7 (𝑠 = (𝑄 ∘ (𝑃𝑄)) → (𝑄𝑠) = (𝑄 ∘ (𝑄 ∘ (𝑃𝑄))))
182181eqeq2d 2749 . . . . . 6 (𝑠 = (𝑄 ∘ (𝑃𝑄)) → ((𝑃𝑄) = (𝑄𝑠) ↔ (𝑃𝑄) = (𝑄 ∘ (𝑄 ∘ (𝑃𝑄)))))
183 difeq1 4046 . . . . . . . 8 (𝑠 = (𝑄 ∘ (𝑃𝑄)) → (𝑠 ∖ I ) = ((𝑄 ∘ (𝑃𝑄)) ∖ I ))
184183dmeqd 5803 . . . . . . 7 (𝑠 = (𝑄 ∘ (𝑃𝑄)) → dom (𝑠 ∖ I ) = dom ((𝑄 ∘ (𝑃𝑄)) ∖ I ))
185184eleq2d 2824 . . . . . 6 (𝑠 = (𝑄 ∘ (𝑃𝑄)) → (𝐴 ∈ dom (𝑠 ∖ I ) ↔ 𝐴 ∈ dom ((𝑄 ∘ (𝑃𝑄)) ∖ I )))
186182, 1853anbi12d 1435 . . . . 5 (𝑠 = (𝑄 ∘ (𝑃𝑄)) → (((𝑃𝑄) = (𝑄𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) ↔ ((𝑃𝑄) = (𝑄 ∘ (𝑄 ∘ (𝑃𝑄))) ∧ 𝐴 ∈ dom ((𝑄 ∘ (𝑃𝑄)) ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I ))))
187180, 186rspc2ev 3564 . . . 4 ((𝑄𝑇 ∧ (𝑄 ∘ (𝑃𝑄)) ∈ 𝑇 ∧ ((𝑃𝑄) = (𝑄 ∘ (𝑄 ∘ (𝑃𝑄))) ∧ 𝐴 ∈ dom ((𝑄 ∘ (𝑃𝑄)) ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I ))) → ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I )))
188138, 148, 155, 172, 173, 187syl113anc 1380 . . 3 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I )))
189188olcd 870 . 2 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → ((𝑃𝑄) = ( I ↾ 𝐷) ∨ ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I ))))
190137, 189pm2.61dan 809 1 (𝜑 → ((𝑃𝑄) = ( I ↾ 𝐷) ∨ ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I ))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 395  wo 843  w3a 1085   = wceq 1539  wcel 2108  wne 2942  wrex 3064  Vcvv 3422  cdif 3880  wss 3883  ifcif 4456  {csn 4558  {cpr 4560   cuni 4836   class class class wbr 5070   I cid 5479  ccnv 5579  dom cdm 5580  ran crn 5581  cres 5582  cima 5583  ccom 5584   Fn wfn 6413  wf 6414  1-1-ontowf1o 6417  cfv 6418  ωcom 7687  2oc2o 8261  cen 8688  Fincfn 8691  pmTrspcpmtr 18964
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-rep 5205  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-ral 3068  df-rex 3069  df-reu 3070  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-iun 4923  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-om 7688  df-1o 8267  df-2o 8268  df-er 8456  df-en 8692  df-dom 8693  df-sdom 8694  df-fin 8695  df-pmtr 18965
This theorem is referenced by:  psgnunilem2  19018
  Copyright terms: Public domain W3C validator