∀b,a:Top.  (left-endpoint([a, b]) ~ a)
{ (UnivCD THENA Auto) }
1. b : Top@i
2. a : Top@i
⊢ left-endpoint([a, b]) ~ a