Ano(): Error when parameter 'clim' has dimensions less than 4

The dimension number of parameter 'clim' is supposed to be from 2 to 7, while the following code returns error.

data <- array(rnorm(72), c(dat = 1,member = 3, sdate = 4, ftime = 6)) 
clim <- array(rnorm(12), c(dat = 1,member = 3, sdate = 4))
res <- Ano(data, clim)

Error in if ((length(dimvar) > length(dim(clim))) & (dim(clim)[4] != dimvar[4])) { : missing value where TRUE/FALSE needed