---

Step * 1 1 1 2 1 1 1 1 of Lemma generic-non-empty


1. T : Type
2. X : T
3. R : ℕ ⟶ (T List) ⟶ ℙ
4. p : i:ℕ ⟶ s:(T List) ⟶ (∃s':T List. (s ≤ s' ∧ (R i s')))
5. s : ℕ ⟶ (T List)
6. ∀i:ℕ. (R i (s i))
7. ∀i:ℕ. s i ≤ s (i + 1)
8. ∀i:ℕ. i < ||s i||
9. i : ℕ
10. R i (s i)
11. n : ℕ||s i||
12. i1 : ℕ
13. i1 ≤ 0
⊢ s i1 ≤ s 0
BY
{ (TACTIC:Subst' i1 = 0 ∈ ℤ 0 THEN BLemma `iseg_weakening` THEN Auto) }

---

Latex:

---

Latex:

1.  T  :  Type
2.  X  :  T
3.  R  :  \mBbbN{}  {}\mrightarrow{}  (T  List)  {}\mrightarrow{}  \mBbbP{}
4.  p  :  i:\mBbbN{}  {}\mrightarrow{}  s:(T  List)  {}\mrightarrow{}  (\mexists{}s':T  List.  (s  \mleq{}  s'  \mwedge{}  (R  i  s')))
5.  s  :  \mBbbN{}  {}\mrightarrow{}  (T  List)
6.  \mforall{}i:\mBbbN{}.  (R  i  (s  i))
7.  \mforall{}i:\mBbbN{}.  s  i  \mleq{}  s  (i  +  1)
8.  \mforall{}i:\mBbbN{}.  i  <  ||s  i||
9.  i  :  \mBbbN{}
10.  R  i  (s  i)
11.  n  :  \mBbbN{}||s  i||
12.  i1  :  \mBbbN{}
13.  i1  \mleq{}  0
\mvdash{}  s  i1  \mleq{}  s  0


By

---

Latex:
(TACTIC:Subst'  i1  =  0  0  THEN  BLemma  `iseg\_weakening`  THEN  Auto)

---

Home Index