---

Step * 1 2 of Lemma lexico_well_fnd

.....upcase..... 
1. [T] : Type
2. [R] : T ⟶ T ⟶ ℙ
3. WellFnd{i}(T;a,b.R[a;b])
4. m : ℤ
5. [%2] : 0 < m
6. WellFnd{i}({L:T List| ||L|| = (m - 1) ∈ ℕ} ;as,bs.as lexico(T; a,b.R[a;b]) bs)
⊢ WellFnd{i}({L:T List| ||L|| = m ∈ ℕ} ;as,bs.as lexico(T; a,b.R[a;b]) bs)
BY
{ xxx((InstLemma `lexico_wf` [⌜T⌝;⌜R⌝]⋅ THENA Auto) THEN PromoteHyp (-1) (-2))xxx }

1
1. [T] : Type
2. [R] : T ⟶ T ⟶ ℙ
3. WellFnd{i}(T;a,b.R[a;b])
4. m : ℤ
5. [%2] : 0 < m
6. lexico(T; a,b.R[a;b]) ∈ (T List) ⟶ (T List) ⟶ ℙ
7. WellFnd{i}({L:T List| ||L|| = (m - 1) ∈ ℕ} ;as,bs.as lexico(T; a,b.R[a;b]) bs)
⊢ WellFnd{i}({L:T List| ||L|| = m ∈ ℕ} ;as,bs.as lexico(T; a,b.R[a;b]) bs)

---

Latex:

---

Latex:
.....upcase..... 
1.  [T]  :  Type
2.  [R]  :  T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}
3.  WellFnd\{i\}(T;a,b.R[a;b])
4.  m  :  \mBbbZ{}
5.  [\%2]  :  0  <  m
6.  WellFnd\{i\}(\{L:T  List|  ||L||  =  (m  -  1)\}  ;as,bs.as  lexico(T;  a,b.R[a;b])  bs)
\mvdash{}  WellFnd\{i\}(\{L:T  List|  ||L||  =  m\}  ;as,bs.as  lexico(T;  a,b.R[a;b])  bs)


By

---

Latex:
xxx((InstLemma  `lexico\_wf`  [\mkleeneopen{}T\mkleeneclose{};\mkleeneopen{}R\mkleeneclose{}]\mcdot{}  THENA  Auto)  THEN  PromoteHyp  (-1)  (-2))xxx

---

Home Index