Step * 2 of Lemma dd_wf


1. : ℕ+
2. : ℝ
3. : ℕ+
4. 10^d N ∈ ℕ+
5. {a:Atom| "display-as" ∈ Atom} 
× {a:Atom| "decimal-rational" ∈ Atom} 
× {z:ℝx} 
× {n:ℕ+d ∈ ℤ
× {n:ℤ|x (r(n)/r(N))| ≤ (r(2)/r(N))} 
6. <"display-as", "decimal-rational", x, d, eval in eval N2 N ÷ in   N2>
a
∈ ({a:Atom| "display-as" ∈ Atom} 
  × {a:Atom| "decimal-rational" ∈ Atom} 
  × {z:ℝx} 
  × {n:ℕ+d ∈ ℤ
  × {n:ℤ|x (r(n)/r(N))| ≤ (r(2)/r(N))} )
⊢ let answer ⟵ a
  in answer ∈ {a:Atom| "display-as" ∈ Atom} 
  × {a:Atom| "decimal-rational" ∈ Atom} 
  × {z:ℝx} 
  × {n:ℕ+d ∈ ℤ
  × {n:ℤ|x (r(n)/r(N))| ≤ (r(2)/r(N))} 
BY
(CallByValueReduce 0⋅ THEN Auto) }


Latex:


Latex:

1.  d  :  \mBbbN{}\msupplus{}
2.  x  :  \mBbbR{}
3.  N  :  \mBbbN{}\msupplus{}
4.  10\^{}d  =  N
5.  a  :  \{a:Atom|  a  =  "display-as"\} 
\mtimes{}  \{a:Atom|  a  =  "decimal-rational"\} 
\mtimes{}  \{z:\mBbbR{}|  z  =  x\} 
\mtimes{}  \{n:\mBbbN{}\msupplus{}|  n  =  d\} 
\mtimes{}  \{n:\mBbbZ{}|  |x  -  (r(n)/r(N))|  \mleq{}  (r(2)/r(N))\} 
6.  <"display-as",  "decimal-rational",  x,  d,  eval  N  =  N  in  eval  N2  =  N  \mdiv{}  2  in      x  N2>  =  a
\mvdash{}  let  answer  \mleftarrow{}{}  a
    in  answer  \mmember{}  \{a:Atom|  a  =  "display-as"\} 
    \mtimes{}  \{a:Atom|  a  =  "decimal-rational"\} 
    \mtimes{}  \{z:\mBbbR{}|  z  =  x\} 
    \mtimes{}  \{n:\mBbbN{}\msupplus{}|  n  =  d\} 
    \mtimes{}  \{n:\mBbbZ{}|  |x  -  (r(n)/r(N))|  \mleq{}  (r(2)/r(N))\} 


By


Latex:
(CallByValueReduce  0\mcdot{}  THEN  Auto)




Home Index