getRainWithPast :: (Double, Double) -> IO (Maybe [Weather])
getRainWithPast l = report $ baseQuery `withCoords` l `withPast` TwoHours
getRainWithPast :: (Double, Double) -> IO (Maybe [Weather])
getRainWithPast l = report $ baseQuery `withCoords` l `withPast` TwoHours
getRainWithPast l = report $ baseQuery `withCoords` l `withPast` TwoHours