Step * of Lemma rless_functionality

x1,x2,y1,y2:ℝ.  (x1 < y1 ⇐⇒ x2 < y2) supposing ((y1 y2) and (x1 x2))
BY
(Auto
   THEN All
   (Unfold `req`)⋅
   THEN (AllHyps (RWO "rless-iff-large-diff") THENA Auto)
   THEN (InstHyp [⌜13⌝(-1)⋅ THENA Auto)
   THEN (BLemma `rless-iff4` THENA Auto)
   THEN RepeatFor (ParallelLast)
   THEN (D -1 THENA Auto)
   THEN (InstHyp [⌜m⌝5⋅ THENA Auto)
   THEN (InstHyp [⌜m⌝6⋅ THENA Auto)
   THEN RepeatFor (((RWO "absval_ifthenelse" (-2) THENA Auto) THEN (SplitOnHypITE -2  THENA Auto)))
   THEN Auto') }


Latex:


Latex:
\mforall{}x1,x2,y1,y2:\mBbbR{}.    (x1  <  y1  \mLeftarrow{}{}\mRightarrow{}  x2  <  y2)  supposing  ((y1  =  y2)  and  (x1  =  x2))


By


Latex:
(Auto
  THEN  All
  (Unfold  `req`)\mcdot{}
  THEN  (AllHyps  (RWO  "rless-iff-large-diff")  THENA  Auto)
  THEN  (InstHyp  [\mkleeneopen{}13\mkleeneclose{}]  (-1)\mcdot{}  THENA  Auto)
  THEN  (BLemma  `rless-iff4`  THENA  Auto)
  THEN  RepeatFor  2  (ParallelLast)
  THEN  (D  -1  THENA  Auto)
  THEN  (InstHyp  [\mkleeneopen{}m\mkleeneclose{}]  5\mcdot{}  THENA  Auto)
  THEN  (InstHyp  [\mkleeneopen{}m\mkleeneclose{}]  6\mcdot{}  THENA  Auto)
  THEN  RepeatFor  2  (((RWO  "absval\_ifthenelse"  (-2)  THENA  Auto)  THEN  (SplitOnHypITE  -2    THENA  Auto)))
  THEN  Auto')




Home Index