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

Theorem bnj1523 35468
Description: Technical lemma for bnj1522 35469. 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
bnj1523.1 𝐵 = {𝑑 ∣ (𝑑𝐴 ∧ ∀𝑥𝑑 pred(𝑥, 𝐴, 𝑅) ⊆ 𝑑)}
bnj1523.2 𝑌 = ⟨𝑥, (𝑓 ↾ pred(𝑥, 𝐴, 𝑅))⟩
bnj1523.3 𝐶 = {𝑓 ∣ ∃𝑑𝐵 (𝑓 Fn 𝑑 ∧ ∀𝑥𝑑 (𝑓𝑥) = (𝐺𝑌))}
bnj1523.4 𝐹 = 𝐶
bnj1523.5 (𝜑 ↔ (𝑅 FrSe 𝐴𝐻 Fn 𝐴 ∧ ∀𝑥𝐴 (𝐻𝑥) = (𝐺‘⟨𝑥, (𝐻 ↾ pred(𝑥, 𝐴, 𝑅))⟩)))
bnj1523.6 (𝜓 ↔ (𝜑𝐹𝐻))
bnj1523.7 (𝜒 ↔ (𝜓𝑥𝐴 ∧ (𝐹𝑥) ≠ (𝐻𝑥)))
bnj1523.8 𝐷 = {𝑥𝐴 ∣ (𝐹𝑥) ≠ (𝐻𝑥)}
bnj1523.9 (𝜃 ↔ (𝜒𝑦𝐷 ∧ ∀𝑧𝐷 ¬ 𝑧𝑅𝑦))
Assertion
Ref Expression
bnj1523 ((𝑅 FrSe 𝐴𝐻 Fn 𝐴 ∧ ∀𝑥𝐴 (𝐻𝑥) = (𝐺‘⟨𝑥, (𝐻 ↾ pred(𝑥, 𝐴, 𝑅))⟩)) → 𝐹 = 𝐻)
Distinct variable groups:   𝐴,𝑑,𝑓,𝑥   𝑦,𝐴,𝑧,𝑥   𝐵,𝑓   𝑦,𝐷,𝑧   𝑦,𝐹,𝑧   𝐺,𝑑,𝑓,𝑥   𝑦,𝐺   𝑥,𝐻,𝑦,𝑧   𝑅,𝑑,𝑓,𝑥   𝑦,𝑅,𝑧   𝑌,𝑑   𝜒,𝑦
Allowed substitution hints:   𝜑(𝑥, 𝑦, 𝑧, 𝑓, 𝑑)   𝜓(𝑥, 𝑦, 𝑧, 𝑓, 𝑑)   𝜒(𝑥, 𝑧, 𝑓, 𝑑)   𝜃(𝑥, 𝑦, 𝑧, 𝑓, 𝑑)   𝐵(𝑥, 𝑦, 𝑧, 𝑑)   𝐶(𝑥, 𝑦, 𝑧, 𝑓, 𝑑)   𝐷(𝑥, 𝑓, 𝑑)   𝐹(𝑥, 𝑓, 𝑑)   𝐺(𝑧)   𝐻(𝑓, 𝑑)   𝑌(𝑥, 𝑦, 𝑧, 𝑓)

Proof of Theorem bnj1523
Dummy variables 𝑣 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 bnj1523.5 . 2 (𝜑 ↔ (𝑅 FrSe 𝐴𝐻 Fn 𝐴 ∧ ∀𝑥𝐴 (𝐻𝑥) = (𝐺‘⟨𝑥, (𝐻 ↾ pred(𝑥, 𝐴, 𝑅))⟩)))
2 bnj1523.6 . . 3 (𝜓 ↔ (𝜑𝐹𝐻))
3 bnj1523.9 . . . . . . . . . . . . 13 (𝜃 ↔ (𝜒𝑦𝐷 ∧ ∀𝑧𝐷 ¬ 𝑧𝑅𝑦))
4 bnj1523.7 . . . . . . . . . . . . . 14 (𝜒 ↔ (𝜓𝑥𝐴 ∧ (𝐹𝑥) ≠ (𝐻𝑥)))
5 bnj1523.1 . . . . . . . . . . . . . . . . 17 𝐵 = {𝑑 ∣ (𝑑𝐴 ∧ ∀𝑥𝑑 pred(𝑥, 𝐴, 𝑅) ⊆ 𝑑)}
6 bnj1523.2 . . . . . . . . . . . . . . . . 17 𝑌 = ⟨𝑥, (𝑓 ↾ pred(𝑥, 𝐴, 𝑅))⟩
7 bnj1523.3 . . . . . . . . . . . . . . . . 17 𝐶 = {𝑓 ∣ ∃𝑑𝐵 (𝑓 Fn 𝑑 ∧ ∀𝑥𝑑 (𝑓𝑥) = (𝐺𝑌))}
8 bnj1523.4 . . . . . . . . . . . . . . . . 17 𝐹 = 𝐶
95, 6, 7, 8bnj60 35459 . . . . . . . . . . . . . . . 16 (𝑅 FrSe 𝐴𝐹 Fn 𝐴)
101, 9bnj835 35157 . . . . . . . . . . . . . . 15 (𝜑𝐹 Fn 𝐴)
112, 10bnj832 35156 . . . . . . . . . . . . . 14 (𝜓𝐹 Fn 𝐴)
124, 11bnj835 35157 . . . . . . . . . . . . 13 (𝜒𝐹 Fn 𝐴)
133, 12bnj835 35157 . . . . . . . . . . . 12 (𝜃𝐹 Fn 𝐴)
141simp2bi 1163 . . . . . . . . . . . . . . 15 (𝜑𝐻 Fn 𝐴)
152, 14bnj832 35156 . . . . . . . . . . . . . 14 (𝜓𝐻 Fn 𝐴)
164, 15bnj835 35157 . . . . . . . . . . . . 13 (𝜒𝐻 Fn 𝐴)
173, 16bnj835 35157 . . . . . . . . . . . 12 (𝜃𝐻 Fn 𝐴)
18 bnj213 35279 . . . . . . . . . . . . 13 pred(𝑦, 𝐴, 𝑅) ⊆ 𝐴
1918a1i 11 . . . . . . . . . . . 12 (𝜃 → pred(𝑦, 𝐴, 𝑅) ⊆ 𝐴)
203simp3bi 1164 . . . . . . . . . . . . . . . . 17 (𝜃 → ∀𝑧𝐷 ¬ 𝑧𝑅𝑦)
2120bnj1211 35194 . . . . . . . . . . . . . . . 16 (𝜃 → ∀𝑧(𝑧𝐷 → ¬ 𝑧𝑅𝑦))
22 con2b 362 . . . . . . . . . . . . . . . . 17 ((𝑧𝐷 → ¬ 𝑧𝑅𝑦) ↔ (𝑧𝑅𝑦 → ¬ 𝑧𝐷))
2322albii 1848 . . . . . . . . . . . . . . . 16 (∀𝑧(𝑧𝐷 → ¬ 𝑧𝑅𝑦) ↔ ∀𝑧(𝑧𝑅𝑦 → ¬ 𝑧𝐷))
2421, 23sylib 221 . . . . . . . . . . . . . . 15 (𝜃 → ∀𝑧(𝑧𝑅𝑦 → ¬ 𝑧𝐷))
25 bnj1418 35437 . . . . . . . . . . . . . . . . 17 (𝑧 ∈ pred(𝑦, 𝐴, 𝑅) → 𝑧𝑅𝑦)
2625imim1i 64 . . . . . . . . . . . . . . . 16 ((𝑧𝑅𝑦 → ¬ 𝑧𝐷) → (𝑧 ∈ pred(𝑦, 𝐴, 𝑅) → ¬ 𝑧𝐷))
2726alimi 1840 . . . . . . . . . . . . . . 15 (∀𝑧(𝑧𝑅𝑦 → ¬ 𝑧𝐷) → ∀𝑧(𝑧 ∈ pred(𝑦, 𝐴, 𝑅) → ¬ 𝑧𝐷))
2824, 27syl 18 . . . . . . . . . . . . . 14 (𝜃 → ∀𝑧(𝑧 ∈ pred(𝑦, 𝐴, 𝑅) → ¬ 𝑧𝐷))
2928ralrid 3086 . . . . . . . . . . . . 13 (𝜃 → ∀𝑧 ∈ pred (𝑦, 𝐴, 𝑅) ¬ 𝑧𝐷)
30 bnj1523.8 . . . . . . . . . . . . . 14 𝐷 = {𝑥𝐴 ∣ (𝐹𝑥) ≠ (𝐻𝑥)}
315bnj1309 35419 . . . . . . . . . . . . . . . . . . 19 (𝑤𝐵 → ∀𝑥 𝑤𝐵)
327, 31bnj1307 35420 . . . . . . . . . . . . . . . . . 18 (𝑤𝐶 → ∀𝑥 𝑤𝐶)
3332nfcii 2913 . . . . . . . . . . . . . . . . 17 𝑥𝐶
3433nfuni 4878 . . . . . . . . . . . . . . . 16 𝑥 𝐶
358, 34nfcxfr 2922 . . . . . . . . . . . . . . 15 𝑥𝐹
3635nfcrii 2919 . . . . . . . . . . . . . 14 (𝑤𝐹 → ∀𝑥 𝑤𝐹)
3730, 36bnj1534 35250 . . . . . . . . . . . . 13 𝐷 = {𝑧𝐴 ∣ (𝐹𝑧) ≠ (𝐻𝑧)}
3829, 18, 37bnj1533 35249 . . . . . . . . . . . 12 (𝜃 → ∀𝑧 ∈ pred (𝑦, 𝐴, 𝑅)(𝐹𝑧) = (𝐻𝑧))
3913, 17, 19, 38bnj1536 35251 . . . . . . . . . . 11 (𝜃 → (𝐹 ↾ pred(𝑦, 𝐴, 𝑅)) = (𝐻 ↾ pred(𝑦, 𝐴, 𝑅)))
4039opeq2d 4844 . . . . . . . . . 10 (𝜃 → ⟨𝑦, (𝐹 ↾ pred(𝑦, 𝐴, 𝑅))⟩ = ⟨𝑦, (𝐻 ↾ pred(𝑦, 𝐴, 𝑅))⟩)
4140fveq2d 6885 . . . . . . . . 9 (𝜃 → (𝐺‘⟨𝑦, (𝐹 ↾ pred(𝑦, 𝐴, 𝑅))⟩) = (𝐺‘⟨𝑦, (𝐻 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
425, 6, 7, 8bnj1500 35465 . . . . . . . . . . . . . . 15 (𝑅 FrSe 𝐴 → ∀𝑥𝐴 (𝐹𝑥) = (𝐺‘⟨𝑥, (𝐹 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
431, 42bnj835 35157 . . . . . . . . . . . . . 14 (𝜑 → ∀𝑥𝐴 (𝐹𝑥) = (𝐺‘⟨𝑥, (𝐹 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
442, 43bnj832 35156 . . . . . . . . . . . . 13 (𝜓 → ∀𝑥𝐴 (𝐹𝑥) = (𝐺‘⟨𝑥, (𝐹 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
454, 44bnj835 35157 . . . . . . . . . . . 12 (𝜒 → ∀𝑥𝐴 (𝐹𝑥) = (𝐺‘⟨𝑥, (𝐹 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
4645, 36bnj1529 35467 . . . . . . . . . . 11 (𝜒 → ∀𝑦𝐴 (𝐹𝑦) = (𝐺‘⟨𝑦, (𝐹 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
473, 46bnj835 35157 . . . . . . . . . 10 (𝜃 → ∀𝑦𝐴 (𝐹𝑦) = (𝐺‘⟨𝑦, (𝐹 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
4830ssrab3 4035 . . . . . . . . . . 11 𝐷𝐴
493simp2bi 1163 . . . . . . . . . . 11 (𝜃𝑦𝐷)
5048, 49bnj1213 35195 . . . . . . . . . 10 (𝜃𝑦𝐴)
5147, 50bnj1294 35214 . . . . . . . . 9 (𝜃 → (𝐹𝑦) = (𝐺‘⟨𝑦, (𝐹 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
521simp3bi 1164 . . . . . . . . . . . . . 14 (𝜑 → ∀𝑥𝐴 (𝐻𝑥) = (𝐺‘⟨𝑥, (𝐻 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
532, 52bnj832 35156 . . . . . . . . . . . . 13 (𝜓 → ∀𝑥𝐴 (𝐻𝑥) = (𝐺‘⟨𝑥, (𝐻 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
544, 53bnj835 35157 . . . . . . . . . . . 12 (𝜒 → ∀𝑥𝐴 (𝐻𝑥) = (𝐺‘⟨𝑥, (𝐻 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
55 ax-5 1939 . . . . . . . . . . . 12 (𝑣𝐻 → ∀𝑥 𝑣𝐻)
5654, 55bnj1529 35467 . . . . . . . . . . 11 (𝜒 → ∀𝑦𝐴 (𝐻𝑦) = (𝐺‘⟨𝑦, (𝐻 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
573, 56bnj835 35157 . . . . . . . . . 10 (𝜃 → ∀𝑦𝐴 (𝐻𝑦) = (𝐺‘⟨𝑦, (𝐻 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
5857, 50bnj1294 35214 . . . . . . . . 9 (𝜃 → (𝐻𝑦) = (𝐺‘⟨𝑦, (𝐻 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
5941, 51, 583eqtr4d 2807 . . . . . . . 8 (𝜃 → (𝐹𝑦) = (𝐻𝑦))
6030, 36bnj1534 35250 . . . . . . . . . . 11 𝐷 = {𝑦𝐴 ∣ (𝐹𝑦) ≠ (𝐻𝑦)}
6160bnj1538 35252 . . . . . . . . . 10 (𝑦𝐷 → (𝐹𝑦) ≠ (𝐻𝑦))
623, 61bnj836 35158 . . . . . . . . 9 (𝜃 → (𝐹𝑦) ≠ (𝐻𝑦))
6362neneqd 2962 . . . . . . . 8 (𝜃 → ¬ (𝐹𝑦) = (𝐻𝑦))
6459, 63pm2.65i 196 . . . . . . 7 ¬ 𝜃
6564nex 1829 . . . . . 6 ¬ ∃𝑦𝜃
661simp1bi 1162 . . . . . . . . . 10 (𝜑𝑅 FrSe 𝐴)
672, 66bnj832 35156 . . . . . . . . 9 (𝜓𝑅 FrSe 𝐴)
684, 67bnj835 35157 . . . . . . . 8 (𝜒𝑅 FrSe 𝐴)
6948a1i 11 . . . . . . . 8 (𝜒𝐷𝐴)
704simp2bi 1163 . . . . . . . . . 10 (𝜒𝑥𝐴)
714simp3bi 1164 . . . . . . . . . 10 (𝜒 → (𝐹𝑥) ≠ (𝐻𝑥))
7230reqabi 3438 . . . . . . . . . 10 (𝑥𝐷 ↔ (𝑥𝐴 ∧ (𝐹𝑥) ≠ (𝐻𝑥)))
7370, 71, 72sylanbrc 594 . . . . . . . . 9 (𝜒𝑥𝐷)
7473ne0d 4294 . . . . . . . 8 (𝜒𝐷 ≠ ∅)
75 bnj69 35407 . . . . . . . 8 ((𝑅 FrSe 𝐴𝐷𝐴𝐷 ≠ ∅) → ∃𝑦𝐷𝑧𝐷 ¬ 𝑧𝑅𝑦)
7668, 69, 74, 75syl3anc 1397 . . . . . . 7 (𝜒 → ∃𝑦𝐷𝑧𝐷 ¬ 𝑧𝑅𝑦)
7776, 3bnj1209 35193 . . . . . 6 (𝜒 → ∃𝑦𝜃)
7865, 77mto 200 . . . . 5 ¬ 𝜒
7978nex 1829 . . . 4 ¬ ∃𝑥𝜒
802simprbi 502 . . . . . 6 (𝜓𝐹𝐻)
8111, 15, 80, 36bnj1542 35254 . . . . 5 (𝜓 → ∃𝑥𝐴 (𝐹𝑥) ≠ (𝐻𝑥))
825, 6, 7, 8, 1, 2bnj1525 35466 . . . . 5 (𝜓 → ∀𝑥𝜓)
8381, 4, 82bnj1521 35248 . . . 4 (𝜓 → ∃𝑥𝜒)
8479, 83mto 200 . . 3 ¬ 𝜓
852, 84bnj1541 35253 . 2 (𝜑𝐹 = 𝐻)
861, 85sylbir 238 1 ((𝑅 FrSe 𝐴𝐻 Fn 𝐴 ∧ ∀𝑥𝐴 (𝐻𝑥) = (𝐺‘⟨𝑥, (𝐻 ↾ pred(𝑥, 𝐴, 𝑅))⟩)) → 𝐹 = 𝐻)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wb 209  wa 400  w3a 1102  wal 1567   = wceq 1569  wex 1808  wcel 2142  {cab 2740  wne 2957  wral 3078  wrex 3088  {crab 3415  wss 3904  c0 4285  cop 4594   cuni 4871   class class class wbr 5108  cres 5662   Fn wfn 6531  cfv 6536   predc-bnj14 35086   FrSe w-bnj15 35090
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1824  ax-4 1838  ax-5 1939  ax-6 1996  ax-7 2037  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5237  ax-sep 5256  ax-nul 5268  ax-pow 5335  ax-pr 5403  ax-un 7734  ax-reg 9552  ax-inf2 9608
This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1103  df-3an 1104  df-tru 1572  df-fal 1582  df-ex 1809  df-nf 1813  df-sb 2096  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3079  df-rex 3089  df-reu 3369  df-rab 3416  df-v 3456  df-sbc 3744  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4487  df-pw 4563  df-sn 4589  df-pr 4591  df-op 4595  df-uni 4872  df-iun 4957  df-br 5109  df-opab 5173  df-mpt 5192  df-tr 5218  df-id 5555  df-eprel 5560  df-po 5568  df-so 5569  df-fr 5613  df-we 5615  df-xp 5666  df-rel 5667  df-cnv 5668  df-co 5669  df-dm 5670  df-rn 5671  df-res 5672  df-ima 5673  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-om 7861  df-1o 8451  df-bnj17 35085  df-bnj14 35087  df-bnj13 35089  df-bnj15 35091  df-bnj18 35093  df-bnj19 35095
This theorem is used by:  bnj1522  35469
  Copyright terms: Public domain W3C validator