Fix issue 4

``` haskell
print :: Show a => a -> IO ()
```

print . show  doesn't really make sense.

print is putStrLn . show