fact: Fixpoint sortBy {a} (p : a → a → bool) (l : list a) : list a := match l with | [] => nil | x :: xs => insert p x (sortBy p xs) end.
imports: Coq.Lists.List Equations(Equations) Equations.Type.EqDec Category.Lib Category.Theory.Coq.Functor Category.Theory.Coq.Applicative Category.Theory.Coq.Monad Category.Theory.Coq.Maybe Coq.Lists.List Coq.Relations.Relations Coq.Reals.ROrderedType Coq.Lists.List