Current version:
<-asymmetric : IsEquivalence _≈_ → _≼_ Respects₂ _≈_ →
Antisymmetric _≈_ _≼_ → Asymmetric _<_
<-asymmetric eq resp antisym =
Strict.<-asymmetric sym (Conv.<-resp-≈ _ _ eq resp)
(Conv.<-asym _≈_ _ antisym)
where open IsEquivalence eq
only uses the sym : Symmetric _≈_ property from IsEquivalence, so this lemma is unnecessarily restrictive.
Suggest: refactor to streamline the type (breaking), unless we regard the above as a bug?
More generally, it seems as though the List and Vec versions of Lex might benefit from a more thorough reorganisation/refactoring to simplify their (common, but different!) structure and dependencies, but I'm still looking at this cf. #2671