---

Step * 1 1 of Lemma Cn-comb_wf

.....subterm..... T:t
1:n
1. T : Type
2. n : ℤ
3. m : ℕ
4. A : ℕm ⟶ Type
5. 0 < m
6. 0 < 1
7. f : funtype(m;A;T)
⊢ f ∈ funtype(m;λk.if k <z 0 then A (k + 1)
                   if (k =z 0) then A 0
                   else A k
                   fi ;T)
BY
{ (DoSubsume THEN Auto THEN BLemma `subtype_rel-equal` THEN Auto THEN EqCD THEN Auto) }

---

Latex:

---

Latex:
.....subterm.....  T:t
1:n
1.  T  :  Type
2.  n  :  \mBbbZ{}
3.  m  :  \mBbbN{}
4.  A  :  \mBbbN{}m  {}\mrightarrow{}  Type
5.  0  <  m
6.  0  <  1
7.  f  :  funtype(m;A;T)
\mvdash{}  f  \mmember{}  funtype(m;\mlambda{}k.if  k  <z  0  then  A  (k  +  1)
                                      if  (k  =\msubz{}  0)  then  A  0
                                      else  A  k
                                      fi  ;T)


By

---

Latex:
(DoSubsume  THEN  Auto  THEN  BLemma  `subtype\_rel-equal`  THEN  Auto  THEN  EqCD  THEN  Auto)

---

Home Index