---

Step * of Lemma geo-le_functionality_wrt_implies

∀[e:BasicGeometry]. ∀[a,b,c,d:Length].  ({a ≤ d supposing b ≤ c}) supposing (c ≤ d and geo_ge(e; b; a))
BY
{ (Auto THEN Unfold `guard` 0 THEN Auto) }

1
1. e : BasicGeometry
2. a : Length
3. b : Length
4. c : Length
5. d : Length
6. geo_ge(e; b; a)
7. c ≤ d
8. b ≤ c
⊢ a ≤ d

---

Latex:

---

Latex:
\mforall{}[e:BasicGeometry].  \mforall{}[a,b,c,d:Length].
    (\{a  \mleq{}  d  supposing  b  \mleq{}  c\})  supposing  (c  \mleq{}  d  and  geo\_ge(e;  b;  a))


By

---

Latex:
(Auto  THEN  Unfold  `guard`  0  THEN  Auto)

---

Home Index