writeJSON :: (ToJSON a) => FilePath -> a -> IO ()
writeJSON f = B.writeFile f . encode
writeJSON :: (ToJSON a) => FilePath -> a -> IO ()
writeJSON f = B.writeFile f . encode
writeJSON f = B.writeFile f . encode