---

Step * of Lemma fix-of-add

∀[z:Base]. (fix((λx.(x + z))) ~ ⊥)
BY
{ ((D 0 THENA Auto)
   THEN BLemma `fix_strict_diverge`
   THEN BLemma `is-strict-fun`
   THEN Reduce 0
   THEN Strictness
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[z:Base].  (fix((\mlambda{}x.(x  +  z)))  \msim{}  \mbot{})


By

---

Latex:
((D  0  THENA  Auto)
  THEN  BLemma  `fix\_strict\_diverge`
  THEN  BLemma  `is-strict-fun`
  THEN  Reduce  0
  THEN  Strictness
  THEN  Auto)

---

Home Index