Theorem tfrlem5 5852

Description: Lemma for transfinite recursion. The values of two acceptable functions are the same within their domains. (Contributed by NM, 9-Apr-1995.) (Revised by Mario Carneiro, 24-May-2019.)

Hypothesis

Ref	Expression
tfrlem.1	⊢ A = {f ∣ ∃x ∈ On (f Fn x ∧ ∀y ∈ x (f‘y) = (𝐹‘(f ↾ y)))}

Assertion

Ref	Expression
tfrlem5	⊢ ((g ∈ A ∧ ℎ ∈ A) → ((xgu ∧ xℎv) → u = v))

Distinct variable groups:   f,g,x,y,ℎ,u,v,𝐹   A,g,ℎ

Allowed substitution hints:   A(x,y,v,u,f)

Proof of Theorem tfrlem5

Dummy variables z 𝑎 w are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		tfrlem.1	. . 3 ⊢ A = {f ∣ ∃x ∈ On (f Fn x ∧ ∀y ∈ x (f‘y) = (𝐹‘(f ↾ y)))}
2		vex 2538	. . 3 ⊢ g ∈ V
3	1, 2	tfrlem3a 5847	. 2 ⊢ (g ∈ A ↔ ∃z ∈ On (g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))))
4		vex 2538	. . 3 ⊢ ℎ ∈ V
5	1, 4	tfrlem3a 5847	. 2 ⊢ (ℎ ∈ A ↔ ∃w ∈ On (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎))))
6		reeanv 2457	. . 3 ⊢ (∃z ∈ On ∃w ∈ On ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ↔ (∃z ∈ On (g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ ∃w ∈ On (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))))
7		simp2ll 959	. . . . . . . . . 10 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → g Fn z)
8		simp3l 920	. . . . . . . . . 10 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → xgu)
9		fnbr 4927	. . . . . . . . . 10 ⊢ ((g Fn z ∧ xgu) → x ∈ z)
10	7, 8, 9	syl2anc 393	. . . . . . . . 9 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → x ∈ z)
11		simp2rl 961	. . . . . . . . . 10 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → ℎ Fn w)
12		simp3r 921	. . . . . . . . . 10 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → xℎv)
13		fnbr 4927	. . . . . . . . . 10 ⊢ ((ℎ Fn w ∧ xℎv) → x ∈ w)
14	11, 12, 13	syl2anc 393	. . . . . . . . 9 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → x ∈ w)
15		elin 3103	. . . . . . . . 9 ⊢ (x ∈ (z ∩ w) ↔ (x ∈ z ∧ x ∈ w))
16	10, 14, 15	sylanbrc 396	. . . . . . . 8 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → x ∈ (z ∩ w))
17		onin 4072	. . . . . . . . . 10 ⊢ ((z ∈ On ∧ w ∈ On) → (z ∩ w) ∈ On)
18	17	3ad2ant1 913	. . . . . . . . 9 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → (z ∩ w) ∈ On)
19		fnfun 4922	. . . . . . . . . . 11 ⊢ (g Fn z → Fun g)
20	7, 19	syl 14	. . . . . . . . . 10 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → Fun g)
21		inss1 3134	. . . . . . . . . . 11 ⊢ (z ∩ w) ⊆ z
22		fndm 4924	. . . . . . . . . . . 12 ⊢ (g Fn z → dom g = z)
23	7, 22	syl 14	. . . . . . . . . . 11 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → dom g = z)
24	21, 23	syl5sseqr 2971	. . . . . . . . . 10 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → (z ∩ w) ⊆ dom g)
25	20, 24	jca 290	. . . . . . . . 9 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → (Fun g ∧ (z ∩ w) ⊆ dom g))
26		fnfun 4922	. . . . . . . . . . 11 ⊢ (ℎ Fn w → Fun ℎ)
27	11, 26	syl 14	. . . . . . . . . 10 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → Fun ℎ)
28		inss2 3135	. . . . . . . . . . 11 ⊢ (z ∩ w) ⊆ w
29		fndm 4924	. . . . . . . . . . . 12 ⊢ (ℎ Fn w → dom ℎ = w)
30	11, 29	syl 14	. . . . . . . . . . 11 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → dom ℎ = w)
31	28, 30	syl5sseqr 2971	. . . . . . . . . 10 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → (z ∩ w) ⊆ dom ℎ)
32	27, 31	jca 290	. . . . . . . . 9 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → (Fun ℎ ∧ (z ∩ w) ⊆ dom ℎ))
33		simp2lr 960	. . . . . . . . . 10 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎)))
34		ssralv 2981	. . . . . . . . . 10 ⊢ ((z ∩ w) ⊆ z → (∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎)) → ∀𝑎 ∈ (z ∩ w)(g‘𝑎) = (𝐹‘(g ↾ 𝑎))))
35	21, 33, 34	mpsyl 59	. . . . . . . . 9 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → ∀𝑎 ∈ (z ∩ w)(g‘𝑎) = (𝐹‘(g ↾ 𝑎)))
36		simp2rr 962	. . . . . . . . . 10 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))
37		ssralv 2981	. . . . . . . . . 10 ⊢ ((z ∩ w) ⊆ w → (∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)) → ∀𝑎 ∈ (z ∩ w)(ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎))))
38	28, 36, 37	mpsyl 59	. . . . . . . . 9 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → ∀𝑎 ∈ (z ∩ w)(ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))
39	18, 25, 32, 35, 38	tfrlem1 5845	. . . . . . . 8 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → ∀𝑎 ∈ (z ∩ w)(g‘𝑎) = (ℎ‘𝑎))
40		fveq2 5103	. . . . . . . . . 10 ⊢ (𝑎 = x → (g‘𝑎) = (g‘x))
41		fveq2 5103	. . . . . . . . . 10 ⊢ (𝑎 = x → (ℎ‘𝑎) = (ℎ‘x))
42	40, 41	eqeq12d 2036	. . . . . . . . 9 ⊢ (𝑎 = x → ((g‘𝑎) = (ℎ‘𝑎) ↔ (g‘x) = (ℎ‘x)))
43	42	rspcv 2629	. . . . . . . 8 ⊢ (x ∈ (z ∩ w) → (∀𝑎 ∈ (z ∩ w)(g‘𝑎) = (ℎ‘𝑎) → (g‘x) = (ℎ‘x)))
44	16, 39, 43	sylc 56	. . . . . . 7 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → (g‘x) = (ℎ‘x))
45		funbrfv 5137	. . . . . . . 8 ⊢ (Fun g → (xgu → (g‘x) = u))
46	20, 8, 45	sylc 56	. . . . . . 7 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → (g‘x) = u)
47		funbrfv 5137	. . . . . . . 8 ⊢ (Fun ℎ → (xℎv → (ℎ‘x) = v))
48	27, 12, 47	sylc 56	. . . . . . 7 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → (ℎ‘x) = v)
49	44, 46, 48	3eqtr3d 2062	. . . . . 6 ⊢ (((z ∈ On ∧ w ∈ On) ∧ ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) ∧ (xgu ∧ xℎv)) → u = v)
50	49	3exp 1089	. . . . 5 ⊢ ((z ∈ On ∧ w ∈ On) → (((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) → ((xgu ∧ xℎv) → u = v)))
51	50	rexlimdva 2411	. . . 4 ⊢ (z ∈ On → (∃w ∈ On ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) → ((xgu ∧ xℎv) → u = v)))
52	51	rexlimiv 2405	. . 3 ⊢ (∃z ∈ On ∃w ∈ On ((g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) → ((xgu ∧ xℎv) → u = v))
53	6, 52	sylbir 125	. 2 ⊢ ((∃z ∈ On (g Fn z ∧ ∀𝑎 ∈ z (g‘𝑎) = (𝐹‘(g ↾ 𝑎))) ∧ ∃w ∈ On (ℎ Fn w ∧ ∀𝑎 ∈ w (ℎ‘𝑎) = (𝐹‘(ℎ ↾ 𝑎)))) → ((xgu ∧ xℎv) → u = v))
54	3, 5, 53	syl2anb 275	1 ⊢ ((g ∈ A ∧ ℎ ∈ A) → ((xgu ∧ xℎv) → u = v))

Syntax hints:   → wi 4   ∧ wa 97   ∧ w3a 873   = wceq 1228   ∈ wcel 1374  {cab 2008  ∀wral 2284  ∃wrex 2285   ∩ cin 2893   ⊆ wss 2894   class class class wbr 3738  Oncon0 4049  dom cdm 4272   ↾ cres 4274  Fun wfun 4823   Fn wfn 4824  ‘cfv 4829

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 99  ax-ia2 100  ax-ia3 101  ax-io 617  ax-5 1316  ax-7 1317  ax-gen 1318  ax-ie1 1363  ax-ie2 1364  ax-8 1376  ax-10 1377  ax-11 1378  ax-i12 1379  ax-bnd 1380  ax-4 1381  ax-14 1386  ax-17 1400  ax-i9 1404  ax-ial 1409  ax-i5r 1410  ax-ext 2004  ax-sep 3849  ax-pow 3901  ax-pr 3918  ax-setind 4204

This theorem depends on definitions:  df-bi 110  df-3an 875  df-tru 1231  df-nf 1330  df-sb 1628  df-eu 1885  df-mo 1886  df-clab 2009  df-cleq 2015  df-clel 2018  df-nfc 2149  df-ral 2289  df-rex 2290  df-rab 2293  df-v 2537  df-sbc 2742  df-csb 2830  df-un 2899  df-in 2901  df-ss 2908  df-pw 3336  df-sn 3356  df-pr 3357  df-op 3359  df-uni 3555  df-br 3739  df-opab 3793  df-mpt 3794  df-tr 3829  df-id 4004  df-iord 4052  df-on 4054  df-xp 4278  df-rel 4279  df-cnv 4280  df-co 4281  df-dm 4282  df-res 4284  df-iota 4794  df-fun 4831  df-fn 4832  df-fv 4837

This theorem is referenced by:  tfrlem7  5855  tfrexlem  5870