nuke haskell duplicate and replace it