---

Step * 1 2 1 1 1 1 2 of Lemma AF-path-barred


1. T : Type
2. t : T
3. R : T ⟶ T ⟶ ℙ
4. alpha : ℕ ⟶ (T?)@i
5. ∀x:ℕ. ((↑isl(alpha x)) ⇒ (∀i:ℕx. ((↑isl(alpha i)) ∧ (¬R[outl(alpha i);outl(alpha x)]))))
6. i : ℕ@i
7. j : ℕ@i
8. i < j
9. ∀x:ℕj + 2. (0 < x ⇒ (↑isl(alpha (x - 1))))
10. x : T@i
11. (alpha j) = (inl x) ∈ (T?)
12. ↑isl(alpha i)
13. y : Unit@i
14. (alpha i) = (inr y ) ∈ (T?)
⊢ R[t;x] ⇒ R[⊥;outl(alpha j)]
BY
{ TACTIC:(Assert ⌜False⌝⋅ THEN Auto THEN DupHyp (-3) THEN HypSubst' (-2) (-1) THEN Auto) }

---

Latex:

---

Latex:

1.  T  :  Type
2.  t  :  T
3.  R  :  T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}
4.  alpha  :  \mBbbN{}  {}\mrightarrow{}  (T?)@i
5.  \mforall{}x:\mBbbN{}.  ((\muparrow{}isl(alpha  x))  {}\mRightarrow{}  (\mforall{}i:\mBbbN{}x.  ((\muparrow{}isl(alpha  i))  \mwedge{}  (\mneg{}R[outl(alpha  i);outl(alpha  x)]))))
6.  i  :  \mBbbN{}@i
7.  j  :  \mBbbN{}@i
8.  i  <  j
9.  \mforall{}x:\mBbbN{}j  +  2.  (0  <  x  {}\mRightarrow{}  (\muparrow{}isl(alpha  (x  -  1))))
10.  x  :  T@i
11.  (alpha  j)  =  (inl  x)
12.  \muparrow{}isl(alpha  i)
13.  y  :  Unit@i
14.  (alpha  i)  =  (inr  y  )
\mvdash{}  R[t;x]  {}\mRightarrow{}  R[\mbot{};outl(alpha  j)]


By

---

Latex:
TACTIC:(Assert  \mkleeneopen{}False\mkleeneclose{}\mcdot{}  THEN  Auto  THEN  DupHyp  (-3)  THEN  HypSubst'  (-2)  (-1)  THEN  Auto)

---

Home Index