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 35567
Description: Technical lemma for bnj1522 35568. 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 35558 . . . . . . . . . . . . . . . 16 (𝑅 FrSe 𝐴𝐹 Fn 𝐴)
101, 9bnj835 35256 . . . . . . . . . . . . . . 15 (𝜑𝐹 Fn 𝐴)
112, 10bnj832 35255 . . . . . . . . . . . . . 14 (𝜓𝐹 Fn 𝐴)
124, 11bnj835 35256 . . . . . . . . . . . . 13 (𝜒𝐹 Fn 𝐴)
133, 12bnj835 35256 . . . . . . . . . . . 12 (𝜃𝐹 Fn 𝐴)
141simp2bi 1164 . . . . . . . . . . . . . . 15 (𝜑𝐻 Fn 𝐴)
152, 14bnj832 35255 . . . . . . . . . . . . . 14 (𝜓𝐻 Fn 𝐴)
164, 15bnj835 35256 . . . . . . . . . . . . 13 (𝜒𝐻 Fn 𝐴)
173, 16bnj835 35256 . . . . . . . . . . . 12 (𝜃𝐻 Fn 𝐴)
18 bnj213 35378 . . . . . . . . . . . . 13 pred(𝑦, 𝐴, 𝑅) ⊆ 𝐴
1918a1i 11 . . . . . . . . . . . 12 (𝜃 → pred(𝑦, 𝐴, 𝑅) ⊆ 𝐴)
203simp3bi 1165 . . . . . . . . . . . . . . . . 17 (𝜃 → ∀𝑧𝐷 ¬ 𝑧𝑅𝑦)
2120bnj1211 35293 . . . . . . . . . . . . . . . 16 (𝜃 → ∀𝑧(𝑧𝐷 → ¬ 𝑧𝑅𝑦))
22 con2b 362 . . . . . . . . . . . . . . . . 17 ((𝑧𝐷 → ¬ 𝑧𝑅𝑦) ↔ (𝑧𝑅𝑦 → ¬ 𝑧𝐷))
2322albii 1852 . . . . . . . . . . . . . . . 16 (∀𝑧(𝑧𝐷 → ¬ 𝑧𝑅𝑦) ↔ ∀𝑧(𝑧𝑅𝑦 → ¬ 𝑧𝐷))
2421, 23sylib 221 . . . . . . . . . . . . . . 15 (𝜃 → ∀𝑧(𝑧𝑅𝑦 → ¬ 𝑧𝐷))
25 bnj1418 35536 . . . . . . . . . . . . . . . . 17 (𝑧 ∈ pred(𝑦, 𝐴, 𝑅) → 𝑧𝑅𝑦)
2625imim1i 64 . . . . . . . . . . . . . . . 16 ((𝑧𝑅𝑦 → ¬ 𝑧𝐷) → (𝑧 ∈ pred(𝑦, 𝐴, 𝑅) → ¬ 𝑧𝐷))
2726alimi 1844 . . . . . . . . . . . . . . 15 (∀𝑧(𝑧𝑅𝑦 → ¬ 𝑧𝐷) → ∀𝑧(𝑧 ∈ pred(𝑦, 𝐴, 𝑅) → ¬ 𝑧𝐷))
2824, 27syl 18 . . . . . . . . . . . . . 14 (𝜃 → ∀𝑧(𝑧 ∈ pred(𝑦, 𝐴, 𝑅) → ¬ 𝑧𝐷))
2928ralrid 3086 . . . . . . . . . . . . 13 (𝜃 → ∀𝑧 ∈ pred (𝑦, 𝐴, 𝑅) ¬ 𝑧𝐷)
30 bnj1523.8 . . . . . . . . . . . . . 14 𝐷 = {𝑥𝐴 ∣ (𝐹𝑥) ≠ (𝐻𝑥)}
315bnj1309 35518 . . . . . . . . . . . . . . . . . . 19 (𝑤𝐵 → ∀𝑥 𝑤𝐵)
327, 31bnj1307 35519 . . . . . . . . . . . . . . . . . 18 (𝑤𝐶 → ∀𝑥 𝑤𝐶)
3332nfcii 2913 . . . . . . . . . . . . . . . . 17 𝑥𝐶
3433nfuni 4877 . . . . . . . . . . . . . . . 16 𝑥 𝐶
358, 34nfcxfr 2922 . . . . . . . . . . . . . . 15 𝑥𝐹
3635nfcrii 2919 . . . . . . . . . . . . . 14 (𝑤𝐹 → ∀𝑥 𝑤𝐹)
3730, 36bnj1534 35349 . . . . . . . . . . . . 13 𝐷 = {𝑧𝐴 ∣ (𝐹𝑧) ≠ (𝐻𝑧)}
3829, 18, 37bnj1533 35348 . . . . . . . . . . . 12 (𝜃 → ∀𝑧 ∈ pred (𝑦, 𝐴, 𝑅)(𝐹𝑧) = (𝐻𝑧))
3913, 17, 19, 38bnj1536 35350 . . . . . . . . . . 11 (𝜃 → (𝐹 ↾ pred(𝑦, 𝐴, 𝑅)) = (𝐻 ↾ pred(𝑦, 𝐴, 𝑅)))
4039opeq2d 4843 . . . . . . . . . 10 (𝜃 → ⟨𝑦, (𝐹 ↾ pred(𝑦, 𝐴, 𝑅))⟩ = ⟨𝑦, (𝐻 ↾ pred(𝑦, 𝐴, 𝑅))⟩)
4140fveq2d 6886 . . . . . . . . 9 (𝜃 → (𝐺‘⟨𝑦, (𝐹 ↾ pred(𝑦, 𝐴, 𝑅))⟩) = (𝐺‘⟨𝑦, (𝐻 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
425, 6, 7, 8bnj1500 35564 . . . . . . . . . . . . . . 15 (𝑅 FrSe 𝐴 → ∀𝑥𝐴 (𝐹𝑥) = (𝐺‘⟨𝑥, (𝐹 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
431, 42bnj835 35256 . . . . . . . . . . . . . 14 (𝜑 → ∀𝑥𝐴 (𝐹𝑥) = (𝐺‘⟨𝑥, (𝐹 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
442, 43bnj832 35255 . . . . . . . . . . . . 13 (𝜓 → ∀𝑥𝐴 (𝐹𝑥) = (𝐺‘⟨𝑥, (𝐹 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
454, 44bnj835 35256 . . . . . . . . . . . 12 (𝜒 → ∀𝑥𝐴 (𝐹𝑥) = (𝐺‘⟨𝑥, (𝐹 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
4645, 36bnj1529 35566 . . . . . . . . . . 11 (𝜒 → ∀𝑦𝐴 (𝐹𝑦) = (𝐺‘⟨𝑦, (𝐹 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
473, 46bnj835 35256 . . . . . . . . . 10 (𝜃 → ∀𝑦𝐴 (𝐹𝑦) = (𝐺‘⟨𝑦, (𝐹 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
4830ssrab3 4033 . . . . . . . . . . 11 𝐷𝐴
493simp2bi 1164 . . . . . . . . . . 11 (𝜃𝑦𝐷)
5048, 49bnj1213 35294 . . . . . . . . . 10 (𝜃𝑦𝐴)
5147, 50bnj1294 35313 . . . . . . . . 9 (𝜃 → (𝐹𝑦) = (𝐺‘⟨𝑦, (𝐹 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
521simp3bi 1165 . . . . . . . . . . . . . 14 (𝜑 → ∀𝑥𝐴 (𝐻𝑥) = (𝐺‘⟨𝑥, (𝐻 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
532, 52bnj832 35255 . . . . . . . . . . . . 13 (𝜓 → ∀𝑥𝐴 (𝐻𝑥) = (𝐺‘⟨𝑥, (𝐻 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
544, 53bnj835 35256 . . . . . . . . . . . 12 (𝜒 → ∀𝑥𝐴 (𝐻𝑥) = (𝐺‘⟨𝑥, (𝐻 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
55 ax-5 1943 . . . . . . . . . . . 12 (𝑣𝐻 → ∀𝑥 𝑣𝐻)
5654, 55bnj1529 35566 . . . . . . . . . . 11 (𝜒 → ∀𝑦𝐴 (𝐻𝑦) = (𝐺‘⟨𝑦, (𝐻 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
573, 56bnj835 35256 . . . . . . . . . 10 (𝜃 → ∀𝑦𝐴 (𝐻𝑦) = (𝐺‘⟨𝑦, (𝐻 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
5857, 50bnj1294 35313 . . . . . . . . 9 (𝜃 → (𝐻𝑦) = (𝐺‘⟨𝑦, (𝐻 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
5941, 51, 583eqtr4d 2807 . . . . . . . 8 (𝜃 → (𝐹𝑦) = (𝐻𝑦))
6030, 36bnj1534 35349 . . . . . . . . . . 11 𝐷 = {𝑦𝐴 ∣ (𝐹𝑦) ≠ (𝐻𝑦)}
6160bnj1538 35351 . . . . . . . . . 10 (𝑦𝐷 → (𝐹𝑦) ≠ (𝐻𝑦))
623, 61bnj836 35257 . . . . . . . . 9 (𝜃 → (𝐹𝑦) ≠ (𝐻𝑦))
6362neneqd 2962 . . . . . . . 8 (𝜃 → ¬ (𝐹𝑦) = (𝐻𝑦))
6459, 63pm2.65i 196 . . . . . . 7 ¬ 𝜃
6564nex 1833 . . . . . 6 ¬ ∃𝑦𝜃
661simp1bi 1163 . . . . . . . . . 10 (𝜑𝑅 FrSe 𝐴)
672, 66bnj832 35255 . . . . . . . . 9 (𝜓𝑅 FrSe 𝐴)
684, 67bnj835 35256 . . . . . . . 8 (𝜒𝑅 FrSe 𝐴)
6948a1i 11 . . . . . . . 8 (𝜒𝐷𝐴)
704simp2bi 1164 . . . . . . . . . 10 (𝜒𝑥𝐴)
714simp3bi 1165 . . . . . . . . . 10 (𝜒 → (𝐹𝑥) ≠ (𝐻𝑥))
7230reqabi 3437 . . . . . . . . . 10 (𝑥𝐷 ↔ (𝑥𝐴 ∧ (𝐹𝑥) ≠ (𝐻𝑥)))
7370, 71, 72sylanbrc 595 . . . . . . . . 9 (𝜒𝑥𝐷)
7473ne0d 4291 . . . . . . . 8 (𝜒𝐷 ≠ ∅)
75 bnj69 35506 . . . . . . . 8 ((𝑅 FrSe 𝐴𝐷𝐴𝐷 ≠ ∅) → ∃𝑦𝐷𝑧𝐷 ¬ 𝑧𝑅𝑦)
7668, 69, 74, 75syl3anc 1398 . . . . . . 7 (𝜒 → ∃𝑦𝐷𝑧𝐷 ¬ 𝑧𝑅𝑦)
7776, 3bnj1209 35292 . . . . . 6 (𝜒 → ∃𝑦𝜃)
7865, 77mto 200 . . . . 5 ¬ 𝜒
7978nex 1833 . . . 4 ¬ ∃𝑥𝜒
802simprbi 503 . . . . . 6 (𝜓𝐹𝐻)
8111, 15, 80, 36bnj1542 35353 . . . . 5 (𝜓 → ∃𝑥𝐴 (𝐹𝑥) ≠ (𝐻𝑥))
825, 6, 7, 8, 1, 2bnj1525 35565 . . . . 5 (𝜓 → ∀𝑥𝜓)
8381, 4, 82bnj1521 35347 . . . 4 (𝜓 → ∃𝑥𝜒)
8479, 83mto 200 . . 3 ¬ 𝜓
852, 84bnj1541 35352 . 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 401  w3a 1103  wal 1568   = wceq 1570  wex 1812  wcel 2145  {cab 2740  wne 2957  wral 3078  wrex 3088  {crab 3414  wss 3902  c0 4282  cop 4593   cuni 4870   class class class wbr 5107  cres 5661   Fn wfn 6532  cfv 6537   predc-bnj14 35185   FrSe w-bnj15 35189
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2734  ax-rep 5236  ax-sep 5255  ax-nul 5267  ax-pow 5334  ax-pr 5402  ax-un 7739  ax-reg 9567  ax-inf2 9623
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  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 3368  df-rab 3415  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4283  df-if 4486  df-pw 4562  df-sn 4588  df-pr 4590  df-op 4594  df-uni 4871  df-iun 4956  df-br 5108  df-opab 5172  df-mpt 5191  df-tr 5217  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-om 7866  df-1o 8458  df-bnj17 35184  df-bnj14 35186  df-bnj13 35188  df-bnj15 35190  df-bnj18 35192  df-bnj19 35194
This theorem is used by:  bnj1522  35568
  Copyright terms: Public domain W3C validator