Step
*
of Lemma
ifthenelse_functionality_wrt_implies
∀b1,b2:𝔹.
  ∀[p1,q1,p2,q2:ℙ].  (b1 = b2 
⇒ {q1 
⇒ q2} 
⇒ {p1 
⇒ p2} 
⇒ {if b1 then p1 else q1 fi  
⇒ if b2 then p2 else q2 fi })
BY
{ (Unfold `guard` 0
   THEN Auto
   THEN (AutoSplit THEN ElimVar `b1' THEN Auto THEN All Reduce)
   THEN RepeatFor 2 (MoveToConcl (-1))
   THEN AutoSplit) }
Latex:
Latex:
\mforall{}b1,b2:\mBbbB{}.
    \mforall{}[p1,q1,p2,q2:\mBbbP{}].
        (b1  =  b2
        {}\mRightarrow{}  \{q1  {}\mRightarrow{}  q2\}
        {}\mRightarrow{}  \{p1  {}\mRightarrow{}  p2\}
        {}\mRightarrow{}  \{if  b1  then  p1  else  q1  fi    {}\mRightarrow{}  if  b2  then  p2  else  q2  fi  \})
By
Latex:
(Unfold  `guard`  0
  THEN  Auto
  THEN  (AutoSplit  THEN  ElimVar  `b1'  THEN  Auto  THEN  All  Reduce)
  THEN  RepeatFor  2  (MoveToConcl  (-1))
  THEN  AutoSplit)
Home
Index