w

rspatial · Jun 21, 2023 · 37924be · 37924be
1 parent 39aebdc
commit 37924be
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/R/ncdf.R b/R/ncdf.R
@@ -217,6 +217,11 @@
 setMethod("writeCDF", signature(x="SpatRaster"),
 	function(x, filename, varname, longname="", unit="", split=FALSE, ...) {
 		filename <- trimws(filename)
+		if (length(filename) > 1) {
+			if (length(filename) != nlyr(x)) {
+				stop("either provide a single filename, or the same number as nlyr(x)")
+			}
+		}
 		stopifnot(filename != "")
 		if (split) {
 			y <- sds(as.list(x))