---

Step * of Lemma A-leftunit'

∀[Val:Type]. ∀[n:ℕ]. ∀[AType:array{i:l}(Val;n)]. ∀[T,S:Type]. ∀[x:T]. ∀[f:T ⟶ (A-map'(array-model(AType)) S)].
  ((A-bind'(array-model(AType)) (A-return'(array-model(AType)) x) f) = (f x) ∈ (A-map'(array-model(AType)) S))
BY
{ (RepUR ``A-bind' A-return' array-model A-map'`` 0 THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[Val:Type].  \mforall{}[n:\mBbbN{}].  \mforall{}[AType:array\{i:l\}(Val;n)].  \mforall{}[T,S:Type].  \mforall{}[x:T].
\mforall{}[f:T  {}\mrightarrow{}  (A-map'(array-model(AType))  S)].
    ((A-bind'(array-model(AType))  (A-return'(array-model(AType))  x)  f)  =  (f  x))


By

---

Latex:
(RepUR  ``A-bind'  A-return'  array-model  A-map'``  0  THEN  Auto)

---

Home Index