dataline :: (Read v) => Parser (v,v)
dataline = liftA2 (,) number (string ", " *> number)
dataline :: (Read v) => Parser (v,v)
dataline = liftA2 (,) number (string ", " *> number)
dataline = liftA2 (,) number (string ", " *> number)