ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  rdgivallem GIF version

Theorem rdgivallem 6652
Description: Value of the recursive definition generator. Lemma for rdgival 6653 which simplifies the value further. (Contributed by Jim Kingdon, 13-Jul-2019.) (New usage is discouraged.)
Assertion
Ref Expression
rdgivallem ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) → (rec(𝐹, 𝐴)‘𝐵) = (𝐴 ∪ ∪ 𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥))))
Distinct variable groups:   𝑥,𝐴   𝑥,𝐵   𝑥,𝐹   𝑥,𝑉

Proof of Theorem rdgivallem
Dummy variables 𝑔 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 df-irdg 6641 . . . 4 rec(𝐹, 𝐴) = recs((𝑔 ∈ V ↦ (𝐴 ∪ ∪ 𝑥 ∈ dom 𝑔(𝐹‘(𝑔‘𝑥)))))
2 rdgruledefgg 6646 . . . . 5 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉) → (Fun (𝑔 ∈ V ↦ (𝐴 ∪ ∪ 𝑥 ∈ dom 𝑔(𝐹‘(𝑔‘𝑥)))) ∧ ((𝑔 ∈ V ↦ (𝐴 ∪ ∪ 𝑥 ∈ dom 𝑔(𝐹‘(𝑔‘𝑥))))‘𝑦) ∈ V))
32alrimiv 1927 . . . 4 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉) → ∀𝑦(Fun (𝑔 ∈ V ↦ (𝐴 ∪ ∪ 𝑥 ∈ dom 𝑔(𝐹‘(𝑔‘𝑥)))) ∧ ((𝑔 ∈ V ↦ (𝐴 ∪ ∪ 𝑥 ∈ dom 𝑔(𝐹‘(𝑔‘𝑥))))‘𝑦) ∈ V))
41, 3tfri2d 6607 . . 3 (((𝐹 Fn V ∧ 𝐴 ∈ 𝑉) ∧ 𝐵 ∈ On) → (rec(𝐹, 𝐴)‘𝐵) = ((𝑔 ∈ V ↦ (𝐴 ∪ ∪ 𝑥 ∈ dom 𝑔(𝐹‘(𝑔‘𝑥))))‘(rec(𝐹, 𝐴) ↾ 𝐵)))
543impa 1225 . 2 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) → (rec(𝐹, 𝐴)‘𝐵) = ((𝑔 ∈ V ↦ (𝐴 ∪ ∪ 𝑥 ∈ dom 𝑔(𝐹‘(𝑔‘𝑥))))‘(rec(𝐹, 𝐴) ↾ 𝐵)))
6 eqidd 2239 . . 3 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) → (𝑔 ∈ V ↦ (𝐴 ∪ ∪ 𝑥 ∈ dom 𝑔(𝐹‘(𝑔‘𝑥)))) = (𝑔 ∈ V ↦ (𝐴 ∪ ∪ 𝑥 ∈ dom 𝑔(𝐹‘(𝑔‘𝑥)))))
7 dmeq 4981 . . . . . 6 (𝑔 = (rec(𝐹, 𝐴) ↾ 𝐵) → dom 𝑔 = dom (rec(𝐹, 𝐴) ↾ 𝐵))
8 onss 4640 . . . . . . . . 9 (𝐵 ∈ On → 𝐵 ⊆ On)
983ad2ant3 1051 . . . . . . . 8 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) → 𝐵 ⊆ On)
10 rdgifnon 6650 . . . . . . . . . 10 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉) → rec(𝐹, 𝐴) Fn On)
11 fndm 5480 . . . . . . . . . 10 (rec(𝐹, 𝐴) Fn On → dom rec(𝐹, 𝐴) = On)
1210, 11syl 14 . . . . . . . . 9 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉) → dom rec(𝐹, 𝐴) = On)
13123adant3 1048 . . . . . . . 8 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) → dom rec(𝐹, 𝐴) = On)
149, 13sseqtrrd 3287 . . . . . . 7 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) → 𝐵 ⊆ dom rec(𝐹, 𝐴))
15 ssdmres 5085 . . . . . . 7 (𝐵 ⊆ dom rec(𝐹, 𝐴) ↔ dom (rec(𝐹, 𝐴) ↾ 𝐵) = 𝐵)
1614, 15sylib 122 . . . . . 6 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) → dom (rec(𝐹, 𝐴) ↾ 𝐵) = 𝐵)
177, 16sylan9eqr 2293 . . . . 5 (((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) ∧ 𝑔 = (rec(𝐹, 𝐴) ↾ 𝐵)) → dom 𝑔 = 𝐵)
18 fveq1 5694 . . . . . . 7 (𝑔 = (rec(𝐹, 𝐴) ↾ 𝐵) → (𝑔‘𝑥) = ((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥))
1918fveq2d 5699 . . . . . 6 (𝑔 = (rec(𝐹, 𝐴) ↾ 𝐵) → (𝐹‘(𝑔‘𝑥)) = (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)))
2019adantl 277 . . . . 5 (((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) ∧ 𝑔 = (rec(𝐹, 𝐴) ↾ 𝐵)) → (𝐹‘(𝑔‘𝑥)) = (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)))
2117, 20iuneq12d 4036 . . . 4 (((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) ∧ 𝑔 = (rec(𝐹, 𝐴) ↾ 𝐵)) → ∪ 𝑥 ∈ dom 𝑔(𝐹‘(𝑔‘𝑥)) = ∪ 𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)))
2221uneq2d 3383 . . 3 (((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) ∧ 𝑔 = (rec(𝐹, 𝐴) ↾ 𝐵)) → (𝐴 ∪ ∪ 𝑥 ∈ dom 𝑔(𝐹‘(𝑔‘𝑥))) = (𝐴 ∪ ∪ 𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥))))
23 rdgfun 6644 . . . . 5 Fun rec(𝐹, 𝐴)
24 resfunexg 5936 . . . . 5 ((Fun rec(𝐹, 𝐴) ∧ 𝐵 ∈ On) → (rec(𝐹, 𝐴) ↾ 𝐵) ∈ V)
2523, 24mpan 428 . . . 4 (𝐵 ∈ On → (rec(𝐹, 𝐴) ↾ 𝐵) ∈ V)
26253ad2ant3 1051 . . 3 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) → (rec(𝐹, 𝐴) ↾ 𝐵) ∈ V)
27 simpr 110 . . . . . 6 ((𝐹 Fn V ∧ 𝐵 ∈ On) → 𝐵 ∈ On)
28 vex 2824 . . . . . . . . . 10 𝑥 ∈ V
29 fvexg 5714 . . . . . . . . . 10 (((rec(𝐹, 𝐴) ↾ 𝐵) ∈ V ∧ 𝑥 ∈ V) → ((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥) ∈ V)
3025, 28, 29sylancl 417 . . . . . . . . 9 (𝐵 ∈ On → ((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥) ∈ V)
3130ralrimivw 2624 . . . . . . . 8 (𝐵 ∈ On → ∀𝑥 ∈ 𝐵 ((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥) ∈ V)
3231adantl 277 . . . . . . 7 ((𝐹 Fn V ∧ 𝐵 ∈ On) → ∀𝑥 ∈ 𝐵 ((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥) ∈ V)
33 funfvex 5712 . . . . . . . . . . 11 ((Fun 𝐹 ∧ ((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥) ∈ dom 𝐹) → (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)) ∈ V)
3433funfni 5483 . . . . . . . . . 10 ((𝐹 Fn V ∧ ((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥) ∈ V) → (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)) ∈ V)
3534ex 115 . . . . . . . . 9 (𝐹 Fn V → (((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥) ∈ V → (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)) ∈ V))
3635ralimdv 2618 . . . . . . . 8 (𝐹 Fn V → (∀𝑥 ∈ 𝐵 ((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥) ∈ V → ∀𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)) ∈ V))
3736adantr 276 . . . . . . 7 ((𝐹 Fn V ∧ 𝐵 ∈ On) → (∀𝑥 ∈ 𝐵 ((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥) ∈ V → ∀𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)) ∈ V))
3832, 37mpd 13 . . . . . 6 ((𝐹 Fn V ∧ 𝐵 ∈ On) → ∀𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)) ∈ V)
39 iunexg 6348 . . . . . 6 ((𝐵 ∈ On ∧ ∀𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)) ∈ V) → ∪ 𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)) ∈ V)
4027, 38, 39syl2anc 415 . . . . 5 ((𝐹 Fn V ∧ 𝐵 ∈ On) → ∪ 𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)) ∈ V)
41403adant2 1047 . . . 4 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) → ∪ 𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)) ∈ V)
42 unexg 4589 . . . . . 6 ((𝐴 ∈ 𝑉 ∧ ∪ 𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)) ∈ V) → (𝐴 ∪ ∪ 𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥))) ∈ V)
4342ex 115 . . . . 5 (𝐴 ∈ 𝑉 → (∪ 𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)) ∈ V → (𝐴 ∪ ∪ 𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥))) ∈ V))
44433ad2ant2 1050 . . . 4 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) → (∪ 𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥)) ∈ V → (𝐴 ∪ ∪ 𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥))) ∈ V))
4541, 44mpd 13 . . 3 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) → (𝐴 ∪ ∪ 𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥))) ∈ V)
466, 22, 26, 45fvmptd 5786 . 2 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) → ((𝑔 ∈ V ↦ (𝐴 ∪ ∪ 𝑥 ∈ dom 𝑔(𝐹‘(𝑔‘𝑥))))‘(rec(𝐹, 𝐴) ↾ 𝐵)) = (𝐴 ∪ ∪ 𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥))))
475, 46eqtrd 2271 1 ((𝐹 Fn V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ On) → (rec(𝐹, 𝐴)‘𝐵) = (𝐴 ∪ ∪ 𝑥 ∈ 𝐵 (𝐹‘((rec(𝐹, 𝐴) ↾ 𝐵)‘𝑥))))
Colors of variables:    wff set class
This proof depends on syntax axioms:   → wi 4   ∧ wa 104   ∧ w3a 1009   = wceq 1402   ∈ wcel 2209  ∀wral 2528  Vcvv 2821   ∪ cun 3218   ⊆ wss 3220  ∪ ciun 4012   ↦ cmpt 4192  Oncon0 4508  dom cdm 4774   ↾ cres 4776  Fun wfun 5371   Fn wfn 5372  ‘cfv 5377  reccrdg 6640
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-coll 4246  ax-sep 4249  ax-pow 4311  ax-pr 4346  ax-un 4578  ax-setind 4684
This proof depends on definitions:  df-bi 117  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-ral 2533  df-rex 2534  df-reu 2535  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-pw 3690  df-sn 3715  df-pr 3716  df-op 3718  df-uni 3936  df-iun 4014  df-br 4131  df-opab 4193  df-mpt 4194  df-tr 4230  df-id 4438  df-iord 4511  df-on 4513  df-suc 4516  df-xp 4780  df-rel 4781  df-cnv 4782  df-co 4783  df-dm 4784  df-rn 4785  df-res 4786  df-ima 4787  df-iota 5337  df-fun 5379  df-fn 5380  df-f 5381  df-f1 5382  df-fo 5383  df-f1o 5384  df-fv 5385  df-recs 6576  df-irdg 6641
This theorem is used by:  rdgival  6653
  Copyright terms: Public domain W3C validator