Users' Mathboxes Mathbox for Mario Carneiro < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  msrval Structured version   Visualization version   GIF version

Theorem msrval 35849
Description: Value of the reduct of a pre-statement. (Contributed by Mario Carneiro, 18-Jul-2016.)
Hypotheses
Ref Expression
msrfval.v 𝑉 = (mVars‘𝑇)
msrfval.p 𝑃 = (mPreSt‘𝑇)
msrfval.r 𝑅 = (mStRed‘𝑇)
msrval.z 𝑍 = (𝑉 “ (𝐻 ∪ {𝐴}))
Assertion
Ref Expression
msrval (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃 → (𝑅‘⟨𝐷, 𝐻, 𝐴⟩) = ⟨(𝐷 ∩ (𝑍 × 𝑍)), 𝐻, 𝐴⟩)

Proof of Theorem msrval
Dummy variables 𝑎 𝑠 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 msrfval.v . . . 4 𝑉 = (mVars‘𝑇)
2 msrfval.p . . . 4 𝑃 = (mPreSt‘𝑇)
3 msrfval.r . . . 4 𝑅 = (mStRed‘𝑇)
41, 2, 3msrfval 35848 . . 3 𝑅 = (𝑠𝑃(2nd ‘(1st𝑠)) / (2nd𝑠) / 𝑎⟨((1st ‘(1st𝑠)) ∩ (𝑉 “ ( ∪ {𝑎})) / 𝑧(𝑧 × 𝑧)), , 𝑎⟩)
54a1i 11 . 2 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑅 = (𝑠𝑃(2nd ‘(1st𝑠)) / (2nd𝑠) / 𝑎⟨((1st ‘(1st𝑠)) ∩ (𝑉 “ ( ∪ {𝑎})) / 𝑧(𝑧 × 𝑧)), , 𝑎⟩))
6 fvexd 6877 . . 3 ((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) → (2nd ‘(1st𝑠)) ∈ V)
7 fvexd 6877 . . . 4 (((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) → (2nd𝑠) ∈ V)
8 simpllr 785 . . . . . . . . 9 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → 𝑠 = ⟨𝐷, 𝐻, 𝐴⟩)
98fveq2d 6866 . . . . . . . 8 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (1st𝑠) = (1st ‘⟨𝐷, 𝐻, 𝐴⟩))
109fveq2d 6866 . . . . . . 7 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (1st ‘(1st𝑠)) = (1st ‘(1st ‘⟨𝐷, 𝐻, 𝐴⟩)))
11 eqid 2761 . . . . . . . . . . . . 13 (mDV‘𝑇) = (mDV‘𝑇)
12 eqid 2761 . . . . . . . . . . . . 13 (mEx‘𝑇) = (mEx‘𝑇)
1311, 12, 2elmpst 35847 . . . . . . . . . . . 12 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃 ↔ ((𝐷 ⊆ (mDV‘𝑇) ∧ 𝐷 = 𝐷) ∧ (𝐻 ⊆ (mEx‘𝑇) ∧ 𝐻 ∈ Fin) ∧ 𝐴 ∈ (mEx‘𝑇)))
1413simp1bi 1157 . . . . . . . . . . 11 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃 → (𝐷 ⊆ (mDV‘𝑇) ∧ 𝐷 = 𝐷))
1514simpld 498 . . . . . . . . . 10 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝐷 ⊆ (mDV‘𝑇))
1615ad3antrrr 740 . . . . . . . . 9 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → 𝐷 ⊆ (mDV‘𝑇))
17 fvex 6875 . . . . . . . . . 10 (mDV‘𝑇) ∈ V
1817ssex 5274 . . . . . . . . 9 (𝐷 ⊆ (mDV‘𝑇) → 𝐷 ∈ V)
1916, 18syl 17 . . . . . . . 8 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → 𝐷 ∈ V)
2013simp2bi 1158 . . . . . . . . . 10 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃 → (𝐻 ⊆ (mEx‘𝑇) ∧ 𝐻 ∈ Fin))
2120simprd 499 . . . . . . . . 9 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝐻 ∈ Fin)
2221ad3antrrr 740 . . . . . . . 8 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → 𝐻 ∈ Fin)
2313simp3bi 1159 . . . . . . . . 9 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝐴 ∈ (mEx‘𝑇))
2423ad3antrrr 740 . . . . . . . 8 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → 𝐴 ∈ (mEx‘𝑇))
25 ot1stg 7979 . . . . . . . 8 ((𝐷 ∈ V ∧ 𝐻 ∈ Fin ∧ 𝐴 ∈ (mEx‘𝑇)) → (1st ‘(1st ‘⟨𝐷, 𝐻, 𝐴⟩)) = 𝐷)
2619, 22, 24, 25syl3anc 1389 . . . . . . 7 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (1st ‘(1st ‘⟨𝐷, 𝐻, 𝐴⟩)) = 𝐷)
2710, 26eqtrd 2796 . . . . . 6 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (1st ‘(1st𝑠)) = 𝐷)
281fvexi 6876 . . . . . . . . . 10 𝑉 ∈ V
29 imaexg 7889 . . . . . . . . . 10 (𝑉 ∈ V → (𝑉 “ ( ∪ {𝑎})) ∈ V)
3028, 29ax-mp 5 . . . . . . . . 9 (𝑉 “ ( ∪ {𝑎})) ∈ V
3130uniex 7719 . . . . . . . 8 (𝑉 “ ( ∪ {𝑎})) ∈ V
3231a1i 11 . . . . . . 7 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (𝑉 “ ( ∪ {𝑎})) ∈ V)
33 id 22 . . . . . . . . 9 (𝑧 = (𝑉 “ ( ∪ {𝑎})) → 𝑧 = (𝑉 “ ( ∪ {𝑎})))
34 simplr 778 . . . . . . . . . . . . . 14 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → = (2nd ‘(1st𝑠)))
359fveq2d 6866 . . . . . . . . . . . . . 14 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (2nd ‘(1st𝑠)) = (2nd ‘(1st ‘⟨𝐷, 𝐻, 𝐴⟩)))
36 ot2ndg 7980 . . . . . . . . . . . . . . 15 ((𝐷 ∈ V ∧ 𝐻 ∈ Fin ∧ 𝐴 ∈ (mEx‘𝑇)) → (2nd ‘(1st ‘⟨𝐷, 𝐻, 𝐴⟩)) = 𝐻)
3719, 22, 24, 36syl3anc 1389 . . . . . . . . . . . . . 14 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (2nd ‘(1st ‘⟨𝐷, 𝐻, 𝐴⟩)) = 𝐻)
3834, 35, 373eqtrd 2800 . . . . . . . . . . . . 13 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → = 𝐻)
39 simpr 488 . . . . . . . . . . . . . . 15 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → 𝑎 = (2nd𝑠))
408fveq2d 6866 . . . . . . . . . . . . . . 15 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (2nd𝑠) = (2nd ‘⟨𝐷, 𝐻, 𝐴⟩))
41 ot3rdg 7981 . . . . . . . . . . . . . . . 16 (𝐴 ∈ (mEx‘𝑇) → (2nd ‘⟨𝐷, 𝐻, 𝐴⟩) = 𝐴)
4224, 41syl 17 . . . . . . . . . . . . . . 15 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (2nd ‘⟨𝐷, 𝐻, 𝐴⟩) = 𝐴)
4339, 40, 423eqtrd 2800 . . . . . . . . . . . . . 14 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → 𝑎 = 𝐴)
4443sneqd 4591 . . . . . . . . . . . . 13 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → {𝑎} = {𝐴})
4538, 44uneq12d 4120 . . . . . . . . . . . 12 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → ( ∪ {𝑎}) = (𝐻 ∪ {𝐴}))
4645imaeq2d 6045 . . . . . . . . . . 11 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (𝑉 “ ( ∪ {𝑎})) = (𝑉 “ (𝐻 ∪ {𝐴})))
4746unieqd 4875 . . . . . . . . . 10 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (𝑉 “ ( ∪ {𝑎})) = (𝑉 “ (𝐻 ∪ {𝐴})))
48 msrval.z . . . . . . . . . 10 𝑍 = (𝑉 “ (𝐻 ∪ {𝐴}))
4947, 48eqtr4di 2814 . . . . . . . . 9 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (𝑉 “ ( ∪ {𝑎})) = 𝑍)
5033, 49sylan9eqr 2818 . . . . . . . 8 (((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) ∧ 𝑧 = (𝑉 “ ( ∪ {𝑎}))) → 𝑧 = 𝑍)
5150sqxpeqd 5675 . . . . . . 7 (((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) ∧ 𝑧 = (𝑉 “ ( ∪ {𝑎}))) → (𝑧 × 𝑧) = (𝑍 × 𝑍))
5232, 51csbied 3886 . . . . . 6 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (𝑉 “ ( ∪ {𝑎})) / 𝑧(𝑧 × 𝑧) = (𝑍 × 𝑍))
5327, 52ineq12d 4171 . . . . 5 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → ((1st ‘(1st𝑠)) ∩ (𝑉 “ ( ∪ {𝑎})) / 𝑧(𝑧 × 𝑧)) = (𝐷 ∩ (𝑍 × 𝑍)))
5453, 38, 43oteq123d 4843 . . . 4 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → ⟨((1st ‘(1st𝑠)) ∩ (𝑉 “ ( ∪ {𝑎})) / 𝑧(𝑧 × 𝑧)), , 𝑎⟩ = ⟨(𝐷 ∩ (𝑍 × 𝑍)), 𝐻, 𝐴⟩)
557, 54csbied 3886 . . 3 (((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) → (2nd𝑠) / 𝑎⟨((1st ‘(1st𝑠)) ∩ (𝑉 “ ( ∪ {𝑎})) / 𝑧(𝑧 × 𝑧)), , 𝑎⟩ = ⟨(𝐷 ∩ (𝑍 × 𝑍)), 𝐻, 𝐴⟩)
566, 55csbied 3886 . 2 ((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) → (2nd ‘(1st𝑠)) / (2nd𝑠) / 𝑎⟨((1st ‘(1st𝑠)) ∩ (𝑉 “ ( ∪ {𝑎})) / 𝑧(𝑧 × 𝑧)), , 𝑎⟩ = ⟨(𝐷 ∩ (𝑍 × 𝑍)), 𝐻, 𝐴⟩)
57 id 22 . 2 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃 → ⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃)
58 otex 5430 . . 3 ⟨(𝐷 ∩ (𝑍 × 𝑍)), 𝐻, 𝐴⟩ ∈ V
5958a1i 11 . 2 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃 → ⟨(𝐷 ∩ (𝑍 × 𝑍)), 𝐻, 𝐴⟩ ∈ V)
605, 56, 57, 59fvmptd 6978 1 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃 → (𝑅‘⟨𝐷, 𝐻, 𝐴⟩) = ⟨(𝐷 ∩ (𝑍 × 𝑍)), 𝐻, 𝐴⟩)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 399   = wceq 1559  wcel 2141  Vcvv 3453  csb 3850  cun 3900  cin 3901  wss 3902  {csn 4579  cotp 4587   cuni 4862  cmpt 5178   × cxp 5641  ccnv 5642  cima 5646  cfv 6516  1st c1st 7963  2nd c2nd 7964  Fincfn 8921  mExcmex 35778  mDVcmdv 35779  mVarscmvrs 35780  mPreStcmpst 35784  mStRedcmsr 35785
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1814  ax-4 1828  ax-5 1929  ax-6 1986  ax-7 2027  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-rep 5224  ax-sep 5243  ax-nul 5253  ax-pow 5319  ax-pr 5387  ax-un 7713
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3an 1099  df-tru 1562  df-fal 1572  df-ex 1799  df-nf 1803  df-sb 2090  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3076  df-rex 3086  df-reu 3367  df-rab 3414  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-nul 4284  df-if 4478  df-pw 4554  df-sn 4580  df-pr 4582  df-op 4586  df-ot 4588  df-uni 4863  df-iun 4948  df-br 5098  df-opab 5160  df-mpt 5179  df-id 5538  df-xp 5649  df-rel 5650  df-cnv 5651  df-co 5652  df-dm 5653  df-rn 5654  df-res 5655  df-ima 5656  df-iota 6472  df-fun 6518  df-fn 6519  df-f 6520  df-f1 6521  df-fo 6522  df-f1o 6523  df-fv 6524  df-1st 7965  df-2nd 7966  df-mpst 35804  df-msr 35805
This theorem is referenced by:  msrf  35853  msrid  35856  elmsta  35859  mthmpps  35893
  Copyright terms: Public domain W3C validator