Mathbox for Scott Fenton < Previous   Next > Nearby theorems Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  madeval2 Structured version   Visualization version   GIF version

 Description: Alternative characterization of the made by function. (Contributed by Scott Fenton, 17-Dec-2021.)
Assertion
Ref Expression
madeval2 (𝐴 ∈ On → ( M ‘𝐴) = {𝑥 No ∣ ∃𝑎 ∈ 𝒫 ( M “ 𝐴)∃𝑏 ∈ 𝒫 ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥)})
Distinct variable group:   𝑥,𝐴,𝑎,𝑏

Proof of Theorem madeval2
Dummy variable 𝑦 is distinct from all other variables.
StepHypRef Expression
1 madeval 32899 . 2 (𝐴 ∈ On → ( M ‘𝐴) = ( |s “ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴))))
2 scutcut 32876 . . . . . . . . 9 (𝑎 <<s 𝑏 → ((𝑎 |s 𝑏) ∈ No 𝑎 <<s {(𝑎 |s 𝑏)} ∧ {(𝑎 |s 𝑏)} <<s 𝑏))
32simp1d 1135 . . . . . . . 8 (𝑎 <<s 𝑏 → (𝑎 |s 𝑏) ∈ No )
4 eleq1 2870 . . . . . . . . 9 ((𝑎 |s 𝑏) = 𝑥 → ((𝑎 |s 𝑏) ∈ No 𝑥 No ))
54biimpd 230 . . . . . . . 8 ((𝑎 |s 𝑏) = 𝑥 → ((𝑎 |s 𝑏) ∈ No 𝑥 No ))
63, 5mpan9 507 . . . . . . 7 ((𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥) → 𝑥 No )
76rexlimivw 3245 . . . . . 6 (∃𝑏 ∈ 𝒫 ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥) → 𝑥 No )
87rexlimivw 3245 . . . . 5 (∃𝑎 ∈ 𝒫 ( M “ 𝐴)∃𝑏 ∈ 𝒫 ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥) → 𝑥 No )
98pm4.71ri 561 . . . 4 (∃𝑎 ∈ 𝒫 ( M “ 𝐴)∃𝑏 ∈ 𝒫 ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥) ↔ (𝑥 No ∧ ∃𝑎 ∈ 𝒫 ( M “ 𝐴)∃𝑏 ∈ 𝒫 ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥)))
109abbii 2861 . . 3 {𝑥 ∣ ∃𝑎 ∈ 𝒫 ( M “ 𝐴)∃𝑏 ∈ 𝒫 ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥)} = {𝑥 ∣ (𝑥 No ∧ ∃𝑎 ∈ 𝒫 ( M “ 𝐴)∃𝑏 ∈ 𝒫 ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥))}
11 eleq1 2870 . . . . . . 7 (𝑦 = ⟨𝑎, 𝑏⟩ → (𝑦 ∈ <<s ↔ ⟨𝑎, 𝑏⟩ ∈ <<s ))
12 breq1 4965 . . . . . . 7 (𝑦 = ⟨𝑎, 𝑏⟩ → (𝑦 |s 𝑥 ↔ ⟨𝑎, 𝑏⟩ |s 𝑥))
1311, 12anbi12d 630 . . . . . 6 (𝑦 = ⟨𝑎, 𝑏⟩ → ((𝑦 ∈ <<s ∧ 𝑦 |s 𝑥) ↔ (⟨𝑎, 𝑏⟩ ∈ <<s ∧ ⟨𝑎, 𝑏⟩ |s 𝑥)))
1413rexxp 5599 . . . . 5 (∃𝑦 ∈ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴))(𝑦 ∈ <<s ∧ 𝑦 |s 𝑥) ↔ ∃𝑎 ∈ 𝒫 ( M “ 𝐴)∃𝑏 ∈ 𝒫 ( M “ 𝐴)(⟨𝑎, 𝑏⟩ ∈ <<s ∧ ⟨𝑎, 𝑏⟩ |s 𝑥))
15 imaindm 32631 . . . . . . . 8 ( |s “ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴))) = ( |s “ ((𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∩ dom |s ))
16 dmscut 32882 . . . . . . . . . 10 dom |s = <<s
1716ineq2i 4106 . . . . . . . . 9 ((𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∩ dom |s ) = ((𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∩ <<s )
1817imaeq2i 5804 . . . . . . . 8 ( |s “ ((𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∩ dom |s )) = ( |s “ ((𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∩ <<s ))
1915, 18eqtri 2819 . . . . . . 7 ( |s “ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴))) = ( |s “ ((𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∩ <<s ))
2019eleq2i 2874 . . . . . 6 (𝑥 ∈ ( |s “ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴))) ↔ 𝑥 ∈ ( |s “ ((𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∩ <<s )))
21 vex 3440 . . . . . . 7 𝑥 ∈ V
2221elima 5811 . . . . . 6 (𝑥 ∈ ( |s “ ((𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∩ <<s )) ↔ ∃𝑦 ∈ ((𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∩ <<s )𝑦 |s 𝑥)
23 elin 4090 . . . . . . . . 9 (𝑦 ∈ ((𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∩ <<s ) ↔ (𝑦 ∈ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∧ 𝑦 ∈ <<s ))
2423anbi1i 623 . . . . . . . 8 ((𝑦 ∈ ((𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∩ <<s ) ∧ 𝑦 |s 𝑥) ↔ ((𝑦 ∈ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∧ 𝑦 ∈ <<s ) ∧ 𝑦 |s 𝑥))
25 anass 469 . . . . . . . 8 (((𝑦 ∈ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∧ 𝑦 ∈ <<s ) ∧ 𝑦 |s 𝑥) ↔ (𝑦 ∈ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∧ (𝑦 ∈ <<s ∧ 𝑦 |s 𝑥)))
2624, 25bitri 276 . . . . . . 7 ((𝑦 ∈ ((𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∩ <<s ) ∧ 𝑦 |s 𝑥) ↔ (𝑦 ∈ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∧ (𝑦 ∈ <<s ∧ 𝑦 |s 𝑥)))
2726rexbii2 3209 . . . . . 6 (∃𝑦 ∈ ((𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴)) ∩ <<s )𝑦 |s 𝑥 ↔ ∃𝑦 ∈ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴))(𝑦 ∈ <<s ∧ 𝑦 |s 𝑥))
2820, 22, 273bitri 298 . . . . 5 (𝑥 ∈ ( |s “ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴))) ↔ ∃𝑦 ∈ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴))(𝑦 ∈ <<s ∧ 𝑦 |s 𝑥))
29 df-br 4963 . . . . . . . 8 (𝑎 <<s 𝑏 ↔ ⟨𝑎, 𝑏⟩ ∈ <<s )
3029anbi1i 623 . . . . . . 7 ((𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥) ↔ (⟨𝑎, 𝑏⟩ ∈ <<s ∧ (𝑎 |s 𝑏) = 𝑥))
31 df-ov 7019 . . . . . . . . . 10 (𝑎 |s 𝑏) = ( |s ‘⟨𝑎, 𝑏⟩)
3231eqeq1i 2800 . . . . . . . . 9 ((𝑎 |s 𝑏) = 𝑥 ↔ ( |s ‘⟨𝑎, 𝑏⟩) = 𝑥)
33 scutf 32883 . . . . . . . . . . 11 |s : <<s ⟶ No
34 ffn 6382 . . . . . . . . . . 11 ( |s : <<s ⟶ No → |s Fn <<s )
3533, 34ax-mp 5 . . . . . . . . . 10 |s Fn <<s
36 fnbrfvb 6586 . . . . . . . . . 10 (( |s Fn <<s ∧ ⟨𝑎, 𝑏⟩ ∈ <<s ) → (( |s ‘⟨𝑎, 𝑏⟩) = 𝑥 ↔ ⟨𝑎, 𝑏⟩ |s 𝑥))
3735, 36mpan 686 . . . . . . . . 9 (⟨𝑎, 𝑏⟩ ∈ <<s → (( |s ‘⟨𝑎, 𝑏⟩) = 𝑥 ↔ ⟨𝑎, 𝑏⟩ |s 𝑥))
3832, 37syl5bb 284 . . . . . . . 8 (⟨𝑎, 𝑏⟩ ∈ <<s → ((𝑎 |s 𝑏) = 𝑥 ↔ ⟨𝑎, 𝑏⟩ |s 𝑥))
3938pm5.32i 575 . . . . . . 7 ((⟨𝑎, 𝑏⟩ ∈ <<s ∧ (𝑎 |s 𝑏) = 𝑥) ↔ (⟨𝑎, 𝑏⟩ ∈ <<s ∧ ⟨𝑎, 𝑏⟩ |s 𝑥))
4030, 39bitri 276 . . . . . 6 ((𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥) ↔ (⟨𝑎, 𝑏⟩ ∈ <<s ∧ ⟨𝑎, 𝑏⟩ |s 𝑥))
41402rexbii 3212 . . . . 5 (∃𝑎 ∈ 𝒫 ( M “ 𝐴)∃𝑏 ∈ 𝒫 ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥) ↔ ∃𝑎 ∈ 𝒫 ( M “ 𝐴)∃𝑏 ∈ 𝒫 ( M “ 𝐴)(⟨𝑎, 𝑏⟩ ∈ <<s ∧ ⟨𝑎, 𝑏⟩ |s 𝑥))
4214, 28, 413bitr4i 304 . . . 4 (𝑥 ∈ ( |s “ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴))) ↔ ∃𝑎 ∈ 𝒫 ( M “ 𝐴)∃𝑏 ∈ 𝒫 ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥))
4342abbi2i 2922 . . 3 ( |s “ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴))) = {𝑥 ∣ ∃𝑎 ∈ 𝒫 ( M “ 𝐴)∃𝑏 ∈ 𝒫 ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥)}
44 df-rab 3114 . . 3 {𝑥 No ∣ ∃𝑎 ∈ 𝒫 ( M “ 𝐴)∃𝑏 ∈ 𝒫 ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥)} = {𝑥 ∣ (𝑥 No ∧ ∃𝑎 ∈ 𝒫 ( M “ 𝐴)∃𝑏 ∈ 𝒫 ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥))}
4510, 43, 443eqtr4i 2829 . 2 ( |s “ (𝒫 ( M “ 𝐴) × 𝒫 ( M “ 𝐴))) = {𝑥 No ∣ ∃𝑎 ∈ 𝒫 ( M “ 𝐴)∃𝑏 ∈ 𝒫 ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥)}
461, 45syl6eq 2847 1 (𝐴 ∈ On → ( M ‘𝐴) = {𝑥 No ∣ ∃𝑎 ∈ 𝒫 ( M “ 𝐴)∃𝑏 ∈ 𝒫 ( M “ 𝐴)(𝑎 <<s 𝑏 ∧ (𝑎 |s 𝑏) = 𝑥)})
 Colors of variables: wff setvar class Syntax hints:   → wi 4   ↔ wb 207   ∧ wa 396   = wceq 1522   ∈ wcel 2081  {cab 2775  ∃wrex 3106  {crab 3109   ∩ cin 3858  𝒫 cpw 4453  {csn 4472  ⟨cop 4478  ∪ cuni 4745   class class class wbr 4962   × cxp 5441  dom cdm 5443   “ cima 5446  Oncon0 6066   Fn wfn 6220  ⟶wf 6221  ‘cfv 6225  (class class class)co 7016   No csur 32757   <
 Copyright terms: Public domain W3C validator