No Annotations
∀[l:BoundedLattice]. ∀[x:Point(l)].  x ≤ 1
{ (Auto THEN Unfold `lattice-le` 0) }
1. l : BoundedLattice
2. x : Point(l)
⊢ x = x ∧ 1 ∈ Point(l)