No Annotations
∀[T:Type]. ∀[eq:EqDecider(T)]. ∀[i:T]. (¬(<i>) = <1-i> ∈ Point(free-DeMorgan-lattice(T;eq)))
{ (Auto THEN Unfold `free-DeMorgan-lattice` 0) }
1. T : Type
2. eq : EqDecider(T)
3. i : T
⊢ ¬(<i>) = <1-i> ∈ Point(free-dist-lattice(T + T; union-deq(T;T;eq;eq)))