contentToPayments :: String -> [Payment]
contentToPayments content = map lineToPayment (lines content)
contentToPayments :: String -> [Payment]
contentToPayments content = map lineToPayment (lines content)
contentToPayments content = map lineToPayment (lines content)