warning for #3

hypertidy · Jul 25, 2022 · ec061c3 · ec061c3
1 parent 694c401
commit ec061c3
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/R/L3bin.R b/R/L3bin.R
@@ -126,6 +126,9 @@ L3bin <- function(NUMROWS = 2160) {
   numbin <- trunc(2 * NUMROWS * cos(latbin * pi/180) + 0.5)
   basebin <- cumsum(c(1L, numbin[-length(numbin)]))
   totbins = basebin[NUMROWS] + numbin[NUMROWS] - 1
+  if (totbins > (2^31-1)) {
+    message("maximum NUMROWS is approximately 41000, the grid cell logic may overflow - see github issue #3")
+  }
   list(NUMROWS = NUMROWS, latbin = latbin,
        numbin = numbin, basebin = basebin, totbins = totbins)
 }