Theorem frr1 9717

Description: Law of general well-founded recursion, part one. This theorem and the following two drop the partial order requirement from fpr1 8284, fpr2 8285, and fpr3 8286, which requires using the axiom of infinity. (Contributed by Scott Fenton, 11-Sep-2023.)

Hypothesis

Ref	Expression
frr.1	⊢ 𝐹 = frecs(𝑅, 𝐴, 𝐺)

Assertion

Ref	Expression
frr1	⊢ ((𝑅 Fr 𝐴 ∧ 𝑅 Se 𝐴) → 𝐹 Fn 𝐴)

Proof of Theorem frr1

Dummy variables 𝑥 𝑦 𝑧 𝑢 𝑣 𝑎 𝑏 𝑐 𝑓 𝑔 ℎ are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eqid 2762	. . . 4 ⊢ {𝑎 ∣ ∃𝑏(𝑎 Fn 𝑏 ∧ (𝑏 ⊆ 𝐴 ∧ ∀𝑐 ∈ 𝑏 Pred(𝑅, 𝐴, 𝑐) ⊆ 𝑏) ∧ ∀𝑐 ∈ 𝑏 (𝑎‘𝑐) = (𝑐𝐺(𝑎 ↾ Pred(𝑅, 𝐴, 𝑐))))} = {𝑎 ∣ ∃𝑏(𝑎 Fn 𝑏 ∧ (𝑏 ⊆ 𝐴 ∧ ∀𝑐 ∈ 𝑏 Pred(𝑅, 𝐴, 𝑐) ⊆ 𝑏) ∧ ∀𝑐 ∈ 𝑏 (𝑎‘𝑐) = (𝑐𝐺(𝑎 ↾ Pred(𝑅, 𝐴, 𝑐))))}
2	1	frrlem1 8267	. . 3 ⊢ {𝑎 ∣ ∃𝑏(𝑎 Fn 𝑏 ∧ (𝑏 ⊆ 𝐴 ∧ ∀𝑐 ∈ 𝑏 Pred(𝑅, 𝐴, 𝑐) ⊆ 𝑏) ∧ ∀𝑐 ∈ 𝑏 (𝑎‘𝑐) = (𝑐𝐺(𝑎 ↾ Pred(𝑅, 𝐴, 𝑐))))} = {𝑓 ∣ ∃𝑥(𝑓 Fn 𝑥 ∧ (𝑥 ⊆ 𝐴 ∧ ∀𝑦 ∈ 𝑥 Pred(𝑅, 𝐴, 𝑦) ⊆ 𝑥) ∧ ∀𝑦 ∈ 𝑥 (𝑓‘𝑦) = (𝑦𝐺(𝑓 ↾ Pred(𝑅, 𝐴, 𝑦))))}
3		frr.1	. . 3 ⊢ 𝐹 = frecs(𝑅, 𝐴, 𝐺)
4	2, 3	frrlem15 9715	. . 3 ⊢ (((𝑅 Fr 𝐴 ∧ 𝑅 Se 𝐴) ∧ (𝑔 ∈ {𝑎 ∣ ∃𝑏(𝑎 Fn 𝑏 ∧ (𝑏 ⊆ 𝐴 ∧ ∀𝑐 ∈ 𝑏 Pred(𝑅, 𝐴, 𝑐) ⊆ 𝑏) ∧ ∀𝑐 ∈ 𝑏 (𝑎‘𝑐) = (𝑐𝐺(𝑎 ↾ Pred(𝑅, 𝐴, 𝑐))))} ∧ ℎ ∈ {𝑎 ∣ ∃𝑏(𝑎 Fn 𝑏 ∧ (𝑏 ⊆ 𝐴 ∧ ∀𝑐 ∈ 𝑏 Pred(𝑅, 𝐴, 𝑐) ⊆ 𝑏) ∧ ∀𝑐 ∈ 𝑏 (𝑎‘𝑐) = (𝑐𝐺(𝑎 ↾ Pred(𝑅, 𝐴, 𝑐))))})) → ((𝑥𝑔𝑢 ∧ 𝑥ℎ𝑣) → 𝑢 = 𝑣))
5	2, 3, 4	frrlem9 8275	. 2 ⊢ ((𝑅 Fr 𝐴 ∧ 𝑅 Se 𝐴) → Fun 𝐹)
6		eqid 2762	. . 3 ⊢ ((𝐹 ↾ Pred(t++(𝑅 ↾ 𝐴), 𝐴, 𝑧)) ∪ {⟨𝑧, (𝑧𝐺(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))⟩}) = ((𝐹 ↾ Pred(t++(𝑅 ↾ 𝐴), 𝐴, 𝑧)) ∪ {⟨𝑧, (𝑧𝐺(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))⟩})
7		simpl 486	. . 3 ⊢ ((𝑅 Fr 𝐴 ∧ 𝑅 Se 𝐴) → 𝑅 Fr 𝐴)
8		predres 6326	. . . . 5 ⊢ Pred(𝑅, 𝐴, 𝑧) = Pred((𝑅 ↾ 𝐴), 𝐴, 𝑧)
9		relres 5991	. . . . . 6 ⊢ Rel (𝑅 ↾ 𝐴)
10		ssttrcl 9670	. . . . . 6 ⊢ (Rel (𝑅 ↾ 𝐴) → (𝑅 ↾ 𝐴) ⊆ t++(𝑅 ↾ 𝐴))
11		predrelss 6324	. . . . . 6 ⊢ ((𝑅 ↾ 𝐴) ⊆ t++(𝑅 ↾ 𝐴) → Pred((𝑅 ↾ 𝐴), 𝐴, 𝑧) ⊆ Pred(t++(𝑅 ↾ 𝐴), 𝐴, 𝑧))
12	9, 10, 11	mp2b 10	. . . . 5 ⊢ Pred((𝑅 ↾ 𝐴), 𝐴, 𝑧) ⊆ Pred(t++(𝑅 ↾ 𝐴), 𝐴, 𝑧)
13	8, 12	eqsstri 3982	. . . 4 ⊢ Pred(𝑅, 𝐴, 𝑧) ⊆ Pred(t++(𝑅 ↾ 𝐴), 𝐴, 𝑧)
14	13	a1i 11	. . 3 ⊢ (((𝑅 Fr 𝐴 ∧ 𝑅 Se 𝐴) ∧ 𝑧 ∈ 𝐴) → Pred(𝑅, 𝐴, 𝑧) ⊆ Pred(t++(𝑅 ↾ 𝐴), 𝐴, 𝑧))
15		frrlem16 9716	. . 3 ⊢ (((𝑅 Fr 𝐴 ∧ 𝑅 Se 𝐴) ∧ 𝑧 ∈ 𝐴) → ∀𝑎 ∈ Pred (t++(𝑅 ↾ 𝐴), 𝐴, 𝑧)Pred(𝑅, 𝐴, 𝑎) ⊆ Pred(t++(𝑅 ↾ 𝐴), 𝐴, 𝑧))
16		ttrclse 9682	. . . . 5 ⊢ (𝑅 Se 𝐴 → t++(𝑅 ↾ 𝐴) Se 𝐴)
17		setlikespec 6312	. . . . . 6 ⊢ ((𝑧 ∈ 𝐴 ∧ t++(𝑅 ↾ 𝐴) Se 𝐴) → Pred(t++(𝑅 ↾ 𝐴), 𝐴, 𝑧) ∈ V)
18	17	ancoms 462	. . . . 5 ⊢ ((t++(𝑅 ↾ 𝐴) Se 𝐴 ∧ 𝑧 ∈ 𝐴) → Pred(t++(𝑅 ↾ 𝐴), 𝐴, 𝑧) ∈ V)
19	16, 18	sylan 589	. . . 4 ⊢ ((𝑅 Se 𝐴 ∧ 𝑧 ∈ 𝐴) → Pred(t++(𝑅 ↾ 𝐴), 𝐴, 𝑧) ∈ V)
20	19	adantll 724	. . 3 ⊢ (((𝑅 Fr 𝐴 ∧ 𝑅 Se 𝐴) ∧ 𝑧 ∈ 𝐴) → Pred(t++(𝑅 ↾ 𝐴), 𝐴, 𝑧) ∈ V)
21		predss 6296	. . . 4 ⊢ Pred(t++(𝑅 ↾ 𝐴), 𝐴, 𝑧) ⊆ 𝐴
22	21	a1i 11	. . 3 ⊢ (((𝑅 Fr 𝐴 ∧ 𝑅 Se 𝐴) ∧ 𝑧 ∈ 𝐴) → Pred(t++(𝑅 ↾ 𝐴), 𝐴, 𝑧) ⊆ 𝐴)
23		difss 4089	. . . 4 ⊢ (𝐴 ∖ dom 𝐹) ⊆ 𝐴
24		frmin 9707	. . . 4 ⊢ (((𝑅 Fr 𝐴 ∧ 𝑅 Se 𝐴) ∧ ((𝐴 ∖ dom 𝐹) ⊆ 𝐴 ∧ (𝐴 ∖ dom 𝐹) ≠ ∅)) → ∃𝑧 ∈ (𝐴 ∖ dom 𝐹)Pred(𝑅, (𝐴 ∖ dom 𝐹), 𝑧) = ∅)
25	23, 24	mpanr1 713	. . 3 ⊢ (((𝑅 Fr 𝐴 ∧ 𝑅 Se 𝐴) ∧ (𝐴 ∖ dom 𝐹) ≠ ∅) → ∃𝑧 ∈ (𝐴 ∖ dom 𝐹)Pred(𝑅, (𝐴 ∖ dom 𝐹), 𝑧) = ∅)
26	2, 3, 4, 6, 7, 14, 15, 20, 22, 25	frrlem14 8280	. 2 ⊢ ((𝑅 Fr 𝐴 ∧ 𝑅 Se 𝐴) → dom 𝐹 = 𝐴)
27		df-fn 6524	. 2 ⊢ (𝐹 Fn 𝐴 ↔ (Fun 𝐹 ∧ dom 𝐹 = 𝐴))
28	5, 26, 27	sylanbrc 592	1 ⊢ ((𝑅 Fr 𝐴 ∧ 𝑅 Se 𝐴) → 𝐹 Fn 𝐴)

Syntax hints:   → wi 4   ∧ wa 399   ∧ w3a 1098   = wceq 1560  ∃wex 1799   ∈ wcel 2142  {cab 2740   ≠ wne 2957  ∀wral 3076  ∃wrex 3086  Vcvv 3454   ∖ cdif 3901   ∪ cun 3902   ⊆ wss 3904  ∅c0 4285  {csn 4582  ⟨cop 4588   Fr wfr 5597   Se wse 5598  dom cdm 5647   ↾ cres 5649  Rel wrel 5652  Predcpred 6287  Fun wfun 6515   Fn wfn 6516  ‘cfv 6521  (class class class)co 7396  frecscfrecs 8261  t++cttrcl 9662

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5227  ax-sep 5246  ax-nul 5256  ax-pr 5390  ax-un 7718  ax-inf2 9596

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1099  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3077  df-rex 3087  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3456  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4481  df-pw 4557  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-int 4906  df-iun 4951  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5542  df-eprel 5547  df-po 5555  df-so 5556  df-fr 5600  df-se 5601  df-we 5602  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-pred 6288  df-ord 6349  df-on 6350  df-lim 6351  df-suc 6352  df-iota 6477  df-fun 6523  df-fn 6524  df-f 6525  df-f1 6526  df-fo 6527  df-f1o 6528  df-fv 6529  df-riota 7353  df-ov 7399  df-oprab 7400  df-mpo 7401  df-om 7847  df-2nd 7971  df-frecs 8262  df-wrecs 8293  df-recs 8342  df-rdg 8381  df-1o 8437  df-oadd 8441  df-ttrcl 9663

This theorem is referenced by:  frr2  9718  frr3  9719