Step
*
of Lemma
radd*_functionality
∀[x,y,u,v:ℝ*].  (x = y 
⇒ u = v 
⇒ x + u = y + v)
BY
{ (Intros THEN Unfold `radd*` 0 THEN RWO "-1 -2" 0 THEN Auto THEN Reduce 0 THEN Try (RWO "-1 -2" 0) THEN Auto) }
1
1. [x] : ℝ*
2. [y] : ℝ*
3. [u] : ℝ*
4. [v] : ℝ*
5. x = y
6. u = v
⊢ λa,b. (a + b)*(y;v) = λa,b. (a + b)*(y;v)
Latex:
Latex:
\mforall{}[x,y,u,v:\mBbbR{}*].    (x  =  y  {}\mRightarrow{}  u  =  v  {}\mRightarrow{}  x  +  u  =  y  +  v)
By
Latex:
(Intros
  THEN  Unfold  `radd*`  0
  THEN  RWO  "-1  -2"  0
  THEN  Auto
  THEN  Reduce  0
  THEN  Try  (RWO  "-1  -2"  0)
  THEN  Auto)
Home
Index