implement apply method for Writer compatible to WriterT

apply in WriterT takes a tuple whereas apply in Writer takes two parameters.
Added apply(wa:(W,A)) in Writer to have more compatibility.