INTERFACE:
subroutine ncd_defdim(ncid,attrib,value,dimid,cstring,usepio)DESCRIPTION:
Check return status from netcdf call
ARGUMENTS:
implicit none integer ,intent(in) :: ncid ! netcdf file id character(len=*),intent(in) :: attrib ! netcdf attrib integer ,intent(in) :: value ! netcdf attrib value integer ,intent(out):: dimid ! netcdf dimension id character(len=*),intent(in) :: cstring ! comment string logical,optional,intent(in) :: usepio ! use pio libREVISION HISTORY:
LOCAL VARIABLES: