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

Theorem psgnunilem1 19101
Description: Lemma for psgnuni 19107. 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 19069 . . . . . . . 8 (𝑄𝑇 → (𝑄𝑄) = ( I ↾ 𝐷))
51, 4syl 17 . . . . . . 7 (𝜑 → (𝑄𝑄) = ( I ↾ 𝐷))
6 coeq1 5766 . . . . . . . 8 (𝑃 = 𝑄 → (𝑃𝑄) = (𝑄𝑄))
76eqeq1d 2740 . . . . . . 7 (𝑃 = 𝑄 → ((𝑃𝑄) = ( I ↾ 𝐷) ↔ (𝑄𝑄) = ( I ↾ 𝐷)))
85, 7syl5ibrcom 246 . . . . . 6 (𝜑 → (𝑃 = 𝑄 → (𝑃𝑄) = ( I ↾ 𝐷)))
98adantr 481 . . . . 5 ((𝜑𝐴 ∈ dom (𝑄 ∖ I )) → (𝑃 = 𝑄 → (𝑃𝑄) = ( I ↾ 𝐷)))
109imp 407 . . . 4 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃 = 𝑄) → (𝑃𝑄) = ( I ↾ 𝐷))
1110orcd 870 . . 3 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃 = 𝑄) → ((𝑃𝑄) = ( I ↾ 𝐷) ∨ ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I ))))
12 psgnunilem1.p . . . . . . . . . 10 (𝜑𝑃𝑇)
132, 3pmtrfcnv 19072 . . . . . . . . . 10 (𝑃𝑇𝑃 = 𝑃)
1412, 13syl 17 . . . . . . . . 9 (𝜑𝑃 = 𝑃)
1514eqcomd 2744 . . . . . . . 8 (𝜑𝑃 = 𝑃)
1615coeq2d 5771 . . . . . . 7 (𝜑 → ((𝑃𝑄) ∘ 𝑃) = ((𝑃𝑄) ∘ 𝑃))
172, 3pmtrff1o 19071 . . . . . . . . 9 (𝑃𝑇𝑃:𝐷1-1-onto𝐷)
1812, 17syl 17 . . . . . . . 8 (𝜑𝑃:𝐷1-1-onto𝐷)
192, 3pmtrfconj 19074 . . . . . . . 8 ((𝑄𝑇𝑃:𝐷1-1-onto𝐷) → ((𝑃𝑄) ∘ 𝑃) ∈ 𝑇)
201, 18, 19syl2anc 584 . . . . . . 7 (𝜑 → ((𝑃𝑄) ∘ 𝑃) ∈ 𝑇)
2116, 20eqeltrd 2839 . . . . . 6 (𝜑 → ((𝑃𝑄) ∘ 𝑃) ∈ 𝑇)
2221ad2antrr 723 . . . . 5 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → ((𝑃𝑄) ∘ 𝑃) ∈ 𝑇)
2312ad2antrr 723 . . . . 5 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → 𝑃𝑇)
24 coass 6169 . . . . . . 7 (((𝑃𝑄) ∘ 𝑃) ∘ 𝑃) = ((𝑃𝑄) ∘ (𝑃𝑃))
252, 3pmtrfinv 19069 . . . . . . . . . 10 (𝑃𝑇 → (𝑃𝑃) = ( I ↾ 𝐷))
2612, 25syl 17 . . . . . . . . 9 (𝜑 → (𝑃𝑃) = ( I ↾ 𝐷))
2726coeq2d 5771 . . . . . . . 8 (𝜑 → ((𝑃𝑄) ∘ (𝑃𝑃)) = ((𝑃𝑄) ∘ ( I ↾ 𝐷)))
28 f1of 6716 . . . . . . . . . . 11 (𝑃:𝐷1-1-onto𝐷𝑃:𝐷𝐷)
2918, 28syl 17 . . . . . . . . . 10 (𝜑𝑃:𝐷𝐷)
302, 3pmtrff1o 19071 . . . . . . . . . . . 12 (𝑄𝑇𝑄:𝐷1-1-onto𝐷)
311, 30syl 17 . . . . . . . . . . 11 (𝜑𝑄:𝐷1-1-onto𝐷)
32 f1of 6716 . . . . . . . . . . 11 (𝑄:𝐷1-1-onto𝐷𝑄:𝐷𝐷)
3331, 32syl 17 . . . . . . . . . 10 (𝜑𝑄:𝐷𝐷)
34 fco 6624 . . . . . . . . . 10 ((𝑃:𝐷𝐷𝑄:𝐷𝐷) → (𝑃𝑄):𝐷𝐷)
3529, 33, 34syl2anc 584 . . . . . . . . 9 (𝜑 → (𝑃𝑄):𝐷𝐷)
36 fcoi1 6648 . . . . . . . . 9 ((𝑃𝑄):𝐷𝐷 → ((𝑃𝑄) ∘ ( I ↾ 𝐷)) = (𝑃𝑄))
3735, 36syl 17 . . . . . . . 8 (𝜑 → ((𝑃𝑄) ∘ ( I ↾ 𝐷)) = (𝑃𝑄))
3827, 37eqtrd 2778 . . . . . . 7 (𝜑 → ((𝑃𝑄) ∘ (𝑃𝑃)) = (𝑃𝑄))
3924, 38eqtr2id 2791 . . . . . 6 (𝜑 → (𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑃))
4039ad2antrr 723 . . . . 5 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → (𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑃))
41 psgnunilem1.a . . . . . 6 (𝜑𝐴 ∈ dom (𝑃 ∖ I ))
4241ad2antrr 723 . . . . 5 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → 𝐴 ∈ dom (𝑃 ∖ I ))
4318adantr 481 . . . . . . . . . 10 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → 𝑃:𝐷1-1-onto𝐷)
4431adantr 481 . . . . . . . . . 10 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → 𝑄:𝐷1-1-onto𝐷)
452, 3pmtrfb 19073 . . . . . . . . . . . . 13 (𝑃𝑇 ↔ (𝐷 ∈ V ∧ 𝑃:𝐷1-1-onto𝐷 ∧ dom (𝑃 ∖ I ) ≈ 2o))
4645simp3bi 1146 . . . . . . . . . . . 12 (𝑃𝑇 → dom (𝑃 ∖ I ) ≈ 2o)
4712, 46syl 17 . . . . . . . . . . 11 (𝜑 → dom (𝑃 ∖ I ) ≈ 2o)
4847adantr 481 . . . . . . . . . 10 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → dom (𝑃 ∖ I ) ≈ 2o)
49 2onn 8472 . . . . . . . . . . . . . . 15 2o ∈ ω
50 nnfi 8950 . . . . . . . . . . . . . . 15 (2o ∈ ω → 2o ∈ Fin)
5149, 50ax-mp 5 . . . . . . . . . . . . . 14 2o ∈ Fin
522, 3pmtrfb 19073 . . . . . . . . . . . . . . . . 17 (𝑄𝑇 ↔ (𝐷 ∈ V ∧ 𝑄:𝐷1-1-onto𝐷 ∧ dom (𝑄 ∖ I ) ≈ 2o))
5352simp3bi 1146 . . . . . . . . . . . . . . . 16 (𝑄𝑇 → dom (𝑄 ∖ I ) ≈ 2o)
541, 53syl 17 . . . . . . . . . . . . . . 15 (𝜑 → dom (𝑄 ∖ I ) ≈ 2o)
55 enfi 8973 . . . . . . . . . . . . . . 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 481 . . . . . . . . . . . 12 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → dom (𝑄 ∖ I ) ∈ Fin)
5941adantr 481 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → 𝐴 ∈ dom (𝑃 ∖ I ))
60 en2eleq 9764 . . . . . . . . . . . . . 14 ((𝐴 ∈ dom (𝑃 ∖ I ) ∧ dom (𝑃 ∖ I ) ≈ 2o) → dom (𝑃 ∖ I ) = {𝐴, (dom (𝑃 ∖ I ) ∖ {𝐴})})
6159, 48, 60syl2anc 584 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → dom (𝑃 ∖ I ) = {𝐴, (dom (𝑃 ∖ I ) ∖ {𝐴})})
62 simprl 768 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → 𝐴 ∈ dom (𝑄 ∖ I ))
63 f1ofn 6717 . . . . . . . . . . . . . . . . . 18 (𝑃:𝐷1-1-onto𝐷𝑃 Fn 𝐷)
6418, 63syl 17 . . . . . . . . . . . . . . . . 17 (𝜑𝑃 Fn 𝐷)
6564adantr 481 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → 𝑃 Fn 𝐷)
66 fimass 6621 . . . . . . . . . . . . . . . . . 18 (𝑃:𝐷𝐷 → (𝑃 “ dom (𝑄 ∖ I )) ⊆ 𝐷)
6729, 66syl 17 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑃 “ dom (𝑄 ∖ I )) ⊆ 𝐷)
6867adantr 481 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → (𝑃 “ dom (𝑄 ∖ I )) ⊆ 𝐷)
69 simprr 770 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))
70 fnfvima 7109 . . . . . . . . . . . . . . . 16 ((𝑃 Fn 𝐷 ∧ (𝑃 “ dom (𝑄 ∖ I )) ⊆ 𝐷𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I ))) → (𝑃𝐴) ∈ (𝑃 “ (𝑃 “ dom (𝑄 ∖ I ))))
7165, 68, 69, 70syl3anc 1370 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → (𝑃𝐴) ∈ (𝑃 “ (𝑃 “ dom (𝑄 ∖ I ))))
72 difss 4066 . . . . . . . . . . . . . . . . . . . . 21 (𝑃 ∖ I ) ⊆ 𝑃
73 dmss 5811 . . . . . . . . . . . . . . . . . . . . 21 ((𝑃 ∖ I ) ⊆ 𝑃 → dom (𝑃 ∖ I ) ⊆ dom 𝑃)
7472, 73ax-mp 5 . . . . . . . . . . . . . . . . . . . 20 dom (𝑃 ∖ I ) ⊆ dom 𝑃
75 f1odm 6720 . . . . . . . . . . . . . . . . . . . . 21 (𝑃:𝐷1-1-onto𝐷 → dom 𝑃 = 𝐷)
7618, 75syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → dom 𝑃 = 𝐷)
7774, 76sseqtrid 3973 . . . . . . . . . . . . . . . . . . 19 (𝜑 → dom (𝑃 ∖ I ) ⊆ 𝐷)
7877, 41sseldd 3922 . . . . . . . . . . . . . . . . . 18 (𝜑𝐴𝐷)
79 eqid 2738 . . . . . . . . . . . . . . . . . . 19 dom (𝑃 ∖ I ) = dom (𝑃 ∖ I )
802, 3, 79pmtrffv 19067 . . . . . . . . . . . . . . . . . 18 ((𝑃𝑇𝐴𝐷) → (𝑃𝐴) = if(𝐴 ∈ dom (𝑃 ∖ I ), (dom (𝑃 ∖ I ) ∖ {𝐴}), 𝐴))
8112, 78, 80syl2anc 584 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑃𝐴) = if(𝐴 ∈ dom (𝑃 ∖ I ), (dom (𝑃 ∖ I ) ∖ {𝐴}), 𝐴))
8241iftrued 4467 . . . . . . . . . . . . . . . . 17 (𝜑 → if(𝐴 ∈ dom (𝑃 ∖ I ), (dom (𝑃 ∖ I ) ∖ {𝐴}), 𝐴) = (dom (𝑃 ∖ I ) ∖ {𝐴}))
8381, 82eqtrd 2778 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑃𝐴) = (dom (𝑃 ∖ I ) ∖ {𝐴}))
8483adantr 481 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → (𝑃𝐴) = (dom (𝑃 ∖ I ) ∖ {𝐴}))
85 imaco 6155 . . . . . . . . . . . . . . . . 17 ((𝑃𝑃) “ dom (𝑄 ∖ I )) = (𝑃 “ (𝑃 “ dom (𝑄 ∖ I )))
8626imaeq1d 5968 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑃𝑃) “ dom (𝑄 ∖ I )) = (( I ↾ 𝐷) “ dom (𝑄 ∖ I )))
87 difss 4066 . . . . . . . . . . . . . . . . . . . . . 22 (𝑄 ∖ I ) ⊆ 𝑄
88 dmss 5811 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑄 ∖ I ) ⊆ 𝑄 → dom (𝑄 ∖ I ) ⊆ dom 𝑄)
8987, 88ax-mp 5 . . . . . . . . . . . . . . . . . . . . 21 dom (𝑄 ∖ I ) ⊆ dom 𝑄
90 f1odm 6720 . . . . . . . . . . . . . . . . . . . . 21 (𝑄:𝐷1-1-onto𝐷 → dom 𝑄 = 𝐷)
9189, 90sseqtrid 3973 . . . . . . . . . . . . . . . . . . . 20 (𝑄:𝐷1-1-onto𝐷 → dom (𝑄 ∖ I ) ⊆ 𝐷)
9231, 91syl 17 . . . . . . . . . . . . . . . . . . 19 (𝜑 → dom (𝑄 ∖ I ) ⊆ 𝐷)
93 resiima 5984 . . . . . . . . . . . . . . . . . . 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 2792 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑃 “ (𝑃 “ dom (𝑄 ∖ I ))) = dom (𝑄 ∖ I ))
9796adantr 481 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → (𝑃 “ (𝑃 “ dom (𝑄 ∖ I ))) = dom (𝑄 ∖ I ))
9871, 84, 973eltr3d 2853 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → (dom (𝑃 ∖ I ) ∖ {𝐴}) ∈ dom (𝑄 ∖ I ))
9962, 98prssd 4755 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → {𝐴, (dom (𝑃 ∖ I ) ∖ {𝐴})} ⊆ dom (𝑄 ∖ I ))
10061, 99eqsstrd 3959 . . . . . . . . . . . 12 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → dom (𝑃 ∖ I ) ⊆ dom (𝑄 ∖ I ))
10154ensymd 8791 . . . . . . . . . . . . . 14 (𝜑 → 2o ≈ dom (𝑄 ∖ I ))
102 entr 8792 . . . . . . . . . . . . . 14 ((dom (𝑃 ∖ I ) ≈ 2o ∧ 2o ≈ dom (𝑄 ∖ I )) → dom (𝑃 ∖ I ) ≈ dom (𝑄 ∖ I ))
10347, 101, 102syl2anc 584 . . . . . . . . . . . . 13 (𝜑 → dom (𝑃 ∖ I ) ≈ dom (𝑄 ∖ I ))
104103adantr 481 . . . . . . . . . . . 12 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → dom (𝑃 ∖ I ) ≈ dom (𝑄 ∖ I ))
105 fisseneq 9034 . . . . . . . . . . . 12 ((dom (𝑄 ∖ I ) ∈ Fin ∧ dom (𝑃 ∖ I ) ⊆ dom (𝑄 ∖ I ) ∧ dom (𝑃 ∖ I ) ≈ dom (𝑄 ∖ I )) → dom (𝑃 ∖ I ) = dom (𝑄 ∖ I ))
10658, 100, 104, 105syl3anc 1370 . . . . . . . . . . 11 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → dom (𝑃 ∖ I ) = dom (𝑄 ∖ I ))
107106eqcomd 2744 . . . . . . . . . 10 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → dom (𝑄 ∖ I ) = dom (𝑃 ∖ I ))
108 f1otrspeq 19055 . . . . . . . . . 10 (((𝑃:𝐷1-1-onto𝐷𝑄:𝐷1-1-onto𝐷) ∧ (dom (𝑃 ∖ I ) ≈ 2o ∧ dom (𝑄 ∖ I ) = dom (𝑃 ∖ I ))) → 𝑃 = 𝑄)
10943, 44, 48, 107, 108syl22anc 836 . . . . . . . . 9 ((𝜑 ∧ (𝐴 ∈ dom (𝑄 ∖ I ) ∧ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))) → 𝑃 = 𝑄)
110109expr 457 . . . . . . . 8 ((𝜑𝐴 ∈ dom (𝑄 ∖ I )) → (𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )) → 𝑃 = 𝑄))
111110necon3ad 2956 . . . . . . 7 ((𝜑𝐴 ∈ dom (𝑄 ∖ I )) → (𝑃𝑄 → ¬ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I ))))
112111imp 407 . . . . . 6 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → ¬ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I )))
11316difeq1d 4056 . . . . . . . . . 10 (𝜑 → (((𝑃𝑄) ∘ 𝑃) ∖ I ) = (((𝑃𝑄) ∘ 𝑃) ∖ I ))
114113dmeqd 5814 . . . . . . . . 9 (𝜑 → dom (((𝑃𝑄) ∘ 𝑃) ∖ I ) = dom (((𝑃𝑄) ∘ 𝑃) ∖ I ))
115 f1omvdconj 19054 . . . . . . . . . 10 ((𝑄:𝐷𝐷𝑃:𝐷1-1-onto𝐷) → dom (((𝑃𝑄) ∘ 𝑃) ∖ I ) = (𝑃 “ dom (𝑄 ∖ I )))
11633, 18, 115syl2anc 584 . . . . . . . . 9 (𝜑 → dom (((𝑃𝑄) ∘ 𝑃) ∖ I ) = (𝑃 “ dom (𝑄 ∖ I )))
117114, 116eqtrd 2778 . . . . . . . 8 (𝜑 → dom (((𝑃𝑄) ∘ 𝑃) ∖ I ) = (𝑃 “ dom (𝑄 ∖ I )))
118117eleq2d 2824 . . . . . . 7 (𝜑 → (𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I ) ↔ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I ))))
119118ad2antrr 723 . . . . . 6 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → (𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I ) ↔ 𝐴 ∈ (𝑃 “ dom (𝑄 ∖ I ))))
120112, 119mtbird 325 . . . . 5 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → ¬ 𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I ))
121 coeq1 5766 . . . . . . . 8 (𝑟 = ((𝑃𝑄) ∘ 𝑃) → (𝑟𝑠) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑠))
122121eqeq2d 2749 . . . . . . 7 (𝑟 = ((𝑃𝑄) ∘ 𝑃) → ((𝑃𝑄) = (𝑟𝑠) ↔ (𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑠)))
123 difeq1 4050 . . . . . . . . . 10 (𝑟 = ((𝑃𝑄) ∘ 𝑃) → (𝑟 ∖ I ) = (((𝑃𝑄) ∘ 𝑃) ∖ I ))
124123dmeqd 5814 . . . . . . . . 9 (𝑟 = ((𝑃𝑄) ∘ 𝑃) → dom (𝑟 ∖ I ) = dom (((𝑃𝑄) ∘ 𝑃) ∖ I ))
125124eleq2d 2824 . . . . . . . 8 (𝑟 = ((𝑃𝑄) ∘ 𝑃) → (𝐴 ∈ dom (𝑟 ∖ I ) ↔ 𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I )))
126125notbid 318 . . . . . . 7 (𝑟 = ((𝑃𝑄) ∘ 𝑃) → (¬ 𝐴 ∈ dom (𝑟 ∖ I ) ↔ ¬ 𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I )))
127122, 1263anbi13d 1437 . . . . . 6 (𝑟 = ((𝑃𝑄) ∘ 𝑃) → (((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I )) ↔ ((𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I ))))
128 coeq2 5767 . . . . . . . 8 (𝑠 = 𝑃 → (((𝑃𝑄) ∘ 𝑃) ∘ 𝑠) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑃))
129128eqeq2d 2749 . . . . . . 7 (𝑠 = 𝑃 → ((𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑠) ↔ (𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑃)))
130 difeq1 4050 . . . . . . . . 9 (𝑠 = 𝑃 → (𝑠 ∖ I ) = (𝑃 ∖ I ))
131130dmeqd 5814 . . . . . . . 8 (𝑠 = 𝑃 → dom (𝑠 ∖ I ) = dom (𝑃 ∖ I ))
132131eleq2d 2824 . . . . . . 7 (𝑠 = 𝑃 → (𝐴 ∈ dom (𝑠 ∖ I ) ↔ 𝐴 ∈ dom (𝑃 ∖ I )))
133129, 1323anbi12d 1436 . . . . . 6 (𝑠 = 𝑃 → (((𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I )) ↔ ((𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑃) ∧ 𝐴 ∈ dom (𝑃 ∖ I ) ∧ ¬ 𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I ))))
134127, 133rspc2ev 3572 . . . . 5 ((((𝑃𝑄) ∘ 𝑃) ∈ 𝑇𝑃𝑇 ∧ ((𝑃𝑄) = (((𝑃𝑄) ∘ 𝑃) ∘ 𝑃) ∧ 𝐴 ∈ dom (𝑃 ∖ I ) ∧ ¬ 𝐴 ∈ dom (((𝑃𝑄) ∘ 𝑃) ∖ I ))) → ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I )))
13522, 23, 40, 42, 120, 134syl113anc 1381 . . . 4 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I )))
136135olcd 871 . . 3 (((𝜑𝐴 ∈ dom (𝑄 ∖ I )) ∧ 𝑃𝑄) → ((𝑃𝑄) = ( I ↾ 𝐷) ∨ ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I ))))
13711, 136pm2.61dane 3032 . 2 ((𝜑𝐴 ∈ dom (𝑄 ∖ I )) → ((𝑃𝑄) = ( I ↾ 𝐷) ∨ ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I ))))
1381adantr 481 . . . 4 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → 𝑄𝑇)
139 coass 6169 . . . . . . 7 ((𝑄𝑃) ∘ 𝑄) = (𝑄 ∘ (𝑃𝑄))
1402, 3pmtrfcnv 19072 . . . . . . . . . 10 (𝑄𝑇𝑄 = 𝑄)
1411, 140syl 17 . . . . . . . . 9 (𝜑𝑄 = 𝑄)
142141eqcomd 2744 . . . . . . . 8 (𝜑𝑄 = 𝑄)
143142coeq2d 5771 . . . . . . 7 (𝜑 → ((𝑄𝑃) ∘ 𝑄) = ((𝑄𝑃) ∘ 𝑄))
144139, 143eqtr3id 2792 . . . . . 6 (𝜑 → (𝑄 ∘ (𝑃𝑄)) = ((𝑄𝑃) ∘ 𝑄))
1452, 3pmtrfconj 19074 . . . . . . 7 ((𝑃𝑇𝑄:𝐷1-1-onto𝐷) → ((𝑄𝑃) ∘ 𝑄) ∈ 𝑇)
14612, 31, 145syl2anc 584 . . . . . 6 (𝜑 → ((𝑄𝑃) ∘ 𝑄) ∈ 𝑇)
147144, 146eqeltrd 2839 . . . . 5 (𝜑 → (𝑄 ∘ (𝑃𝑄)) ∈ 𝑇)
148147adantr 481 . . . 4 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → (𝑄 ∘ (𝑃𝑄)) ∈ 𝑇)
1495coeq1d 5770 . . . . . . 7 (𝜑 → ((𝑄𝑄) ∘ (𝑃𝑄)) = (( I ↾ 𝐷) ∘ (𝑃𝑄)))
150 fcoi2 6649 . . . . . . . 8 ((𝑃𝑄):𝐷𝐷 → (( I ↾ 𝐷) ∘ (𝑃𝑄)) = (𝑃𝑄))
15135, 150syl 17 . . . . . . 7 (𝜑 → (( I ↾ 𝐷) ∘ (𝑃𝑄)) = (𝑃𝑄))
152149, 151eqtr2d 2779 . . . . . 6 (𝜑 → (𝑃𝑄) = ((𝑄𝑄) ∘ (𝑃𝑄)))
153 coass 6169 . . . . . 6 ((𝑄𝑄) ∘ (𝑃𝑄)) = (𝑄 ∘ (𝑄 ∘ (𝑃𝑄)))
154152, 153eqtrdi 2794 . . . . 5 (𝜑 → (𝑃𝑄) = (𝑄 ∘ (𝑄 ∘ (𝑃𝑄))))
155154adantr 481 . . . 4 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → (𝑃𝑄) = (𝑄 ∘ (𝑄 ∘ (𝑃𝑄))))
156 f1ofn 6717 . . . . . . . . . 10 (𝑄:𝐷1-1-onto𝐷𝑄 Fn 𝐷)
15731, 156syl 17 . . . . . . . . 9 (𝜑𝑄 Fn 𝐷)
158 fnelnfp 7049 . . . . . . . . 9 ((𝑄 Fn 𝐷𝐴𝐷) → (𝐴 ∈ dom (𝑄 ∖ I ) ↔ (𝑄𝐴) ≠ 𝐴))
159157, 78, 158syl2anc 584 . . . . . . . 8 (𝜑 → (𝐴 ∈ dom (𝑄 ∖ I ) ↔ (𝑄𝐴) ≠ 𝐴))
160159necon2bbid 2987 . . . . . . 7 (𝜑 → ((𝑄𝐴) = 𝐴 ↔ ¬ 𝐴 ∈ dom (𝑄 ∖ I )))
161160biimpar 478 . . . . . 6 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → (𝑄𝐴) = 𝐴)
162 fnfvima 7109 . . . . . . . 8 ((𝑄 Fn 𝐷 ∧ dom (𝑃 ∖ I ) ⊆ 𝐷𝐴 ∈ dom (𝑃 ∖ I )) → (𝑄𝐴) ∈ (𝑄 “ dom (𝑃 ∖ I )))
163157, 77, 41, 162syl3anc 1370 . . . . . . 7 (𝜑 → (𝑄𝐴) ∈ (𝑄 “ dom (𝑃 ∖ I )))
164163adantr 481 . . . . . 6 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → (𝑄𝐴) ∈ (𝑄 “ dom (𝑃 ∖ I )))
165161, 164eqeltrrd 2840 . . . . 5 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → 𝐴 ∈ (𝑄 “ dom (𝑃 ∖ I )))
166144difeq1d 4056 . . . . . . . 8 (𝜑 → ((𝑄 ∘ (𝑃𝑄)) ∖ I ) = (((𝑄𝑃) ∘ 𝑄) ∖ I ))
167166dmeqd 5814 . . . . . . 7 (𝜑 → dom ((𝑄 ∘ (𝑃𝑄)) ∖ I ) = dom (((𝑄𝑃) ∘ 𝑄) ∖ I ))
168 f1omvdconj 19054 . . . . . . . 8 ((𝑃:𝐷𝐷𝑄:𝐷1-1-onto𝐷) → dom (((𝑄𝑃) ∘ 𝑄) ∖ I ) = (𝑄 “ dom (𝑃 ∖ I )))
16929, 31, 168syl2anc 584 . . . . . . 7 (𝜑 → dom (((𝑄𝑃) ∘ 𝑄) ∖ I ) = (𝑄 “ dom (𝑃 ∖ I )))
170167, 169eqtrd 2778 . . . . . 6 (𝜑 → dom ((𝑄 ∘ (𝑃𝑄)) ∖ I ) = (𝑄 “ dom (𝑃 ∖ I )))
171170adantr 481 . . . . 5 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → dom ((𝑄 ∘ (𝑃𝑄)) ∖ I ) = (𝑄 “ dom (𝑃 ∖ I )))
172165, 171eleqtrrd 2842 . . . 4 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → 𝐴 ∈ dom ((𝑄 ∘ (𝑃𝑄)) ∖ I ))
173 simpr 485 . . . 4 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → ¬ 𝐴 ∈ dom (𝑄 ∖ I ))
174 coeq1 5766 . . . . . . 7 (𝑟 = 𝑄 → (𝑟𝑠) = (𝑄𝑠))
175174eqeq2d 2749 . . . . . 6 (𝑟 = 𝑄 → ((𝑃𝑄) = (𝑟𝑠) ↔ (𝑃𝑄) = (𝑄𝑠)))
176 difeq1 4050 . . . . . . . . 9 (𝑟 = 𝑄 → (𝑟 ∖ I ) = (𝑄 ∖ I ))
177176dmeqd 5814 . . . . . . . 8 (𝑟 = 𝑄 → dom (𝑟 ∖ I ) = dom (𝑄 ∖ I ))
178177eleq2d 2824 . . . . . . 7 (𝑟 = 𝑄 → (𝐴 ∈ dom (𝑟 ∖ I ) ↔ 𝐴 ∈ dom (𝑄 ∖ I )))
179178notbid 318 . . . . . 6 (𝑟 = 𝑄 → (¬ 𝐴 ∈ dom (𝑟 ∖ I ) ↔ ¬ 𝐴 ∈ dom (𝑄 ∖ I )))
180175, 1793anbi13d 1437 . . . . 5 (𝑟 = 𝑄 → (((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I )) ↔ ((𝑃𝑄) = (𝑄𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I ))))
181 coeq2 5767 . . . . . . 7 (𝑠 = (𝑄 ∘ (𝑃𝑄)) → (𝑄𝑠) = (𝑄 ∘ (𝑄 ∘ (𝑃𝑄))))
182181eqeq2d 2749 . . . . . 6 (𝑠 = (𝑄 ∘ (𝑃𝑄)) → ((𝑃𝑄) = (𝑄𝑠) ↔ (𝑃𝑄) = (𝑄 ∘ (𝑄 ∘ (𝑃𝑄)))))
183 difeq1 4050 . . . . . . . 8 (𝑠 = (𝑄 ∘ (𝑃𝑄)) → (𝑠 ∖ I ) = ((𝑄 ∘ (𝑃𝑄)) ∖ I ))
184183dmeqd 5814 . . . . . . 7 (𝑠 = (𝑄 ∘ (𝑃𝑄)) → dom (𝑠 ∖ I ) = dom ((𝑄 ∘ (𝑃𝑄)) ∖ I ))
185184eleq2d 2824 . . . . . 6 (𝑠 = (𝑄 ∘ (𝑃𝑄)) → (𝐴 ∈ dom (𝑠 ∖ I ) ↔ 𝐴 ∈ dom ((𝑄 ∘ (𝑃𝑄)) ∖ I )))
186182, 1853anbi12d 1436 . . . . 5 (𝑠 = (𝑄 ∘ (𝑃𝑄)) → (((𝑃𝑄) = (𝑄𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) ↔ ((𝑃𝑄) = (𝑄 ∘ (𝑄 ∘ (𝑃𝑄))) ∧ 𝐴 ∈ dom ((𝑄 ∘ (𝑃𝑄)) ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I ))))
187180, 186rspc2ev 3572 . . . 4 ((𝑄𝑇 ∧ (𝑄 ∘ (𝑃𝑄)) ∈ 𝑇 ∧ ((𝑃𝑄) = (𝑄 ∘ (𝑄 ∘ (𝑃𝑄))) ∧ 𝐴 ∈ dom ((𝑄 ∘ (𝑃𝑄)) ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I ))) → ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I )))
188138, 148, 155, 172, 173, 187syl113anc 1381 . . 3 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I )))
189188olcd 871 . 2 ((𝜑 ∧ ¬ 𝐴 ∈ dom (𝑄 ∖ I )) → ((𝑃𝑄) = ( I ↾ 𝐷) ∨ ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I ))))
190137, 189pm2.61dan 810 1 (𝜑 → ((𝑃𝑄) = ( I ↾ 𝐷) ∨ ∃𝑟𝑇𝑠𝑇 ((𝑃𝑄) = (𝑟𝑠) ∧ 𝐴 ∈ dom (𝑠 ∖ I ) ∧ ¬ 𝐴 ∈ dom (𝑟 ∖ I ))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 396  wo 844  w3a 1086   = wceq 1539  wcel 2106  wne 2943  wrex 3065  Vcvv 3432  cdif 3884  wss 3887  ifcif 4459  {csn 4561  {cpr 4563   cuni 4839   class class class wbr 5074   I cid 5488  ccnv 5588  dom cdm 5589  ran crn 5590  cres 5591  cima 5592  ccom 5593   Fn wfn 6428  wf 6429  1-1-ontowf1o 6432  cfv 6433  ωcom 7712  2oc2o 8291  cen 8730  Fincfn 8733  pmTrspcpmtr 19049
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2709  ax-rep 5209  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7588
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-ral 3069  df-rex 3070  df-reu 3072  df-rab 3073  df-v 3434  df-sbc 3717  df-csb 3833  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-pss 3906  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4840  df-iun 4926  df-br 5075  df-opab 5137  df-mpt 5158  df-tr 5192  df-id 5489  df-eprel 5495  df-po 5503  df-so 5504  df-fr 5544  df-we 5546  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-ord 6269  df-on 6270  df-lim 6271  df-suc 6272  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-om 7713  df-1o 8297  df-2o 8298  df-er 8498  df-en 8734  df-dom 8735  df-sdom 8736  df-fin 8737  df-pmtr 19050
This theorem is referenced by:  psgnunilem2  19103
  Copyright terms: Public domain W3C validator