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

Theorem rdgss 6080
Description: Subset and recursive definition generator. (Contributed by Jim Kingdon, 15-Jul-2019.)
Hypotheses
Ref Expression
rdgss.1 (𝜑𝐹 Fn V)
rdgss.2 (𝜑𝐼𝑉)
rdgss.3 (𝜑𝐴 ∈ On)
rdgss.4 (𝜑𝐵 ∈ On)
rdgss.5 (𝜑𝐴𝐵)
Assertion
Ref Expression
rdgss (𝜑 → (rec(𝐹, 𝐼)‘𝐴) ⊆ (rec(𝐹, 𝐼)‘𝐵))

Proof of Theorem rdgss
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 rdgss.5 . . . 4 (𝜑𝐴𝐵)
2 ssel 3004 . . . . . 6 (𝐴𝐵 → (𝑥𝐴𝑥𝐵))
3 ssid 3029 . . . . . . 7 (𝐹‘(rec(𝐹, 𝐼)‘𝑥)) ⊆ (𝐹‘(rec(𝐹, 𝐼)‘𝑥))
4 fveq2 5253 . . . . . . . . . 10 (𝑦 = 𝑥 → (rec(𝐹, 𝐼)‘𝑦) = (rec(𝐹, 𝐼)‘𝑥))
54fveq2d 5257 . . . . . . . . 9 (𝑦 = 𝑥 → (𝐹‘(rec(𝐹, 𝐼)‘𝑦)) = (𝐹‘(rec(𝐹, 𝐼)‘𝑥)))
65sseq2d 3038 . . . . . . . 8 (𝑦 = 𝑥 → ((𝐹‘(rec(𝐹, 𝐼)‘𝑥)) ⊆ (𝐹‘(rec(𝐹, 𝐼)‘𝑦)) ↔ (𝐹‘(rec(𝐹, 𝐼)‘𝑥)) ⊆ (𝐹‘(rec(𝐹, 𝐼)‘𝑥))))
76rspcev 2712 . . . . . . 7 ((𝑥𝐵 ∧ (𝐹‘(rec(𝐹, 𝐼)‘𝑥)) ⊆ (𝐹‘(rec(𝐹, 𝐼)‘𝑥))) → ∃𝑦𝐵 (𝐹‘(rec(𝐹, 𝐼)‘𝑥)) ⊆ (𝐹‘(rec(𝐹, 𝐼)‘𝑦)))
83, 7mpan2 416 . . . . . 6 (𝑥𝐵 → ∃𝑦𝐵 (𝐹‘(rec(𝐹, 𝐼)‘𝑥)) ⊆ (𝐹‘(rec(𝐹, 𝐼)‘𝑦)))
92, 8syl6 33 . . . . 5 (𝐴𝐵 → (𝑥𝐴 → ∃𝑦𝐵 (𝐹‘(rec(𝐹, 𝐼)‘𝑥)) ⊆ (𝐹‘(rec(𝐹, 𝐼)‘𝑦))))
109ralrimiv 2439 . . . 4 (𝐴𝐵 → ∀𝑥𝐴𝑦𝐵 (𝐹‘(rec(𝐹, 𝐼)‘𝑥)) ⊆ (𝐹‘(rec(𝐹, 𝐼)‘𝑦)))
111, 10syl 14 . . 3 (𝜑 → ∀𝑥𝐴𝑦𝐵 (𝐹‘(rec(𝐹, 𝐼)‘𝑥)) ⊆ (𝐹‘(rec(𝐹, 𝐼)‘𝑦)))
12 iunss2 3749 . . 3 (∀𝑥𝐴𝑦𝐵 (𝐹‘(rec(𝐹, 𝐼)‘𝑥)) ⊆ (𝐹‘(rec(𝐹, 𝐼)‘𝑦)) → 𝑥𝐴 (𝐹‘(rec(𝐹, 𝐼)‘𝑥)) ⊆ 𝑦𝐵 (𝐹‘(rec(𝐹, 𝐼)‘𝑦)))
13 unss2 3155 . . 3 ( 𝑥𝐴 (𝐹‘(rec(𝐹, 𝐼)‘𝑥)) ⊆ 𝑦𝐵 (𝐹‘(rec(𝐹, 𝐼)‘𝑦)) → (𝐼 𝑥𝐴 (𝐹‘(rec(𝐹, 𝐼)‘𝑥))) ⊆ (𝐼 𝑦𝐵 (𝐹‘(rec(𝐹, 𝐼)‘𝑦))))
1411, 12, 133syl 17 . 2 (𝜑 → (𝐼 𝑥𝐴 (𝐹‘(rec(𝐹, 𝐼)‘𝑥))) ⊆ (𝐼 𝑦𝐵 (𝐹‘(rec(𝐹, 𝐼)‘𝑦))))
15 rdgss.1 . . 3 (𝜑𝐹 Fn V)
16 rdgss.2 . . 3 (𝜑𝐼𝑉)
17 rdgss.3 . . 3 (𝜑𝐴 ∈ On)
18 rdgival 6079 . . 3 ((𝐹 Fn V ∧ 𝐼𝑉𝐴 ∈ On) → (rec(𝐹, 𝐼)‘𝐴) = (𝐼 𝑥𝐴 (𝐹‘(rec(𝐹, 𝐼)‘𝑥))))
1915, 16, 17, 18syl3anc 1170 . 2 (𝜑 → (rec(𝐹, 𝐼)‘𝐴) = (𝐼 𝑥𝐴 (𝐹‘(rec(𝐹, 𝐼)‘𝑥))))
20 rdgss.4 . . 3 (𝜑𝐵 ∈ On)
21 rdgival 6079 . . 3 ((𝐹 Fn V ∧ 𝐼𝑉𝐵 ∈ On) → (rec(𝐹, 𝐼)‘𝐵) = (𝐼 𝑦𝐵 (𝐹‘(rec(𝐹, 𝐼)‘𝑦))))
2215, 16, 20, 21syl3anc 1170 . 2 (𝜑 → (rec(𝐹, 𝐼)‘𝐵) = (𝐼 𝑦𝐵 (𝐹‘(rec(𝐹, 𝐼)‘𝑦))))
2314, 19, 223sstr4d 3053 1 (𝜑 → (rec(𝐹, 𝐼)‘𝐴) ⊆ (rec(𝐹, 𝐼)‘𝐵))
Colors of variables: wff set class
Syntax hints:  wi 4   = wceq 1285  wcel 1434  wral 2353  wrex 2354  Vcvv 2612  cun 2982  wss 2984   ciun 3704  Oncon0 4154   Fn wfn 4964  cfv 4969  reccrdg 6066
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-in1 577  ax-in2 578  ax-io 663  ax-5 1377  ax-7 1378  ax-gen 1379  ax-ie1 1423  ax-ie2 1424  ax-8 1436  ax-10 1437  ax-11 1438  ax-i12 1439  ax-bndl 1440  ax-4 1441  ax-13 1445  ax-14 1446  ax-17 1460  ax-i9 1464  ax-ial 1468  ax-i5r 1469  ax-ext 2065  ax-coll 3919  ax-sep 3922  ax-pow 3974  ax-pr 4000  ax-un 4224  ax-setind 4316
This theorem depends on definitions:  df-bi 115  df-3an 922  df-tru 1288  df-fal 1291  df-nf 1391  df-sb 1688  df-eu 1946  df-mo 1947  df-clab 2070  df-cleq 2076  df-clel 2079  df-nfc 2212  df-ne 2250  df-ral 2358  df-rex 2359  df-reu 2360  df-rab 2362  df-v 2614  df-sbc 2827  df-csb 2920  df-dif 2986  df-un 2988  df-in 2990  df-ss 2997  df-nul 3270  df-pw 3408  df-sn 3428  df-pr 3429  df-op 3431  df-uni 3628  df-iun 3706  df-br 3812  df-opab 3866  df-mpt 3867  df-tr 3902  df-id 4084  df-iord 4157  df-on 4159  df-suc 4162  df-xp 4407  df-rel 4408  df-cnv 4409  df-co 4410  df-dm 4411  df-rn 4412  df-res 4413  df-ima 4414  df-iota 4934  df-fun 4971  df-fn 4972  df-f 4973  df-f1 4974  df-fo 4975  df-f1o 4976  df-fv 4977  df-recs 6002  df-irdg 6067
This theorem is referenced by:  oawordi  6162
  Copyright terms: Public domain W3C validator