R/yyy.genericResize.R

'.zzz.zzzregrid' <- function(obj,...) {
   print("regrid")
   if (missing(obj))
      obj <- session_grid()
   UseMethod("regrid")
}
'.zzz.zzzregrid.default' <- function(obj,...) {
   print(methods("regrid"))
   print(paste("'regrid' is not implemented for",paste(.sQuote(class(obj)),collapse=", ")))
   NULL
}

Try the ursa package in your browser

Any scripts or data that you put into this service are public.

ursa documentation built on Oct. 17, 2023, 5:11 p.m.