Something I like to do is:

    import Debug.Trace
    wtf v x = trace (show x) v

    someFunction x = anotherFunction x `wtf` x

This allows me to tack `wtf` onto the end of otherwise unchanged expressions to do print debugging