Theorem riotass 5757

Description: Restriction of a unique element to a smaller class. (Contributed by NM, 19-Oct-2005.) (Revised by Mario Carneiro, 24-Dec-2016.)

Assertion

Ref	Expression
riotass	⊢ ((𝐴 ⊆ 𝐵 ∧ ∃𝑥 ∈ 𝐴 𝜑 ∧ ∃!𝑥 ∈ 𝐵 𝜑) → (℩𝑥 ∈ 𝐴 𝜑) = (℩𝑥 ∈ 𝐵 𝜑))

Distinct variable groups:   𝑥,𝐴   𝑥,𝐵

Allowed substitution hint:   𝜑(𝑥)

Proof of Theorem riotass

Step	Hyp	Ref	Expression
1		reuss 3357	. . . 4 ⊢ ((𝐴 ⊆ 𝐵 ∧ ∃𝑥 ∈ 𝐴 𝜑 ∧ ∃!𝑥 ∈ 𝐵 𝜑) → ∃!𝑥 ∈ 𝐴 𝜑)
2		riotasbc 5745	. . . 4 ⊢ (∃!𝑥 ∈ 𝐴 𝜑 → [(℩𝑥 ∈ 𝐴 𝜑) / 𝑥]𝜑)
3	1, 2	syl 14	. . 3 ⊢ ((𝐴 ⊆ 𝐵 ∧ ∃𝑥 ∈ 𝐴 𝜑 ∧ ∃!𝑥 ∈ 𝐵 𝜑) → [(℩𝑥 ∈ 𝐴 𝜑) / 𝑥]𝜑)
4		simp1 981	. . . . 5 ⊢ ((𝐴 ⊆ 𝐵 ∧ ∃𝑥 ∈ 𝐴 𝜑 ∧ ∃!𝑥 ∈ 𝐵 𝜑) → 𝐴 ⊆ 𝐵)
5		riotacl 5744	. . . . . 6 ⊢ (∃!𝑥 ∈ 𝐴 𝜑 → (℩𝑥 ∈ 𝐴 𝜑) ∈ 𝐴)
6	1, 5	syl 14	. . . . 5 ⊢ ((𝐴 ⊆ 𝐵 ∧ ∃𝑥 ∈ 𝐴 𝜑 ∧ ∃!𝑥 ∈ 𝐵 𝜑) → (℩𝑥 ∈ 𝐴 𝜑) ∈ 𝐴)
7	4, 6	sseldd 3098	. . . 4 ⊢ ((𝐴 ⊆ 𝐵 ∧ ∃𝑥 ∈ 𝐴 𝜑 ∧ ∃!𝑥 ∈ 𝐵 𝜑) → (℩𝑥 ∈ 𝐴 𝜑) ∈ 𝐵)
8		simp3 983	. . . 4 ⊢ ((𝐴 ⊆ 𝐵 ∧ ∃𝑥 ∈ 𝐴 𝜑 ∧ ∃!𝑥 ∈ 𝐵 𝜑) → ∃!𝑥 ∈ 𝐵 𝜑)
9		nfriota1 5737	. . . . 5 ⊢ Ⅎ𝑥(℩𝑥 ∈ 𝐴 𝜑)
10	9	nfsbc1 2926	. . . . 5 ⊢ Ⅎ𝑥[(℩𝑥 ∈ 𝐴 𝜑) / 𝑥]𝜑
11		sbceq1a 2918	. . . . 5 ⊢ (𝑥 = (℩𝑥 ∈ 𝐴 𝜑) → (𝜑 ↔ [(℩𝑥 ∈ 𝐴 𝜑) / 𝑥]𝜑))
12	9, 10, 11	riota2f 5751	. . . 4 ⊢ (((℩𝑥 ∈ 𝐴 𝜑) ∈ 𝐵 ∧ ∃!𝑥 ∈ 𝐵 𝜑) → ([(℩𝑥 ∈ 𝐴 𝜑) / 𝑥]𝜑 ↔ (℩𝑥 ∈ 𝐵 𝜑) = (℩𝑥 ∈ 𝐴 𝜑)))
13	7, 8, 12	syl2anc 408	. . 3 ⊢ ((𝐴 ⊆ 𝐵 ∧ ∃𝑥 ∈ 𝐴 𝜑 ∧ ∃!𝑥 ∈ 𝐵 𝜑) → ([(℩𝑥 ∈ 𝐴 𝜑) / 𝑥]𝜑 ↔ (℩𝑥 ∈ 𝐵 𝜑) = (℩𝑥 ∈ 𝐴 𝜑)))
14	3, 13	mpbid 146	. 2 ⊢ ((𝐴 ⊆ 𝐵 ∧ ∃𝑥 ∈ 𝐴 𝜑 ∧ ∃!𝑥 ∈ 𝐵 𝜑) → (℩𝑥 ∈ 𝐵 𝜑) = (℩𝑥 ∈ 𝐴 𝜑))
15	14	eqcomd 2145	1 ⊢ ((𝐴 ⊆ 𝐵 ∧ ∃𝑥 ∈ 𝐴 𝜑 ∧ ∃!𝑥 ∈ 𝐵 𝜑) → (℩𝑥 ∈ 𝐴 𝜑) = (℩𝑥 ∈ 𝐵 𝜑))

Syntax hints:   → wi 4   ↔ wb 104   ∧ w3a 962   = wceq 1331   ∈ wcel 1480  ∃wrex 2417  ∃!wreu 2418  [wsbc 2909   ⊆ wss 3071  ℩crio 5729

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-io 698  ax-5 1423  ax-7 1424  ax-gen 1425  ax-ie1 1469  ax-ie2 1470  ax-8 1482  ax-10 1483  ax-11 1484  ax-i12 1485  ax-bndl 1486  ax-4 1487  ax-17 1506  ax-i9 1510  ax-ial 1514  ax-i5r 1515  ax-ext 2121

This theorem depends on definitions:  df-bi 116  df-3an 964  df-tru 1334  df-nf 1437  df-sb 1736  df-eu 2002  df-mo 2003  df-clab 2126  df-cleq 2132  df-clel 2135  df-nfc 2270  df-ral 2421  df-rex 2422  df-reu 2423  df-rab 2425  df-v 2688  df-sbc 2910  df-un 3075  df-in 3077  df-ss 3084  df-sn 3533  df-pr 3534  df-uni 3737  df-iota 5088  df-riota 5730

This theorem is referenced by:  moriotass  5758