3 csvWrite :: String -> [[String]] -> <Proc> ()
\r
4 csvWrite fname rows = ()
\r
6 /// Like writeEntries but with a transformer function also for values.
\r
7 /// kfun key + vfun value should have the length of header.
\r
8 writeEntries' :: (k -> [String]) -> (v -> [String])
\r
9 -> String -> [String] -> [(k, v)] -> <Proc> ()
\r
10 writeEntries' kfun vfun fname header rows =
\r
11 csvWrite fname $ [header] + [kfun k + vfun v | (k, v) <- rows]
\r