Step
*
of Lemma
decidable__exists_int_seg
∀i,j:ℤ.  ∀[F:{i..j-} ⟶ ℙ{u}]. ((∀k:{i..j-}. Dec(F[k])) 
⇒ Dec(∃k:{i..j-}. F[k]))
BY
{ (Auto
   THEN RenameVar `d' (-1)
   THEN UseWitness ⌜eval i' = i in
                    eval j' = j in
                      int_seg_decide(d;i';j')⌝⋅
   THEN Repeat ((CallByValueReduce 0 THEN Auto))
   THEN (Refine `hasvalueallHasValue` []⋅ THEN Auto)
   THEN Refine `callbyvalueInt` []⋅
   THEN Auto) }
Latex:
Latex:
\mforall{}i,j:\mBbbZ{}.    \mforall{}[F:\{i..j\msupminus{}\}  {}\mrightarrow{}  \mBbbP{}\{u\}].  ((\mforall{}k:\{i..j\msupminus{}\}.  Dec(F[k]))  {}\mRightarrow{}  Dec(\mexists{}k:\{i..j\msupminus{}\}.  F[k]))
By
Latex:
(Auto
  THEN  RenameVar  `d'  (-1)
  THEN  UseWitness  \mkleeneopen{}eval  i'  =  i  in
                                    eval  j'  =  j  in
                                        int\_seg\_decide(d;i';j')\mkleeneclose{}\mcdot{}
  THEN  Repeat  ((CallByValueReduce  0  THEN  Auto))
  THEN  (Refine  `hasvalueallHasValue`  []\mcdot{}  THEN  Auto)
  THEN  Refine  `callbyvalueInt`  []\mcdot{}
  THEN  Auto)
Home
Index