singleRow :: Row a -> Result a
singleRow (Row row) = Result (Results.single (Result.single row))
singleRow :: Row a -> Result a
singleRow (Row row) = Result (Results.single (Result.single row))
singleRow (Row row) = Result (Results.single (Result.single row))