proposition: Lemma ord_sorted_eq (A : ordType) (s1 s2 : seq A) : sorted ord s1 -> sorted ord s2 -> s1 =i s2 -> s1 = s2.
proof: Proof. by [apply/irr_sorted_eq/irr/trans | apply/eq_sorted_irr/irr/trans]. Qed.
imports: mathcomp(ssreflect ssrfun ssrnat div ssrbool seq) LemmaOverloading(prelude finmap ordtype) mathcomp(path eqtype) Eqdep