# NOT RUN {
## Create a new NetCDF dataset and define two dimensions
nc <- create.nc("dim.inq.nc")
dim.def.nc(nc, "station", 5)
dim.def.nc(nc, "time", unlim=TRUE)
## Inquire about the dimensions
dim.inq.nc(nc, 0)
dim.inq.nc(nc, "time")
close.nc(nc)
# }
Run the code above in your browser using DataLab