---

Step * of Lemma union-mono

∀A,B:Type.  ((mono(A) ∧ mono(B)) ⇒ mono(A + B))
BY
{ (Auto
   THEN D 0
   THEN Auto
   THEN D -3
   THEN (FLemma `is-above-inl` [-1] ORELSE FLemma `is-above-inr` [-1])
   THEN Auto
   THEN ExRepD
   THEN HypSubst' (-2) 0
   THEN EqCD
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}A,B:Type.    ((mono(A)  \mwedge{}  mono(B))  {}\mRightarrow{}  mono(A  +  B))


By

---

Latex:
(Auto
  THEN  D  0
  THEN  Auto
  THEN  D  -3
  THEN  (FLemma  `is-above-inl`  [-1]  ORELSE  FLemma  `is-above-inr`  [-1])
  THEN  Auto
  THEN  ExRepD
  THEN  HypSubst'  (-2)  0
  THEN  EqCD
  THEN  Auto)

---

Home Index