Step 
*
 of Lemma 
strictness-subtract-left
∀[a:Top]. (⊥ - a ~ ⊥)
BY
 
{ (Unfold `subtract` 0 THEN SqReasoning THEN Assert ⌜(⊥)↓⌝⋅ THEN BotDiv) }
 
Latex: 
Latex:
\mforall{}[a:Top].  (\mbot{}  -  a  \msim{}  \mbot{})
 By 
Latex:
(Unfold  `subtract`  0  THEN  SqReasoning  THEN  Assert  \mkleeneopen{}(\mbot{})\mdownarrow{}\mkleeneclose{}\mcdot{}  THEN  BotDiv)
Home
Index