Írj egy olyan f :: Ord a => a -> [a] -> [a] függvényt, ami az első paraméterben kapott elemet beszúrja a második paraméterben kapott rendezett listába úgy, hogy a beszúrás után is rendezett maradjon a lista.

Néhány teszteset:

f 2 [3,9,10] == [2,3,9,10]

f 6 [-1,3,5,10,20] == [-1,3,5,6,10,20]

f 3 [] == [3]

f 5 [1,2,5,5,10] == [1,2,5,5,5,10]

f ‘i’ “abdfmnpq” == “abdfimnpq”