-- Sortieren einer beliebigen Liste mit einer Funktion, die Listenelemente in geordnete Werte überführt. Sortierung durch Einfalten einer Funktion, die die Ergebnisliste mitführt und das nächste Element sortiert einfügt
sortby :: Ord b => (a -> b) -> [a] -> [a]
sortby f = foldr (insertby f) []