Kann mir vielleicht jemand einen Denkanstoß geben für die Aufgabe?! Ich stehe leider ein wenig auf dem Schlauch...
Man soll ja zeigen, dass die Häufigkeit von Elementen in einer Liste sich nicht ändert, wenn man die Liste umdreht, richtig?
Im Evaluation Viewer bekomme ich schließlich dieses Ziel
Code: Alles auswählen
if{?::(k),
if{hd(k) = x,
hd(k) # snoc(reverse(tl(k)), hd(k)) = ⁺(hd(k) # tl(k)),
x # snoc(reverse(tl(k)), hd(k)) = x # tl(k)},
true}

Hat jemand einen Tipp?