proposition: Lemma lem_insert_sorted (l : list nat) (x : nat) : Sorted l -> Sorted (insert l x).
proof: Proof. destruct l; hauto use: Sorted, lem_insert_sorted_hlp db: arith. Qed.
imports: Hammer(Tactics) Arith ZArith List Lia Hammer(Hints) Reals Lra Hammer(Reflect) Nat Psatz String Relations