Users' Mathboxes Mathbox for Jonathan Ben-Naim < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  bnj1296 Structured version   Visualization version   GIF version

Theorem bnj1296 34032
Description: Technical lemma for bnj60 34073. 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
StepHypRef Expression
1 bnj1296.18 . . . . 5 (𝜓 → (𝑔 ↾ pred(𝑥, 𝐴, 𝑅)) = ( ↾ pred(𝑥, 𝐴, 𝑅)))
21opeq2d 4881 . . . 4 (𝜓 → ⟨𝑥, (𝑔 ↾ pred(𝑥, 𝐴, 𝑅))⟩ = ⟨𝑥, ( ↾ pred(𝑥, 𝐴, 𝑅))⟩)
3 bnj1296.9 . . . 4 𝑍 = ⟨𝑥, (𝑔 ↾ pred(𝑥, 𝐴, 𝑅))⟩
4 bnj1296.11 . . . 4 𝑊 = ⟨𝑥, ( ↾ pred(𝑥, 𝐴, 𝑅))⟩
52, 3, 43eqtr4g 2798 . . 3 (𝜓𝑍 = 𝑊)
65fveq2d 6896 . 2 (𝜓 → (𝐺𝑍) = (𝐺𝑊))
7 bnj1296.7 . . . 4 (𝜓 ↔ (𝜑𝑥𝐸 ∧ ∀𝑦𝐸 ¬ 𝑦𝑅𝑥))
8 bnj1296.6 . . . . 5 (𝜑 ↔ (𝑅 FrSe 𝐴𝑔𝐶𝐶 ∧ (𝑔𝐷) ≠ (𝐷)))
9 bnj1296.10 . . . . . . . . . . 11 𝐾 = {𝑔 ∣ ∃𝑑𝐵 (𝑔 Fn 𝑑 ∧ ∀𝑥𝑑 (𝑔𝑥) = (𝐺𝑍))}
109bnj1436 33850 . . . . . . . . . 10 (𝑔𝐾 → ∃𝑑𝐵 (𝑔 Fn 𝑑 ∧ ∀𝑥𝑑 (𝑔𝑥) = (𝐺𝑍)))
11 fndm 6653 . . . . . . . . . . 11 (𝑔 Fn 𝑑 → dom 𝑔 = 𝑑)
1211anim1i 616 . . . . . . . . . 10 ((𝑔 Fn 𝑑 ∧ ∀𝑥𝑑 (𝑔𝑥) = (𝐺𝑍)) → (dom 𝑔 = 𝑑 ∧ ∀𝑥𝑑 (𝑔𝑥) = (𝐺𝑍)))
1310, 12bnj31 33730 . . . . . . . . 9 (𝑔𝐾 → ∃𝑑𝐵 (dom 𝑔 = 𝑑 ∧ ∀𝑥𝑑 (𝑔𝑥) = (𝐺𝑍)))
14 raleq 3323 . . . . . . . . . . 11 (dom 𝑔 = 𝑑 → (∀𝑥 ∈ dom 𝑔(𝑔𝑥) = (𝐺𝑍) ↔ ∀𝑥𝑑 (𝑔𝑥) = (𝐺𝑍)))
1514pm5.32i 576 . . . . . . . . . 10 ((dom 𝑔 = 𝑑 ∧ ∀𝑥 ∈ dom 𝑔(𝑔𝑥) = (𝐺𝑍)) ↔ (dom 𝑔 = 𝑑 ∧ ∀𝑥𝑑 (𝑔𝑥) = (𝐺𝑍)))
1615rexbii 3095 . . . . . . . . 9 (∃𝑑𝐵 (dom 𝑔 = 𝑑 ∧ ∀𝑥 ∈ dom 𝑔(𝑔𝑥) = (𝐺𝑍)) ↔ ∃𝑑𝐵 (dom 𝑔 = 𝑑 ∧ ∀𝑥𝑑 (𝑔𝑥) = (𝐺𝑍)))
1713, 16sylibr 233 . . . . . . . 8 (𝑔𝐾 → ∃𝑑𝐵 (dom 𝑔 = 𝑑 ∧ ∀𝑥 ∈ dom 𝑔(𝑔𝑥) = (𝐺𝑍)))
18 simpr 486 . . . . . . . 8 ((dom 𝑔 = 𝑑 ∧ ∀𝑥 ∈ dom 𝑔(𝑔𝑥) = (𝐺𝑍)) → ∀𝑥 ∈ dom 𝑔(𝑔𝑥) = (𝐺𝑍))
1917, 18bnj31 33730 . . . . . . 7 (𝑔𝐾 → ∃𝑑𝐵𝑥 ∈ dom 𝑔(𝑔𝑥) = (𝐺𝑍))
2019bnj1265 33823 . . . . . 6 (𝑔𝐾 → ∀𝑥 ∈ dom 𝑔(𝑔𝑥) = (𝐺𝑍))
21 bnj1296.2 . . . . . . 7 𝑌 = ⟨𝑥, (𝑓 ↾ pred(𝑥, 𝐴, 𝑅))⟩
22 bnj1296.3 . . . . . . 7 𝐶 = {𝑓 ∣ ∃𝑑𝐵 (𝑓 Fn 𝑑 ∧ ∀𝑥𝑑 (𝑓𝑥) = (𝐺𝑌))}
2321, 22, 3, 9bnj1234 34024 . . . . . 6 𝐶 = 𝐾
2420, 23eleq2s 2852 . . . . 5 (𝑔𝐶 → ∀𝑥 ∈ dom 𝑔(𝑔𝑥) = (𝐺𝑍))
258, 24bnj770 33774 . . . 4 (𝜑 → ∀𝑥 ∈ dom 𝑔(𝑔𝑥) = (𝐺𝑍))
267, 25bnj835 33770 . . 3 (𝜓 → ∀𝑥 ∈ dom 𝑔(𝑔𝑥) = (𝐺𝑍))
27 bnj1296.4 . . . . 5 𝐷 = (dom 𝑔 ∩ dom )
2827bnj1292 33826 . . . 4 𝐷 ⊆ dom 𝑔
29 bnj1296.5 . . . . 5 𝐸 = {𝑥𝐷 ∣ (𝑔𝑥) ≠ (𝑥)}
3029, 7bnj1212 33810 . . . 4 (𝜓𝑥𝐷)
3128, 30bnj1213 33809 . . 3 (𝜓𝑥 ∈ dom 𝑔)
3226, 31bnj1294 33828 . 2 (𝜓 → (𝑔𝑥) = (𝐺𝑍))
33 bnj1296.12 . . . . . . . . . . 11 𝐿 = { ∣ ∃𝑑𝐵 ( Fn 𝑑 ∧ ∀𝑥𝑑 (𝑥) = (𝐺𝑊))}
3433bnj1436 33850 . . . . . . . . . 10 (𝐿 → ∃𝑑𝐵 ( Fn 𝑑 ∧ ∀𝑥𝑑 (𝑥) = (𝐺𝑊)))
35 fndm 6653 . . . . . . . . . . 11 ( Fn 𝑑 → dom = 𝑑)
3635anim1i 616 . . . . . . . . . 10 (( Fn 𝑑 ∧ ∀𝑥𝑑 (𝑥) = (𝐺𝑊)) → (dom = 𝑑 ∧ ∀𝑥𝑑 (𝑥) = (𝐺𝑊)))
3734, 36bnj31 33730 . . . . . . . . 9 (𝐿 → ∃𝑑𝐵 (dom = 𝑑 ∧ ∀𝑥𝑑 (𝑥) = (𝐺𝑊)))
38 raleq 3323 . . . . . . . . . . 11 (dom = 𝑑 → (∀𝑥 ∈ dom (𝑥) = (𝐺𝑊) ↔ ∀𝑥𝑑 (𝑥) = (𝐺𝑊)))
3938pm5.32i 576 . . . . . . . . . 10 ((dom = 𝑑 ∧ ∀𝑥 ∈ dom (𝑥) = (𝐺𝑊)) ↔ (dom = 𝑑 ∧ ∀𝑥𝑑 (𝑥) = (𝐺𝑊)))
4039rexbii 3095 . . . . . . . . 9 (∃𝑑𝐵 (dom = 𝑑 ∧ ∀𝑥 ∈ dom (𝑥) = (𝐺𝑊)) ↔ ∃𝑑𝐵 (dom = 𝑑 ∧ ∀𝑥𝑑 (𝑥) = (𝐺𝑊)))
4137, 40sylibr 233 . . . . . . . 8 (𝐿 → ∃𝑑𝐵 (dom = 𝑑 ∧ ∀𝑥 ∈ dom (𝑥) = (𝐺𝑊)))
42 simpr 486 . . . . . . . 8 ((dom = 𝑑 ∧ ∀𝑥 ∈ dom (𝑥) = (𝐺𝑊)) → ∀𝑥 ∈ dom (𝑥) = (𝐺𝑊))
4341, 42bnj31 33730 . . . . . . 7 (𝐿 → ∃𝑑𝐵𝑥 ∈ dom (𝑥) = (𝐺𝑊))
4443bnj1265 33823 . . . . . 6 (𝐿 → ∀𝑥 ∈ dom (𝑥) = (𝐺𝑊))
4521, 22, 4, 33bnj1234 34024 . . . . . 6 𝐶 = 𝐿
4644, 45eleq2s 2852 . . . . 5 (𝐶 → ∀𝑥 ∈ dom (𝑥) = (𝐺𝑊))
478, 46bnj771 33775 . . . 4 (𝜑 → ∀𝑥 ∈ dom (𝑥) = (𝐺𝑊))
487, 47bnj835 33770 . . 3 (𝜓 → ∀𝑥 ∈ dom (𝑥) = (𝐺𝑊))
4927bnj1293 33827 . . . 4 𝐷 ⊆ dom
5049, 30bnj1213 33809 . . 3 (𝜓𝑥 ∈ dom )
5148, 50bnj1294 33828 . 2 (𝜓 → (𝑥) = (𝐺𝑊))
526, 32, 513eqtr4d 2783 1 (𝜓 → (𝑔𝑥) = (𝑥))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 397  w3a 1088   = wceq 1542  wcel 2107  {cab 2710  wne 2941  wral 3062  wrex 3071  {crab 3433  cin 3948  wss 3949  cop 4635   class class class wbr 5149  dom cdm 5677  cres 5679   Fn wfn 6539  cfv 6544  w-bnj17 33697   predc-bnj14 33699   FrSe w-bnj15 33703
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-12 2172  ax-ext 2704
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-sb 2069  df-clab 2711  df-cleq 2725  df-clel 2811  df-ral 3063  df-rex 3072  df-rab 3434  df-v 3477  df-dif 3952  df-un 3954  df-in 3956  df-ss 3966  df-nul 4324  df-if 4530  df-sn 4630  df-pr 4632  df-op 4636  df-uni 4910  df-br 5150  df-opab 5212  df-rel 5684  df-cnv 5685  df-co 5686  df-dm 5687  df-res 5689  df-iota 6496  df-fun 6546  df-fn 6547  df-fv 6552  df-bnj17 33698
This theorem is referenced by:  bnj1311  34035
  Copyright terms: Public domain W3C validator