Theorem bnj1296 35651

Description: Technical lemma for bnj60 35692. This lemma may no longer be used or have become an indirect lemma of the theorem in question (i.e. a lemma of a lemma... of the theorem). (Contributed by Jonathan Ben-Naim, 3-Jun-2011.) (New usage is discouraged.)

Hypotheses

Ref	Expression
bnj1296.1	⊢ 𝐵 = {𝑑 ∣ (𝑑 ⊆ 𝐴 ∧ ∀𝑥 ∈ 𝑑 pred(𝑥, 𝐴, 𝑅) ⊆ 𝑑)}
bnj1296.2	⊢ 𝑌 = ⟨𝑥, (𝑓 ↾ pred(𝑥, 𝐴, 𝑅))⟩
bnj1296.3	⊢ 𝐶 = {𝑓 ∣ ∃𝑑 ∈ 𝐵 (𝑓 Fn 𝑑 ∧ ∀𝑥 ∈ 𝑑 (𝑓‘𝑥) = (𝐺‘𝑌))}
bnj1296.4	⊢ 𝐷 = (dom 𝑔 ∩ dom ℎ)
bnj1296.5	⊢ 𝐸 = {𝑥 ∈ 𝐷 ∣ (𝑔‘𝑥) ≠ (ℎ‘𝑥)}
bnj1296.6	⊢ (𝜑 ↔ (𝑅 FrSe 𝐴 ∧ 𝑔 ∈ 𝐶 ∧ ℎ ∈ 𝐶 ∧ (𝑔 ↾ 𝐷) ≠ (ℎ ↾ 𝐷)))
bnj1296.7	⊢ (𝜓 ↔ (𝜑 ∧ 𝑥 ∈ 𝐸 ∧ ∀𝑦 ∈ 𝐸 ¬ 𝑦𝑅𝑥))
bnj1296.18	⊢ (𝜓 → (𝑔 ↾ pred(𝑥, 𝐴, 𝑅)) = (ℎ ↾ pred(𝑥, 𝐴, 𝑅)))
bnj1296.9	⊢ 𝑍 = ⟨𝑥, (𝑔 ↾ pred(𝑥, 𝐴, 𝑅))⟩
bnj1296.10	⊢ 𝐾 = {𝑔 ∣ ∃𝑑 ∈ 𝐵 (𝑔 Fn 𝑑 ∧ ∀𝑥 ∈ 𝑑 (𝑔‘𝑥) = (𝐺‘𝑍))}
bnj1296.11	⊢ 𝑊 = ⟨𝑥, (ℎ ↾ pred(𝑥, 𝐴, 𝑅))⟩
bnj1296.12	⊢ 𝐿 = {ℎ ∣ ∃𝑑 ∈ 𝐵 (ℎ Fn 𝑑 ∧ ∀𝑥 ∈ 𝑑 (ℎ‘𝑥) = (𝐺‘𝑊))}

Assertion

Ref	Expression
bnj1296	⊢ (𝜓 → (𝑔‘𝑥) = (ℎ‘𝑥))

Distinct variable groups:   𝐵,𝑓,𝑔   𝐵,ℎ,𝑓   𝑥,𝐷   𝐺,𝑑,𝑓,𝑔   ℎ,𝐺,𝑑   𝑊,𝑑,𝑓   𝑔,𝑌   ℎ,𝑌   𝑍,𝑑,𝑓   𝑥,𝑑,𝑓,𝑔   𝑥,ℎ

Allowed substitution hints:   𝜑(𝑥, 𝑦, 𝑓, 𝑔, ℎ, 𝑑)   𝜓(𝑥, 𝑦, 𝑓, 𝑔, ℎ, 𝑑)   𝐴(𝑥, 𝑦, 𝑓, 𝑔, ℎ, 𝑑)   𝐵(𝑥, 𝑦, 𝑑)   𝐶(𝑥, 𝑦, 𝑓, 𝑔, ℎ, 𝑑)   𝐷(𝑦, 𝑓, 𝑔, ℎ, 𝑑)   𝑅(𝑥, 𝑦, 𝑓, 𝑔, ℎ, 𝑑)   𝐸(𝑥, 𝑦, 𝑓, 𝑔, ℎ, 𝑑)   𝐺(𝑥, 𝑦)   𝐾(𝑥, 𝑦, 𝑓, 𝑔, ℎ, 𝑑)   𝐿(𝑥, 𝑦, 𝑓, 𝑔, ℎ, 𝑑)   𝑊(𝑥, 𝑦, 𝑔, ℎ)   𝑌(𝑥, 𝑦, 𝑓, 𝑑)   𝑍(𝑥, 𝑦, 𝑔, ℎ)

Proof of Theorem bnj1296

Step	Hyp	Ref	Expression
1		bnj1296.18	. . . . 5 ⊢ (𝜓 → (𝑔 ↾ pred(𝑥, 𝐴, 𝑅)) = (ℎ ↾ pred(𝑥, 𝐴, 𝑅)))
2	1	opeq2d 4839	. . . 4 ⊢ (𝜓 → ⟨𝑥, (𝑔 ↾ pred(𝑥, 𝐴, 𝑅))⟩ = ⟨𝑥, (ℎ ↾ pred(𝑥, 𝐴, 𝑅))⟩)
3		bnj1296.9	. . . 4 ⊢ 𝑍 = ⟨𝑥, (𝑔 ↾ pred(𝑥, 𝐴, 𝑅))⟩
4		bnj1296.11	. . . 4 ⊢ 𝑊 = ⟨𝑥, (ℎ ↾ pred(𝑥, 𝐴, 𝑅))⟩
5	2, 3, 4	3eqtr4g 2820	. . 3 ⊢ (𝜓 → 𝑍 = 𝑊)
6	5	fveq2d 6889	. 2 ⊢ (𝜓 → (𝐺‘𝑍) = (𝐺‘𝑊))
7		bnj1296.7	. . . 4 ⊢ (𝜓 ↔ (𝜑 ∧ 𝑥 ∈ 𝐸 ∧ ∀𝑦 ∈ 𝐸 ¬ 𝑦𝑅𝑥))
8		bnj1296.6	. . . . 5 ⊢ (𝜑 ↔ (𝑅 FrSe 𝐴 ∧ 𝑔 ∈ 𝐶 ∧ ℎ ∈ 𝐶 ∧ (𝑔 ↾ 𝐷) ≠ (ℎ ↾ 𝐷)))
9		bnj1296.10	. . . . . . . . . . 11 ⊢ 𝐾 = {𝑔 ∣ ∃𝑑 ∈ 𝐵 (𝑔 Fn 𝑑 ∧ ∀𝑥 ∈ 𝑑 (𝑔‘𝑥) = (𝐺‘𝑍))}
10	9	bnj1436 35469	. . . . . . . . . 10 ⊢ (𝑔 ∈ 𝐾 → ∃𝑑 ∈ 𝐵 (𝑔 Fn 𝑑 ∧ ∀𝑥 ∈ 𝑑 (𝑔‘𝑥) = (𝐺‘𝑍)))
11		fndm 6642	. . . . . . . . . . 11 ⊢ (𝑔 Fn 𝑑 → dom 𝑔 = 𝑑)
12	11	anim1i 627	. . . . . . . . . 10 ⊢ ((𝑔 Fn 𝑑 ∧ ∀𝑥 ∈ 𝑑 (𝑔‘𝑥) = (𝐺‘𝑍)) → (dom 𝑔 = 𝑑 ∧ ∀𝑥 ∈ 𝑑 (𝑔‘𝑥) = (𝐺‘𝑍)))
13	10, 12	bnj31 35350	. . . . . . . . 9 ⊢ (𝑔 ∈ 𝐾 → ∃𝑑 ∈ 𝐵 (dom 𝑔 = 𝑑 ∧ ∀𝑥 ∈ 𝑑 (𝑔‘𝑥) = (𝐺‘𝑍)))
14		raleq 3316	. . . . . . . . . . 11 ⊢ (dom 𝑔 = 𝑑 → (∀𝑥 ∈ dom 𝑔(𝑔‘𝑥) = (𝐺‘𝑍) ↔ ∀𝑥 ∈ 𝑑 (𝑔‘𝑥) = (𝐺‘𝑍)))
15	14	pm5.32i 585	. . . . . . . . . 10 ⊢ ((dom 𝑔 = 𝑑 ∧ ∀𝑥 ∈ dom 𝑔(𝑔‘𝑥) = (𝐺‘𝑍)) ↔ (dom 𝑔 = 𝑑 ∧ ∀𝑥 ∈ 𝑑 (𝑔‘𝑥) = (𝐺‘𝑍)))
16	15	rexbii 3109	. . . . . . . . 9 ⊢ (∃𝑑 ∈ 𝐵 (dom 𝑔 = 𝑑 ∧ ∀𝑥 ∈ dom 𝑔(𝑔‘𝑥) = (𝐺‘𝑍)) ↔ ∃𝑑 ∈ 𝐵 (dom 𝑔 = 𝑑 ∧ ∀𝑥 ∈ 𝑑 (𝑔‘𝑥) = (𝐺‘𝑍)))
17	13, 16	sylibr 237	. . . . . . . 8 ⊢ (𝑔 ∈ 𝐾 → ∃𝑑 ∈ 𝐵 (dom 𝑔 = 𝑑 ∧ ∀𝑥 ∈ dom 𝑔(𝑔‘𝑥) = (𝐺‘𝑍)))
18		simpr 490	. . . . . . . 8 ⊢ ((dom 𝑔 = 𝑑 ∧ ∀𝑥 ∈ dom 𝑔(𝑔‘𝑥) = (𝐺‘𝑍)) → ∀𝑥 ∈ dom 𝑔(𝑔‘𝑥) = (𝐺‘𝑍))
19	17, 18	bnj31 35350	. . . . . . 7 ⊢ (𝑔 ∈ 𝐾 → ∃𝑑 ∈ 𝐵 ∀𝑥 ∈ dom 𝑔(𝑔‘𝑥) = (𝐺‘𝑍))
20	19	bnj1265 35442	. . . . . 6 ⊢ (𝑔 ∈ 𝐾 → ∀𝑥 ∈ dom 𝑔(𝑔‘𝑥) = (𝐺‘𝑍))
21		bnj1296.2	. . . . . . 7 ⊢ 𝑌 = ⟨𝑥, (𝑓 ↾ pred(𝑥, 𝐴, 𝑅))⟩
22		bnj1296.3	. . . . . . 7 ⊢ 𝐶 = {𝑓 ∣ ∃𝑑 ∈ 𝐵 (𝑓 Fn 𝑑 ∧ ∀𝑥 ∈ 𝑑 (𝑓‘𝑥) = (𝐺‘𝑌))}
23	21, 22, 3, 9	bnj1234 35643	. . . . . 6 ⊢ 𝐶 = 𝐾
24	20, 23	eleq2s 2878	. . . . 5 ⊢ (𝑔 ∈ 𝐶 → ∀𝑥 ∈ dom 𝑔(𝑔‘𝑥) = (𝐺‘𝑍))
25	8, 24	bnj770 35394	. . . 4 ⊢ (𝜑 → ∀𝑥 ∈ dom 𝑔(𝑔‘𝑥) = (𝐺‘𝑍))
26	7, 25	bnj835 35390	. . 3 ⊢ (𝜓 → ∀𝑥 ∈ dom 𝑔(𝑔‘𝑥) = (𝐺‘𝑍))
27		bnj1296.4	. . . . 5 ⊢ 𝐷 = (dom 𝑔 ∩ dom ℎ)
28	27	bnj1292 35445	. . . 4 ⊢ 𝐷 ⊆ dom 𝑔
29		bnj1296.5	. . . . 5 ⊢ 𝐸 = {𝑥 ∈ 𝐷 ∣ (𝑔‘𝑥) ≠ (ℎ‘𝑥)}
30	29, 7	bnj1212 35429	. . . 4 ⊢ (𝜓 → 𝑥 ∈ 𝐷)
31	28, 30	bnj1213 35428	. . 3 ⊢ (𝜓 → 𝑥 ∈ dom 𝑔)
32	26, 31	bnj1294 35447	. 2 ⊢ (𝜓 → (𝑔‘𝑥) = (𝐺‘𝑍))
33		bnj1296.12	. . . . . . . . . . 11 ⊢ 𝐿 = {ℎ ∣ ∃𝑑 ∈ 𝐵 (ℎ Fn 𝑑 ∧ ∀𝑥 ∈ 𝑑 (ℎ‘𝑥) = (𝐺‘𝑊))}
34	33	bnj1436 35469	. . . . . . . . . 10 ⊢ (ℎ ∈ 𝐿 → ∃𝑑 ∈ 𝐵 (ℎ Fn 𝑑 ∧ ∀𝑥 ∈ 𝑑 (ℎ‘𝑥) = (𝐺‘𝑊)))
35		fndm 6642	. . . . . . . . . . 11 ⊢ (ℎ Fn 𝑑 → dom ℎ = 𝑑)
36	35	anim1i 627	. . . . . . . . . 10 ⊢ ((ℎ Fn 𝑑 ∧ ∀𝑥 ∈ 𝑑 (ℎ‘𝑥) = (𝐺‘𝑊)) → (dom ℎ = 𝑑 ∧ ∀𝑥 ∈ 𝑑 (ℎ‘𝑥) = (𝐺‘𝑊)))
37	34, 36	bnj31 35350	. . . . . . . . 9 ⊢ (ℎ ∈ 𝐿 → ∃𝑑 ∈ 𝐵 (dom ℎ = 𝑑 ∧ ∀𝑥 ∈ 𝑑 (ℎ‘𝑥) = (𝐺‘𝑊)))
38		raleq 3316	. . . . . . . . . . 11 ⊢ (dom ℎ = 𝑑 → (∀𝑥 ∈ dom ℎ(ℎ‘𝑥) = (𝐺‘𝑊) ↔ ∀𝑥 ∈ 𝑑 (ℎ‘𝑥) = (𝐺‘𝑊)))
39	38	pm5.32i 585	. . . . . . . . . 10 ⊢ ((dom ℎ = 𝑑 ∧ ∀𝑥 ∈ dom ℎ(ℎ‘𝑥) = (𝐺‘𝑊)) ↔ (dom ℎ = 𝑑 ∧ ∀𝑥 ∈ 𝑑 (ℎ‘𝑥) = (𝐺‘𝑊)))
40	39	rexbii 3109	. . . . . . . . 9 ⊢ (∃𝑑 ∈ 𝐵 (dom ℎ = 𝑑 ∧ ∀𝑥 ∈ dom ℎ(ℎ‘𝑥) = (𝐺‘𝑊)) ↔ ∃𝑑 ∈ 𝐵 (dom ℎ = 𝑑 ∧ ∀𝑥 ∈ 𝑑 (ℎ‘𝑥) = (𝐺‘𝑊)))
41	37, 40	sylibr 237	. . . . . . . 8 ⊢ (ℎ ∈ 𝐿 → ∃𝑑 ∈ 𝐵 (dom ℎ = 𝑑 ∧ ∀𝑥 ∈ dom ℎ(ℎ‘𝑥) = (𝐺‘𝑊)))
42		simpr 490	. . . . . . . 8 ⊢ ((dom ℎ = 𝑑 ∧ ∀𝑥 ∈ dom ℎ(ℎ‘𝑥) = (𝐺‘𝑊)) → ∀𝑥 ∈ dom ℎ(ℎ‘𝑥) = (𝐺‘𝑊))
43	41, 42	bnj31 35350	. . . . . . 7 ⊢ (ℎ ∈ 𝐿 → ∃𝑑 ∈ 𝐵 ∀𝑥 ∈ dom ℎ(ℎ‘𝑥) = (𝐺‘𝑊))
44	43	bnj1265 35442	. . . . . 6 ⊢ (ℎ ∈ 𝐿 → ∀𝑥 ∈ dom ℎ(ℎ‘𝑥) = (𝐺‘𝑊))
45	21, 22, 4, 33	bnj1234 35643	. . . . . 6 ⊢ 𝐶 = 𝐿
46	44, 45	eleq2s 2878	. . . . 5 ⊢ (ℎ ∈ 𝐶 → ∀𝑥 ∈ dom ℎ(ℎ‘𝑥) = (𝐺‘𝑊))
47	8, 46	bnj771 35395	. . . 4 ⊢ (𝜑 → ∀𝑥 ∈ dom ℎ(ℎ‘𝑥) = (𝐺‘𝑊))
48	7, 47	bnj835 35390	. . 3 ⊢ (𝜓 → ∀𝑥 ∈ dom ℎ(ℎ‘𝑥) = (𝐺‘𝑊))
49	27	bnj1293 35446	. . . 4 ⊢ 𝐷 ⊆ dom ℎ
50	49, 30	bnj1213 35428	. . 3 ⊢ (𝜓 → 𝑥 ∈ dom ℎ)
51	48, 50	bnj1294 35447	. 2 ⊢ (𝜓 → (ℎ‘𝑥) = (𝐺‘𝑊))
52	6, 32, 51	3eqtr4d 2805	1 ⊢ (𝜓 → (𝑔‘𝑥) = (ℎ‘𝑥))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1569   ∈ wcel 2144  {cab 2738   ≠ wne 2955  ∀wral 3076  ∃wrex 3086  {crab 3412   ⊆ wss 3895   ∩ cin 4089  ⟨cop 4589   class class class wbr 5102  dom cdm 5650   ↾ cres 5652   Fn wfn 6533  ‘cfv 6538   ∧ w-bnj17 35317   predc-bnj14 35319   FrSe w-bnj15 35323

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-12 2212  ax-ext 2732

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-sb 2099  df-clab 2739  df-cleq 2752  df-clel 2835  df-ral 3077  df-rex 3087  df-rab 3413  df-v 3452  df-ss 3896  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  df-if 4482  df-sn 4584  df-pr 4586  df-op 4590  df-uni 4867  df-br 5103  df-opab 5167  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-res 5662  df-iota 6494  df-fun 6540  df-fn 6541  df-fv 6546  df-bnj17 35318

This theorem is used by:  bnj1311  35654