How to get the cudder of a list with foldr?

I have managed to write a cudder that requires equality checks... but that's not good enough -- there should be no required functions :/

I still prefer Scheme BBCode