Theorem fpwwe 10159

Description: Given any function 𝐹 from the powerset of 𝐴 to 𝐴, canth2 8733 gives that the function is not injective, but we can say rather more than that. There is a unique well-ordered subset ⟨𝑋, (𝑊‘𝑋)⟩ which "agrees" with 𝐹 in the sense that each initial segment maps to its upper bound, and such that the entire set maps to an element of the set (so that it cannot be extended without losing the well-ordering). This theorem can be used to prove dfac8a 9543. Theorem 1.1 of [KanamoriPincus] p. 415. (Contributed by Mario Carneiro, 18-May-2015.) (Revised by AV, 20-Jul-2024.)

Hypotheses

Ref	Expression
fpwwe.1	⊢ 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦 ∈ 𝑥 (𝐹‘(◡𝑟 “ {𝑦})) = 𝑦))}
fpwwe.2	⊢ (𝜑 → 𝐴 ∈ 𝑉)
fpwwe.3	⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ dom card)) → (𝐹‘𝑥) ∈ 𝐴)
fpwwe.4	⊢ 𝑋 = ∪ dom 𝑊

Assertion

Ref	Expression
fpwwe	⊢ (𝜑 → ((𝑌𝑊𝑅 ∧ (𝐹‘𝑌) ∈ 𝑌) ↔ (𝑌 = 𝑋 ∧ 𝑅 = (𝑊‘𝑋))))

Distinct variable groups:   𝑥,𝑟,𝐴   𝑦,𝑟,𝐹,𝑥   𝜑,𝑟,𝑥,𝑦   𝑅,𝑟,𝑥,𝑦   𝑋,𝑟,𝑥,𝑦   𝑌,𝑟,𝑥,𝑦   𝑊,𝑟,𝑥,𝑦

Allowed substitution hints:   𝐴(𝑦)   𝑉(𝑥,𝑦,𝑟)

Proof of Theorem fpwwe

Dummy variable 𝑢 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-ov 7186	. . . . . 6 ⊢ (𝑌(𝐹 ∘ 1st )𝑅) = ((𝐹 ∘ 1st )‘⟨𝑌, 𝑅⟩)
2		fo1st 7747	. . . . . . . 8 ⊢ 1st :V–onto→V
3		fofn 6605	. . . . . . . 8 ⊢ (1st :V–onto→V → 1st Fn V)
4	2, 3	ax-mp 5	. . . . . . 7 ⊢ 1st Fn V
5		opex 5332	. . . . . . 7 ⊢ ⟨𝑌, 𝑅⟩ ∈ V
6		fvco2 6778	. . . . . . 7 ⊢ ((1st Fn V ∧ ⟨𝑌, 𝑅⟩ ∈ V) → ((𝐹 ∘ 1st )‘⟨𝑌, 𝑅⟩) = (𝐹‘(1st ‘⟨𝑌, 𝑅⟩)))
7	4, 5, 6	mp2an 692	. . . . . 6 ⊢ ((𝐹 ∘ 1st )‘⟨𝑌, 𝑅⟩) = (𝐹‘(1st ‘⟨𝑌, 𝑅⟩))
8	1, 7	eqtri 2762	. . . . 5 ⊢ (𝑌(𝐹 ∘ 1st )𝑅) = (𝐹‘(1st ‘⟨𝑌, 𝑅⟩))
9		fpwwe.1	. . . . . . . 8 ⊢ 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦 ∈ 𝑥 (𝐹‘(◡𝑟 “ {𝑦})) = 𝑦))}
10	9	bropaex12 5623	. . . . . . 7 ⊢ (𝑌𝑊𝑅 → (𝑌 ∈ V ∧ 𝑅 ∈ V))
11		op1stg 7739	. . . . . . 7 ⊢ ((𝑌 ∈ V ∧ 𝑅 ∈ V) → (1st ‘⟨𝑌, 𝑅⟩) = 𝑌)
12	10, 11	syl 17	. . . . . 6 ⊢ (𝑌𝑊𝑅 → (1st ‘⟨𝑌, 𝑅⟩) = 𝑌)
13	12	fveq2d 6691	. . . . 5 ⊢ (𝑌𝑊𝑅 → (𝐹‘(1st ‘⟨𝑌, 𝑅⟩)) = (𝐹‘𝑌))
14	8, 13	syl5eq 2786	. . . 4 ⊢ (𝑌𝑊𝑅 → (𝑌(𝐹 ∘ 1st )𝑅) = (𝐹‘𝑌))
15	14	eleq1d 2818	. . 3 ⊢ (𝑌𝑊𝑅 → ((𝑌(𝐹 ∘ 1st )𝑅) ∈ 𝑌 ↔ (𝐹‘𝑌) ∈ 𝑌))
16	15	pm5.32i 578	. 2 ⊢ ((𝑌𝑊𝑅 ∧ (𝑌(𝐹 ∘ 1st )𝑅) ∈ 𝑌) ↔ (𝑌𝑊𝑅 ∧ (𝐹‘𝑌) ∈ 𝑌))
17		vex 3404	. . . . . . . . . . 11 ⊢ 𝑟 ∈ V
18	17	cnvex 7669	. . . . . . . . . 10 ⊢ ◡𝑟 ∈ V
19	18	imaex 7660	. . . . . . . . 9 ⊢ (◡𝑟 “ {𝑦}) ∈ V
20		vex 3404	. . . . . . . . . . . 12 ⊢ 𝑢 ∈ V
21	17	inex1 5195	. . . . . . . . . . . 12 ⊢ (𝑟 ∩ (𝑢 × 𝑢)) ∈ V
22	20, 21	algrflem 7858	. . . . . . . . . . 11 ⊢ (𝑢(𝐹 ∘ 1st )(𝑟 ∩ (𝑢 × 𝑢))) = (𝐹‘𝑢)
23		fveq2 6687	. . . . . . . . . . 11 ⊢ (𝑢 = (◡𝑟 “ {𝑦}) → (𝐹‘𝑢) = (𝐹‘(◡𝑟 “ {𝑦})))
24	22, 23	syl5eq 2786	. . . . . . . . . 10 ⊢ (𝑢 = (◡𝑟 “ {𝑦}) → (𝑢(𝐹 ∘ 1st )(𝑟 ∩ (𝑢 × 𝑢))) = (𝐹‘(◡𝑟 “ {𝑦})))
25	24	eqeq1d 2741	. . . . . . . . 9 ⊢ (𝑢 = (◡𝑟 “ {𝑦}) → ((𝑢(𝐹 ∘ 1st )(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦 ↔ (𝐹‘(◡𝑟 “ {𝑦})) = 𝑦))
26	19, 25	sbcie 3728	. . . . . . . 8 ⊢ ([(◡𝑟 “ {𝑦}) / 𝑢](𝑢(𝐹 ∘ 1st )(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦 ↔ (𝐹‘(◡𝑟 “ {𝑦})) = 𝑦)
27	26	ralbii 3081	. . . . . . 7 ⊢ (∀𝑦 ∈ 𝑥 [(◡𝑟 “ {𝑦}) / 𝑢](𝑢(𝐹 ∘ 1st )(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦 ↔ ∀𝑦 ∈ 𝑥 (𝐹‘(◡𝑟 “ {𝑦})) = 𝑦)
28	27	anbi2i 626	. . . . . 6 ⊢ ((𝑟 We 𝑥 ∧ ∀𝑦 ∈ 𝑥 [(◡𝑟 “ {𝑦}) / 𝑢](𝑢(𝐹 ∘ 1st )(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦) ↔ (𝑟 We 𝑥 ∧ ∀𝑦 ∈ 𝑥 (𝐹‘(◡𝑟 “ {𝑦})) = 𝑦))
29	28	anbi2i 626	. . . . 5 ⊢ (((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦 ∈ 𝑥 [(◡𝑟 “ {𝑦}) / 𝑢](𝑢(𝐹 ∘ 1st )(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦)) ↔ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦 ∈ 𝑥 (𝐹‘(◡𝑟 “ {𝑦})) = 𝑦)))
30	29	opabbii 5107	. . . 4 ⊢ {⟨𝑥, 𝑟⟩ ∣ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦 ∈ 𝑥 [(◡𝑟 “ {𝑦}) / 𝑢](𝑢(𝐹 ∘ 1st )(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦))} = {⟨𝑥, 𝑟⟩ ∣ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦 ∈ 𝑥 (𝐹‘(◡𝑟 “ {𝑦})) = 𝑦))}
31	9, 30	eqtr4i 2765	. . 3 ⊢ 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦 ∈ 𝑥 [(◡𝑟 “ {𝑦}) / 𝑢](𝑢(𝐹 ∘ 1st )(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦))}
32		fpwwe.2	. . 3 ⊢ (𝜑 → 𝐴 ∈ 𝑉)
33		vex 3404	. . . . 5 ⊢ 𝑥 ∈ V
34	33, 17	algrflem 7858	. . . 4 ⊢ (𝑥(𝐹 ∘ 1st )𝑟) = (𝐹‘𝑥)
35		simp1 1137	. . . . . . 7 ⊢ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥) → 𝑥 ⊆ 𝐴)
36		velpw 4503	. . . . . . 7 ⊢ (𝑥 ∈ 𝒫 𝐴 ↔ 𝑥 ⊆ 𝐴)
37	35, 36	sylibr 237	. . . . . 6 ⊢ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥) → 𝑥 ∈ 𝒫 𝐴)
38		19.8a 2182	. . . . . . . 8 ⊢ (𝑟 We 𝑥 → ∃𝑟 𝑟 We 𝑥)
39	38	3ad2ant3 1136	. . . . . . 7 ⊢ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥) → ∃𝑟 𝑟 We 𝑥)
40		ween 9548	. . . . . . 7 ⊢ (𝑥 ∈ dom card ↔ ∃𝑟 𝑟 We 𝑥)
41	39, 40	sylibr 237	. . . . . 6 ⊢ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥) → 𝑥 ∈ dom card)
42	37, 41	elind 4094	. . . . 5 ⊢ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥) → 𝑥 ∈ (𝒫 𝐴 ∩ dom card))
43		fpwwe.3	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ dom card)) → (𝐹‘𝑥) ∈ 𝐴)
44	42, 43	sylan2 596	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥)) → (𝐹‘𝑥) ∈ 𝐴)
45	34, 44	eqeltrid 2838	. . 3 ⊢ ((𝜑 ∧ (𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥)) → (𝑥(𝐹 ∘ 1st )𝑟) ∈ 𝐴)
46		fpwwe.4	. . 3 ⊢ 𝑋 = ∪ dom 𝑊
47	31, 32, 45, 46	fpwwe2 10156	. 2 ⊢ (𝜑 → ((𝑌𝑊𝑅 ∧ (𝑌(𝐹 ∘ 1st )𝑅) ∈ 𝑌) ↔ (𝑌 = 𝑋 ∧ 𝑅 = (𝑊‘𝑋))))
48	16, 47	bitr3id 288	1 ⊢ (𝜑 → ((𝑌𝑊𝑅 ∧ (𝐹‘𝑌) ∈ 𝑌) ↔ (𝑌 = 𝑋 ∧ 𝑅 = (𝑊‘𝑋))))

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 399   ∧ w3a 1088   = wceq 1542  ∃wex 1786   ∈ wcel 2114  ∀wral 3054  Vcvv 3400  [wsbc 3685   ∩ cin 3852   ⊆ wss 3853  𝒫 cpw 4498  {csn 4526  ⟨cop 4532  ∪ cuni 4806   class class class wbr 5040  {copab 5102   We wwe 5492   × cxp 5533  ^◡ccnv 5534  dom cdm 5535   “ cima 5538   ∘ ccom 5539   Fn wfn 6345  –onto→wfo 6348  ‘cfv 6350  (class class class)co 7183  1^st c1st 7725  cardccrd 9450

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1975  ax-7 2020  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2162  ax-12 2179  ax-ext 2711  ax-rep 5164  ax-sep 5177  ax-nul 5184  ax-pow 5242  ax-pr 5306  ax-un 7492

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1787  df-nf 1791  df-sb 2075  df-mo 2541  df-eu 2571  df-clab 2718  df-cleq 2731  df-clel 2812  df-nfc 2882  df-ne 2936  df-ral 3059  df-rex 3060  df-reu 3061  df-rmo 3062  df-rab 3063  df-v 3402  df-sbc 3686  df-csb 3801  df-dif 3856  df-un 3858  df-in 3860  df-ss 3870  df-pss 3872  df-nul 4222  df-if 4425  df-pw 4500  df-sn 4527  df-pr 4529  df-tp 4531  df-op 4533  df-uni 4807  df-int 4847  df-iun 4893  df-br 5041  df-opab 5103  df-mpt 5121  df-tr 5147  df-id 5439  df-eprel 5444  df-po 5452  df-so 5453  df-fr 5493  df-se 5494  df-we 5495  df-xp 5541  df-rel 5542  df-cnv 5543  df-co 5544  df-dm 5545  df-rn 5546  df-res 5547  df-ima 5548  df-pred 6139  df-ord 6186  df-on 6187  df-lim 6188  df-suc 6189  df-iota 6308  df-fun 6352  df-fn 6353  df-f 6354  df-f1 6355  df-fo 6356  df-f1o 6357  df-fv 6358  df-isom 6359  df-riota 7140  df-ov 7186  df-1st 7727  df-wrecs 7989  df-recs 8050  df-en 8569  df-oi 9060  df-card 9454

This theorem is referenced by:  canth4  10160  canthnumlem  10161  canthp1lem2  10166