Step
*
of Lemma
funtype-unroll-last-eq
∀[T:Type]. ∀[n:ℕ]. ∀[A:ℕn ⟶ Type].
  (funtype(n;A;T) = if (n =z 0) then T else funtype(n - 1;A;(A (n - 1)) ⟶ T) fi  ∈ Type)
BY
{ (Auto THEN RWO "funtype-unroll-last<" 0 THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[n:\mBbbN{}].  \mforall{}[A:\mBbbN{}n  {}\mrightarrow{}  Type].
    (funtype(n;A;T)  =  if  (n  =\msubz{}  0)  then  T  else  funtype(n  -  1;A;(A  (n  -  1))  {}\mrightarrow{}  T)  fi  )
By
Latex:
(Auto  THEN  RWO  "funtype-unroll-last<"  0  THEN  Auto)
Home
Index