INTERFACE:
subroutine ncd_inqiodesc(ndims,dims,type,iodnum)DESCRIPTION:
get description of file
ARGUMENTS:
implicit none integer ,intent(in) :: ndims ! number of dims integer ,intent(in) :: dims(:) ! dims integer ,intent(in) :: type ! data type integer ,intent(out):: iodnum ! iodesc numREVISION HISTORY:
LOCAL VARIABLES: