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 32343
Description: Technical lemma for bnj1522 32344. 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 32334 . . . . . . . . . . . . . . . 16 (𝑅 FrSe 𝐴𝐹 Fn 𝐴)
101, 9bnj835 32030 . . . . . . . . . . . . . . 15 (𝜑𝐹 Fn 𝐴)
112, 10bnj832 32029 . . . . . . . . . . . . . 14 (𝜓𝐹 Fn 𝐴)
124, 11bnj835 32030 . . . . . . . . . . . . 13 (𝜒𝐹 Fn 𝐴)
133, 12bnj835 32030 . . . . . . . . . . . 12 (𝜃𝐹 Fn 𝐴)
141simp2bi 1142 . . . . . . . . . . . . . . 15 (𝜑𝐻 Fn 𝐴)
152, 14bnj832 32029 . . . . . . . . . . . . . 14 (𝜓𝐻 Fn 𝐴)
164, 15bnj835 32030 . . . . . . . . . . . . 13 (𝜒𝐻 Fn 𝐴)
173, 16bnj835 32030 . . . . . . . . . . . 12 (𝜃𝐻 Fn 𝐴)
18 bnj213 32154 . . . . . . . . . . . . 13 pred(𝑦, 𝐴, 𝑅) ⊆ 𝐴
1918a1i 11 . . . . . . . . . . . 12 (𝜃 → pred(𝑦, 𝐴, 𝑅) ⊆ 𝐴)
203simp3bi 1143 . . . . . . . . . . . . . . . . 17 (𝜃 → ∀𝑧𝐷 ¬ 𝑧𝑅𝑦)
2120bnj1211 32069 . . . . . . . . . . . . . . . 16 (𝜃 → ∀𝑧(𝑧𝐷 → ¬ 𝑧𝑅𝑦))
22 con2b 362 . . . . . . . . . . . . . . . . 17 ((𝑧𝐷 → ¬ 𝑧𝑅𝑦) ↔ (𝑧𝑅𝑦 → ¬ 𝑧𝐷))
2322albii 1816 . . . . . . . . . . . . . . . 16 (∀𝑧(𝑧𝐷 → ¬ 𝑧𝑅𝑦) ↔ ∀𝑧(𝑧𝑅𝑦 → ¬ 𝑧𝐷))
2421, 23sylib 220 . . . . . . . . . . . . . . 15 (𝜃 → ∀𝑧(𝑧𝑅𝑦 → ¬ 𝑧𝐷))
25 bnj1418 32312 . . . . . . . . . . . . . . . . 17 (𝑧 ∈ pred(𝑦, 𝐴, 𝑅) → 𝑧𝑅𝑦)
2625imim1i 63 . . . . . . . . . . . . . . . 16 ((𝑧𝑅𝑦 → ¬ 𝑧𝐷) → (𝑧 ∈ pred(𝑦, 𝐴, 𝑅) → ¬ 𝑧𝐷))
2726alimi 1808 . . . . . . . . . . . . . . 15 (∀𝑧(𝑧𝑅𝑦 → ¬ 𝑧𝐷) → ∀𝑧(𝑧 ∈ pred(𝑦, 𝐴, 𝑅) → ¬ 𝑧𝐷))
2824, 27syl 17 . . . . . . . . . . . . . 14 (𝜃 → ∀𝑧(𝑧 ∈ pred(𝑦, 𝐴, 𝑅) → ¬ 𝑧𝐷))
2928bnj1142 32061 . . . . . . . . . . . . 13 (𝜃 → ∀𝑧 ∈ pred (𝑦, 𝐴, 𝑅) ¬ 𝑧𝐷)
30 bnj1523.8 . . . . . . . . . . . . . 14 𝐷 = {𝑥𝐴 ∣ (𝐹𝑥) ≠ (𝐻𝑥)}
315bnj1309 32294 . . . . . . . . . . . . . . . . . . 19 (𝑤𝐵 → ∀𝑥 𝑤𝐵)
327, 31bnj1307 32295 . . . . . . . . . . . . . . . . . 18 (𝑤𝐶 → ∀𝑥 𝑤𝐶)
3332nfcii 2965 . . . . . . . . . . . . . . . . 17 𝑥𝐶
3433nfuni 4844 . . . . . . . . . . . . . . . 16 𝑥 𝐶
358, 34nfcxfr 2975 . . . . . . . . . . . . . . 15 𝑥𝐹
3635nfcrii 2970 . . . . . . . . . . . . . 14 (𝑤𝐹 → ∀𝑥 𝑤𝐹)
3730, 36bnj1534 32125 . . . . . . . . . . . . 13 𝐷 = {𝑧𝐴 ∣ (𝐹𝑧) ≠ (𝐻𝑧)}
3829, 18, 37bnj1533 32124 . . . . . . . . . . . 12 (𝜃 → ∀𝑧 ∈ pred (𝑦, 𝐴, 𝑅)(𝐹𝑧) = (𝐻𝑧))
3913, 17, 19, 38bnj1536 32126 . . . . . . . . . . 11 (𝜃 → (𝐹 ↾ pred(𝑦, 𝐴, 𝑅)) = (𝐻 ↾ pred(𝑦, 𝐴, 𝑅)))
4039opeq2d 4809 . . . . . . . . . 10 (𝜃 → ⟨𝑦, (𝐹 ↾ pred(𝑦, 𝐴, 𝑅))⟩ = ⟨𝑦, (𝐻 ↾ pred(𝑦, 𝐴, 𝑅))⟩)
4140fveq2d 6673 . . . . . . . . 9 (𝜃 → (𝐺‘⟨𝑦, (𝐹 ↾ pred(𝑦, 𝐴, 𝑅))⟩) = (𝐺‘⟨𝑦, (𝐻 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
425, 6, 7, 8bnj1500 32340 . . . . . . . . . . . . . . 15 (𝑅 FrSe 𝐴 → ∀𝑥𝐴 (𝐹𝑥) = (𝐺‘⟨𝑥, (𝐹 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
431, 42bnj835 32030 . . . . . . . . . . . . . 14 (𝜑 → ∀𝑥𝐴 (𝐹𝑥) = (𝐺‘⟨𝑥, (𝐹 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
442, 43bnj832 32029 . . . . . . . . . . . . 13 (𝜓 → ∀𝑥𝐴 (𝐹𝑥) = (𝐺‘⟨𝑥, (𝐹 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
454, 44bnj835 32030 . . . . . . . . . . . 12 (𝜒 → ∀𝑥𝐴 (𝐹𝑥) = (𝐺‘⟨𝑥, (𝐹 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
4645, 36bnj1529 32342 . . . . . . . . . . 11 (𝜒 → ∀𝑦𝐴 (𝐹𝑦) = (𝐺‘⟨𝑦, (𝐹 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
473, 46bnj835 32030 . . . . . . . . . 10 (𝜃 → ∀𝑦𝐴 (𝐹𝑦) = (𝐺‘⟨𝑦, (𝐹 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
4830ssrab3 4056 . . . . . . . . . . 11 𝐷𝐴
493simp2bi 1142 . . . . . . . . . . 11 (𝜃𝑦𝐷)
5048, 49bnj1213 32070 . . . . . . . . . 10 (𝜃𝑦𝐴)
5147, 50bnj1294 32089 . . . . . . . . 9 (𝜃 → (𝐹𝑦) = (𝐺‘⟨𝑦, (𝐹 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
521simp3bi 1143 . . . . . . . . . . . . . 14 (𝜑 → ∀𝑥𝐴 (𝐻𝑥) = (𝐺‘⟨𝑥, (𝐻 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
532, 52bnj832 32029 . . . . . . . . . . . . 13 (𝜓 → ∀𝑥𝐴 (𝐻𝑥) = (𝐺‘⟨𝑥, (𝐻 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
544, 53bnj835 32030 . . . . . . . . . . . 12 (𝜒 → ∀𝑥𝐴 (𝐻𝑥) = (𝐺‘⟨𝑥, (𝐻 ↾ pred(𝑥, 𝐴, 𝑅))⟩))
55 ax-5 1907 . . . . . . . . . . . 12 (𝑣𝐻 → ∀𝑥 𝑣𝐻)
5654, 55bnj1529 32342 . . . . . . . . . . 11 (𝜒 → ∀𝑦𝐴 (𝐻𝑦) = (𝐺‘⟨𝑦, (𝐻 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
573, 56bnj835 32030 . . . . . . . . . 10 (𝜃 → ∀𝑦𝐴 (𝐻𝑦) = (𝐺‘⟨𝑦, (𝐻 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
5857, 50bnj1294 32089 . . . . . . . . 9 (𝜃 → (𝐻𝑦) = (𝐺‘⟨𝑦, (𝐻 ↾ pred(𝑦, 𝐴, 𝑅))⟩))
5941, 51, 583eqtr4d 2866 . . . . . . . 8 (𝜃 → (𝐹𝑦) = (𝐻𝑦))
6030, 36bnj1534 32125 . . . . . . . . . . 11 𝐷 = {𝑦𝐴 ∣ (𝐹𝑦) ≠ (𝐻𝑦)}
6160bnj1538 32127 . . . . . . . . . 10 (𝑦𝐷 → (𝐹𝑦) ≠ (𝐻𝑦))
623, 61bnj836 32031 . . . . . . . . 9 (𝜃 → (𝐹𝑦) ≠ (𝐻𝑦))
6362neneqd 3021 . . . . . . . 8 (𝜃 → ¬ (𝐹𝑦) = (𝐻𝑦))
6459, 63pm2.65i 196 . . . . . . 7 ¬ 𝜃
6564nex 1797 . . . . . 6 ¬ ∃𝑦𝜃
661simp1bi 1141 . . . . . . . . . 10 (𝜑𝑅 FrSe 𝐴)
672, 66bnj832 32029 . . . . . . . . 9 (𝜓𝑅 FrSe 𝐴)
684, 67bnj835 32030 . . . . . . . 8 (𝜒𝑅 FrSe 𝐴)
6948a1i 11 . . . . . . . 8 (𝜒𝐷𝐴)
704simp2bi 1142 . . . . . . . . . 10 (𝜒𝑥𝐴)
714simp3bi 1143 . . . . . . . . . 10 (𝜒 → (𝐹𝑥) ≠ (𝐻𝑥))
7230rabeq2i 3487 . . . . . . . . . 10 (𝑥𝐷 ↔ (𝑥𝐴 ∧ (𝐹𝑥) ≠ (𝐻𝑥)))
7370, 71, 72sylanbrc 585 . . . . . . . . 9 (𝜒𝑥𝐷)
7473ne0d 4300 . . . . . . . 8 (𝜒𝐷 ≠ ∅)
75 bnj69 32282 . . . . . . . 8 ((𝑅 FrSe 𝐴𝐷𝐴𝐷 ≠ ∅) → ∃𝑦𝐷𝑧𝐷 ¬ 𝑧𝑅𝑦)
7668, 69, 74, 75syl3anc 1367 . . . . . . 7 (𝜒 → ∃𝑦𝐷𝑧𝐷 ¬ 𝑧𝑅𝑦)
7776, 3bnj1209 32068 . . . . . 6 (𝜒 → ∃𝑦𝜃)
7865, 77mto 199 . . . . 5 ¬ 𝜒
7978nex 1797 . . . 4 ¬ ∃𝑥𝜒
802simprbi 499 . . . . . 6 (𝜓𝐹𝐻)
8111, 15, 80, 36bnj1542 32129 . . . . 5 (𝜓 → ∃𝑥𝐴 (𝐹𝑥) ≠ (𝐻𝑥))
825, 6, 7, 8, 1, 2bnj1525 32341 . . . . 5 (𝜓 → ∀𝑥𝜓)
8381, 4, 82bnj1521 32123 . . . 4 (𝜓 → ∃𝑥𝜒)
8479, 83mto 199 . . 3 ¬ 𝜓
852, 84bnj1541 32128 . 2 (𝜑𝐹 = 𝐻)
861, 85sylbir 237 1 ((𝑅 FrSe 𝐴𝐻 Fn 𝐴 ∧ ∀𝑥𝐴 (𝐻𝑥) = (𝐺‘⟨𝑥, (𝐻 ↾ pred(𝑥, 𝐴, 𝑅))⟩)) → 𝐹 = 𝐻)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398  w3a 1083  wal 1531   = wceq 1533  wex 1776  wcel 2110  {cab 2799  wne 3016  wral 3138  wrex 3139  {crab 3142  wss 3935  c0 4290  cop 4572   cuni 4837   class class class wbr 5065  cres 5556   Fn wfn 6349  cfv 6354   predc-bnj14 31958   FrSe w-bnj15 31962
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-rep 5189  ax-sep 5202  ax-nul 5209  ax-pow 5265  ax-pr 5329  ax-un 7460  ax-reg 9055  ax-inf2 9103
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1536  df-fal 1546  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-ral 3143  df-rex 3144  df-reu 3145  df-rab 3147  df-v 3496  df-sbc 3772  df-csb 3883  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-pss 3953  df-nul 4291  df-if 4467  df-pw 4540  df-sn 4567  df-pr 4569  df-tp 4571  df-op 4573  df-uni 4838  df-iun 4920  df-br 5066  df-opab 5128  df-mpt 5146  df-tr 5172  df-id 5459  df-eprel 5464  df-po 5473  df-so 5474  df-fr 5513  df-we 5515  df-xp 5560  df-rel 5561  df-cnv 5562  df-co 5563  df-dm 5564  df-rn 5565  df-res 5566  df-ima 5567  df-ord 6193  df-on 6194  df-lim 6195  df-suc 6196  df-iota 6313  df-fun 6356  df-fn 6357  df-f 6358  df-f1 6359  df-fo 6360  df-f1o 6361  df-fv 6362  df-om 7580  df-1o 8101  df-bnj17 31957  df-bnj14 31959  df-bnj13 31961  df-bnj15 31963  df-bnj18 31965  df-bnj19 31967
This theorem is referenced by:  bnj1522  32344
  Copyright terms: Public domain W3C validator