Theorem pmtrfv 19510

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 19509	. . . 4 ⊢ ((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) → (𝑇‘𝑃) = (𝑧 ∈ 𝐷 ↦ if(𝑧 ∈ 𝑃, ∪ (𝑃 ∖ {𝑧}), 𝑧)))
3	2	fveq1d 6873	. . 3 ⊢ ((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) → ((𝑇‘𝑃)‘𝑍) = ((𝑧 ∈ 𝐷 ↦ if(𝑧 ∈ 𝑃, ∪ (𝑃 ∖ {𝑧}), 𝑧))‘𝑍))
4	3	adantr 485	. 2 ⊢ (((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) ∧ 𝑍 ∈ 𝐷) → ((𝑇‘𝑃)‘𝑍) = ((𝑧 ∈ 𝐷 ↦ if(𝑧 ∈ 𝑃, ∪ (𝑃 ∖ {𝑧}), 𝑧))‘𝑍))
5		eqid 2765	. . 3 ⊢ (𝑧 ∈ 𝐷 ↦ if(𝑧 ∈ 𝑃, ∪ (𝑃 ∖ {𝑧}), 𝑧)) = (𝑧 ∈ 𝐷 ↦ if(𝑧 ∈ 𝑃, ∪ (𝑃 ∖ {𝑧}), 𝑧))
6		eleq1 2853	. . . 4 ⊢ (𝑧 = 𝑍 → (𝑧 ∈ 𝑃 ↔ 𝑍 ∈ 𝑃))
7		sneq 4595	. . . . . 6 ⊢ (𝑧 = 𝑍 → {𝑧} = {𝑍})
8	7	difeq2d 4083	. . . . 5 ⊢ (𝑧 = 𝑍 → (𝑃 ∖ {𝑧}) = (𝑃 ∖ {𝑍}))
9	8	unieqd 4880	. . . 4 ⊢ (𝑧 = 𝑍 → ∪ (𝑃 ∖ {𝑧}) = ∪ (𝑃 ∖ {𝑍}))
10		id 23	. . . 4 ⊢ (𝑧 = 𝑍 → 𝑧 = 𝑍)
11	6, 9, 10	ifbieq12d 4512	. . 3 ⊢ (𝑧 = 𝑍 → if(𝑧 ∈ 𝑃, ∪ (𝑃 ∖ {𝑧}), 𝑧) = if(𝑍 ∈ 𝑃, ∪ (𝑃 ∖ {𝑍}), 𝑍))
12		simpr 489	. . 3 ⊢ (((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) ∧ 𝑍 ∈ 𝐷) → 𝑍 ∈ 𝐷)
13		simpl3 1210	. . . . 5 ⊢ (((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) ∧ 𝑍 ∈ 𝐷) → 𝑃 ≈ 2o)
14		relen 8936	. . . . . 6 ⊢ Rel ≈
15	14	brrelex1i 5707	. . . . 5 ⊢ (𝑃 ≈ 2o → 𝑃 ∈ V)
16		difexg 5289	. . . . 5 ⊢ (𝑃 ∈ V → (𝑃 ∖ {𝑍}) ∈ V)
17		uniexg 7727	. . . . 5 ⊢ ((𝑃 ∖ {𝑍}) ∈ V → ∪ (𝑃 ∖ {𝑍}) ∈ V)
18	13, 15, 16, 17	4syl 20	. . . 4 ⊢ (((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) ∧ 𝑍 ∈ 𝐷) → ∪ (𝑃 ∖ {𝑍}) ∈ V)
19		ifexg 4533	. . . 4 ⊢ ((∪ (𝑃 ∖ {𝑍}) ∈ V ∧ 𝑍 ∈ 𝐷) → if(𝑍 ∈ 𝑃, ∪ (𝑃 ∖ {𝑍}), 𝑍) ∈ V)
20	18, 19	sylancom 599	. . 3 ⊢ (((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) ∧ 𝑍 ∈ 𝐷) → if(𝑍 ∈ 𝑃, ∪ (𝑃 ∖ {𝑍}), 𝑍) ∈ V)
21	5, 11, 12, 20	fvmptd3 7003	. 2 ⊢ (((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) ∧ 𝑍 ∈ 𝐷) → ((𝑧 ∈ 𝐷 ↦ if(𝑧 ∈ 𝑃, ∪ (𝑃 ∖ {𝑧}), 𝑧))‘𝑍) = if(𝑍 ∈ 𝑃, ∪ (𝑃 ∖ {𝑍}), 𝑍))
22	4, 21	eqtrd 2800	1 ⊢ (((𝐷 ∈ 𝑉 ∧ 𝑃 ⊆ 𝐷 ∧ 𝑃 ≈ 2o) ∧ 𝑍 ∈ 𝐷) → ((𝑇‘𝑃)‘𝑍) = if(𝑍 ∈ 𝑃, ∪ (𝑃 ∖ {𝑍}), 𝑍))

Syntax hints:   → wi 4   ∧ wa 400   ∧ w3a 1101   = wceq 1563   ∈ wcel 2145  Vcvv 3457   ∖ cdif 3904   ⊆ wss 3907  ifcif 4483  {csn 4585  ∪ cuni 4867   class class class wbr 5104   ↦ cmpt 5185  ‘cfv 6525  2_oc2o 8435   ≈ cen 8928  pmTrspcpmtr 19499

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-rep 5231  ax-sep 5250  ax-nul 5260  ax-pow 5326  ax-pr 5394  ax-un 7722

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-ral 3080  df-rex 3090  df-reu 3371  df-rab 3418  df-v 3459  df-sbc 3748  df-csb 3856  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4868  df-iun 4953  df-br 5105  df-opab 5167  df-mpt 5186  df-id 5546  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-iota 6481  df-fun 6527  df-fn 6528  df-f 6529  df-f1 6530  df-fo 6531  df-f1o 6532  df-fv 6533  df-en 8932  df-pmtr 19500

This theorem is referenced by:  pmtrprfv  19511  pmtrprfv3  19512  pmtrmvd  19514  pmtrffv  19517