law sorted_tail
import bend-mathlib@0.8.1.0/list.bend as Listimport Base
886# The tail of a nonempty Nat list sorted by Nat.is_le is sorted.
887law sorted_tail:
888 for x: Nat
889 for xs: List<&2, Nat>
890 for h: sorted_by(~Nat, ~Nat.is_le, x <> xs)
891 sorted_by(~Nat, ~Nat.is_le, xs)