---

Step * of Lemma free-from-atom-outr2

∀[B,A:Type]. ∀[x:B + A]. ∀[a:Atom1].  (a#outr(x):A) supposing ((¬↑isl(x)) and a#x:B + A)
BY
{ ((D 0 THENA Auto)
   THEN InstLemma `free-from-atom-outr` []
   THEN RepeatFor 3 (ParallelLast')
   THEN RepeatFor 2 ((At ⌜Type⌝ (D 0)⋅ THENA Auto))
   THEN BackThruSomeHyp
   THEN Auto
   THEN FreeFromAtomApElim_aux Id ⌜x⌝⋅
   THEN FreeFromAtomTriviality
   THEN Auto
   THEN DoSubsume
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[B,A:Type].  \mforall{}[x:B  +  A].  \mforall{}[a:Atom1].    (a\#outr(x):A)  supposing  ((\mneg{}\muparrow{}isl(x))  and  a\#x:B  +  A)


By

---

Latex:
((D  0  THENA  Auto)
  THEN  InstLemma  `free-from-atom-outr`  []
  THEN  RepeatFor  3  (ParallelLast')
  THEN  RepeatFor  2  ((At  \mkleeneopen{}Type\mkleeneclose{}  (D  0)\mcdot{}  THENA  Auto))
  THEN  BackThruSomeHyp
  THEN  Auto
  THEN  FreeFromAtomApElim\_aux  Id  \mkleeneopen{}x\mkleeneclose{}\mcdot{}
  THEN  FreeFromAtomTriviality
  THEN  Auto
  THEN  DoSubsume
  THEN  Auto)

---

Home Index