Theorem fpr 6909

Description: A function with a domain of two elements. (Contributed by Jeff Madsen, 20-Jun-2010.) (Proof shortened by Andrew Salmon, 22-Oct-2011.)

Hypotheses

Ref	Expression
fpr.1	⊢ 𝐴 ∈ V
fpr.2	⊢ 𝐵 ∈ V
fpr.3	⊢ 𝐶 ∈ V
fpr.4	⊢ 𝐷 ∈ V

Assertion

Ref	Expression
fpr	⊢ (𝐴 ≠ 𝐵 → {⟨𝐴, 𝐶⟩, ⟨𝐵, 𝐷⟩}:{𝐴, 𝐵}⟶{𝐶, 𝐷})

Proof of Theorem fpr

Step	Hyp	Ref	Expression
1		fpr.1	. . . 4 ⊢ 𝐴 ∈ V
2		fpr.2	. . . 4 ⊢ 𝐵 ∈ V
3		fpr.3	. . . 4 ⊢ 𝐶 ∈ V
4		fpr.4	. . . 4 ⊢ 𝐷 ∈ V
5	1, 2, 3, 4	funpr 6403	. . 3 ⊢ (𝐴 ≠ 𝐵 → Fun {⟨𝐴, 𝐶⟩, ⟨𝐵, 𝐷⟩})
6	3, 4	dmprop 6067	. . 3 ⊢ dom {⟨𝐴, 𝐶⟩, ⟨𝐵, 𝐷⟩} = {𝐴, 𝐵}
7		df-fn 6351	. . 3 ⊢ ({⟨𝐴, 𝐶⟩, ⟨𝐵, 𝐷⟩} Fn {𝐴, 𝐵} ↔ (Fun {⟨𝐴, 𝐶⟩, ⟨𝐵, 𝐷⟩} ∧ dom {⟨𝐴, 𝐶⟩, ⟨𝐵, 𝐷⟩} = {𝐴, 𝐵}))
8	5, 6, 7	sylanblrc 592	. 2 ⊢ (𝐴 ≠ 𝐵 → {⟨𝐴, 𝐶⟩, ⟨𝐵, 𝐷⟩} Fn {𝐴, 𝐵})
9		df-pr 4562	. . . . 5 ⊢ {⟨𝐴, 𝐶⟩, ⟨𝐵, 𝐷⟩} = ({⟨𝐴, 𝐶⟩} ∪ {⟨𝐵, 𝐷⟩})
10	9	rneqi 5800	. . . 4 ⊢ ran {⟨𝐴, 𝐶⟩, ⟨𝐵, 𝐷⟩} = ran ({⟨𝐴, 𝐶⟩} ∪ {⟨𝐵, 𝐷⟩})
11		rnun 5997	. . . 4 ⊢ ran ({⟨𝐴, 𝐶⟩} ∪ {⟨𝐵, 𝐷⟩}) = (ran {⟨𝐴, 𝐶⟩} ∪ ran {⟨𝐵, 𝐷⟩})
12	1	rnsnop 6074	. . . . . 6 ⊢ ran {⟨𝐴, 𝐶⟩} = {𝐶}
13	2	rnsnop 6074	. . . . . 6 ⊢ ran {⟨𝐵, 𝐷⟩} = {𝐷}
14	12, 13	uneq12i 4135	. . . . 5 ⊢ (ran {⟨𝐴, 𝐶⟩} ∪ ran {⟨𝐵, 𝐷⟩}) = ({𝐶} ∪ {𝐷})
15		df-pr 4562	. . . . 5 ⊢ {𝐶, 𝐷} = ({𝐶} ∪ {𝐷})
16	14, 15	eqtr4i 2845	. . . 4 ⊢ (ran {⟨𝐴, 𝐶⟩} ∪ ran {⟨𝐵, 𝐷⟩}) = {𝐶, 𝐷}
17	10, 11, 16	3eqtri 2846	. . 3 ⊢ ran {⟨𝐴, 𝐶⟩, ⟨𝐵, 𝐷⟩} = {𝐶, 𝐷}
18	17	eqimssi 4023	. 2 ⊢ ran {⟨𝐴, 𝐶⟩, ⟨𝐵, 𝐷⟩} ⊆ {𝐶, 𝐷}
19		df-f 6352	. 2 ⊢ ({⟨𝐴, 𝐶⟩, ⟨𝐵, 𝐷⟩}:{𝐴, 𝐵}⟶{𝐶, 𝐷} ↔ ({⟨𝐴, 𝐶⟩, ⟨𝐵, 𝐷⟩} Fn {𝐴, 𝐵} ∧ ran {⟨𝐴, 𝐶⟩, ⟨𝐵, 𝐷⟩} ⊆ {𝐶, 𝐷}))
20	8, 18, 19	sylanblrc 592	1 ⊢ (𝐴 ≠ 𝐵 → {⟨𝐴, 𝐶⟩, ⟨𝐵, 𝐷⟩}:{𝐴, 𝐵}⟶{𝐶, 𝐷})

Syntax hints:   → wi 4   = wceq 1530   ∈ wcel 2107   ≠ wne 3014  Vcvv 3493   ∪ cun 3932   ⊆ wss 3934  {csn 4559  {cpr 4561  ⟨cop 4565  dom cdm 5548  ran crn 5549  Fun wfun 6342   Fn wfn 6343  ⟶wf 6344

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1904  ax-6 1963  ax-7 2008  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2153  ax-12 2169  ax-ext 2791  ax-sep 5194  ax-nul 5201  ax-pr 5320

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1083  df-tru 1533  df-ex 1774  df-nf 1778  df-sb 2063  df-mo 2616  df-eu 2648  df-clab 2798  df-cleq 2812  df-clel 2891  df-nfc 2961  df-ne 3015  df-ral 3141  df-rex 3142  df-rab 3145  df-v 3495  df-dif 3937  df-un 3939  df-in 3941  df-ss 3950  df-nul 4290  df-if 4466  df-sn 4560  df-pr 4562  df-op 4566  df-br 5058  df-opab 5120  df-id 5453  df-xp 5554  df-rel 5555  df-cnv 5556  df-co 5557  df-dm 5558  df-rn 5559  df-fun 6350  df-fn 6351  df-f 6352

This theorem is referenced by:  fprg  6910  fprb  6949  1sdom  8713  axlowdimlem4  26723  coinfliprv  31733  poimirlem22  34906  nnsum3primes4  43943  nnsum3primesgbe  43947