Theorem pmtrfv 18222

Description: General value of mapping a point under a transposition. (Contributed by Stefan O'Rear, 16-Aug-2015.)

Hypothesis

Ref	Expression
pmtrfval.t	⊢ 𝑇 = (pmTrsp‘𝐷)

Assertion

Ref	Expression
pmtrfv	⊢ (((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) ∧ 𝑍 ∈ 𝐷) → ((𝑇‘𝑃)‘𝑍) = if(𝑍 ∈ 𝑃, ∪ (𝑃 ∖ {𝑍}), 𝑍))

Proof of Theorem pmtrfv

Dummy variable 𝑧 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		pmtrfval.t	. . . . 5 ⊢ 𝑇 = (pmTrsp‘𝐷)
2	1	pmtrval 18221	. . . 4 ⊢ ((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) → (𝑇‘𝑃) = (𝑧 ∈ 𝐷 ↦ if(𝑧 ∈ 𝑃, ∪ (𝑃 ∖ {𝑧}), 𝑧)))
3	2	fveq1d 6435	. . 3 ⊢ ((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) → ((𝑇‘𝑃)‘𝑍) = ((𝑧 ∈ 𝐷 ↦ if(𝑧 ∈ 𝑃, ∪ (𝑃 ∖ {𝑧}), 𝑧))‘𝑍))
4	3	adantr 474	. 2 ⊢ (((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) ∧ 𝑍 ∈ 𝐷) → ((𝑇‘𝑃)‘𝑍) = ((𝑧 ∈ 𝐷 ↦ if(𝑧 ∈ 𝑃, ∪ (𝑃 ∖ {𝑧}), 𝑧))‘𝑍))
5		eqid 2825	. . 3 ⊢ (𝑧 ∈ 𝐷 ↦ if(𝑧 ∈ 𝑃, ∪ (𝑃 ∖ {𝑧}), 𝑧)) = (𝑧 ∈ 𝐷 ↦ if(𝑧 ∈ 𝑃, ∪ (𝑃 ∖ {𝑧}), 𝑧))
6		eleq1 2894	. . . 4 ⊢ (𝑧 = 𝑍 → (𝑧 ∈ 𝑃 ↔ 𝑍 ∈ 𝑃))
7		sneq 4407	. . . . . 6 ⊢ (𝑧 = 𝑍 → {𝑧} = {𝑍})
8	7	difeq2d 3955	. . . . 5 ⊢ (𝑧 = 𝑍 → (𝑃 ∖ {𝑧}) = (𝑃 ∖ {𝑍}))
9	8	unieqd 4668	. . . 4 ⊢ (𝑧 = 𝑍 → ∪ (𝑃 ∖ {𝑧}) = ∪ (𝑃 ∖ {𝑍}))
10		id 22	. . . 4 ⊢ (𝑧 = 𝑍 → 𝑧 = 𝑍)
11	6, 9, 10	ifbieq12d 4333	. . 3 ⊢ (𝑧 = 𝑍 → if(𝑧 ∈ 𝑃, ∪ (𝑃 ∖ {𝑧}), 𝑧) = if(𝑍 ∈ 𝑃, ∪ (𝑃 ∖ {𝑍}), 𝑍))
12		simpr 479	. . 3 ⊢ (((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) ∧ 𝑍 ∈ 𝐷) → 𝑍 ∈ 𝐷)
13		simpl3 1252	. . . . 5 ⊢ (((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) ∧ 𝑍 ∈ 𝐷) → 𝑃 ≈ 2o)
14		relen 8227	. . . . . 6 ⊢ Rel ≈
15	14	brrelex1i 5393	. . . . 5 ⊢ (𝑃 ≈ 2o → 𝑃 ∈ V)
16		difexg 5033	. . . . 5 ⊢ (𝑃 ∈ V → (𝑃 ∖ {𝑍}) ∈ V)
17		uniexg 7215	. . . . 5 ⊢ ((𝑃 ∖ {𝑍}) ∈ V → ∪ (𝑃 ∖ {𝑍}) ∈ V)
18	13, 15, 16, 17	4syl 19	. . . 4 ⊢ (((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) ∧ 𝑍 ∈ 𝐷) → ∪ (𝑃 ∖ {𝑍}) ∈ V)
19		ifexg 4353	. . . 4 ⊢ ((∪ (𝑃 ∖ {𝑍}) ∈ V ∧ 𝑍 ∈ 𝐷) → if(𝑍 ∈ 𝑃, ∪ (𝑃 ∖ {𝑍}), 𝑍) ∈ V)
20	18, 12, 19	syl2anc 581	. . 3 ⊢ (((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) ∧ 𝑍 ∈ 𝐷) → if(𝑍 ∈ 𝑃, ∪ (𝑃 ∖ {𝑍}), 𝑍) ∈ V)
21	5, 11, 12, 20	fvmptd3 6550	. 2 ⊢ (((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) ∧ 𝑍 ∈ 𝐷) → ((𝑧 ∈ 𝐷 ↦ if(𝑧 ∈ 𝑃, ∪ (𝑃 ∖ {𝑧}), 𝑧))‘𝑍) = if(𝑍 ∈ 𝑃, ∪ (𝑃 ∖ {𝑍}), 𝑍))
22	4, 21	eqtrd 2861	1 ⊢ (((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) ∧ 𝑍 ∈ 𝐷) → ((𝑇‘𝑃)‘𝑍) = if(𝑍 ∈ 𝑃, ∪ (𝑃 ∖ {𝑍}), 𝑍))

Syntax hints:   → wi 4   ∧ wa 386   ∧ w3a 1113   = wceq 1658   ∈ wcel 2166  Vcvv 3414   ∖ cdif 3795   ⊆ wss 3798  ifcif 4306  {csn 4397  ∪ cuni 4658   class class class wbr 4873   ↦ cmpt 4952  ‘cfv 6123  2_oc2o 7820   ≈ cen 8219  pmTrspcpmtr 18211

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1896  ax-4 1910  ax-5 2011  ax-6 2077  ax-7 2114  ax-8 2168  ax-9 2175  ax-10 2194  ax-11 2209  ax-12 2222  ax-13 2391  ax-ext 2803  ax-rep 4994  ax-sep 5005  ax-nul 5013  ax-pow 5065  ax-pr 5127  ax-un 7209

This theorem depends on definitions:  df-bi 199  df-an 387  df-or 881  df-3an 1115  df-tru 1662  df-ex 1881  df-nf 1885  df-sb 2070  df-mo 2605  df-eu 2640  df-clab 2812  df-cleq 2818  df-clel 2821  df-nfc 2958  df-ne 3000  df-ral 3122  df-rex 3123  df-reu 3124  df-rab 3126  df-v 3416  df-sbc 3663  df-csb 3758  df-dif 3801  df-un 3803  df-in 3805  df-ss 3812  df-nul 4145  df-if 4307  df-pw 4380  df-sn 4398  df-pr 4400  df-op 4404  df-uni 4659  df-iun 4742  df-br 4874  df-opab 4936  df-mpt 4953  df-id 5250  df-xp 5348  df-rel 5349  df-cnv 5350  df-co 5351  df-dm 5352  df-rn 5353  df-res 5354  df-ima 5355  df-iota 6086  df-fun 6125  df-fn 6126  df-f 6127  df-f1 6128  df-fo 6129  df-f1o 6130  df-fv 6131  df-en 8223  df-pmtr 18212

This theorem is referenced by:  pmtrprfv  18223  pmtrprfv3  18224  pmtrmvd  18226  pmtrffv  18229