elem ist hier glaube ich laut Aufgabenstellung nicht erlaubt, oder?
ich habs daher auch etwas umständlicher, scheint aber zu funktionieren:
[m] 1. loop found a = if found==0 then [a] else
2. loop found a (x:xs) = if x==a then x:loop 1 a xs else x:loop found a xs
3. einfuegen a (x:xs) = if x == a then x:loop 1 a xs else x:loop 0 a xs[/m]
Hab wohl als Standardaufgabentyp den Text nicht mehr so genau gelesen… die restlichen Vorschriften sind ja immer die gleichen.
Wobei wenn ich ehrlich bin: wäre mir die elem-fkt jetzt nicht hier noch mal über den weg gelaufen hätte ich in der Klausursituation raten müssen wie man sie korrekt verwendet