Searched refs:recdim1 (Results 1 – 4 of 4) sorted by relevance
/dports/science/netcdf-fortran/netcdf-fortran-4.5.3/nf_test/ |
H A D | test_read.F | 245 integer recdim1 !/* id of unlimited dimension */ local 259 err = nf_inq(BAD_ID, ndims1, nvars1, ngatts1, recdim1) 263 err = nf_inq(ncid, ndims1, nvars1, ngatts1, recdim1) 276 else if (recdim1 .ne. RECDIM) then 278 + recdim1) 292 err = nf_inq(ncid2, ndims1, nvars1, ngatts1, recdim1) 304 else if (recdim1 .ne. recdim0) then 306 + recdim1) 323 err = nf_inq(ncid2, ndims1, nvars1, ngatts1, recdim1) 341 err = nf_inq(ncid2, ndims1, nvars1, ngatts1, recdim1)
|
H A D | test03_read.F | 245 integer recdim1 !/* id of unlimited dimension */ local 259 err = nf_inq(BAD_ID, ndims1, nvars1, ngatts1, recdim1) 263 err = nf_inq(ncid, ndims1, nvars1, ngatts1, recdim1) 276 else if (recdim1 .ne. RECDIM) then 278 + recdim1) 292 err = nf_inq(ncid2, ndims1, nvars1, ngatts1, recdim1) 304 else if (recdim1 .ne. recdim0) then 306 + recdim1) 323 err = nf_inq(ncid2, ndims1, nvars1, ngatts1, recdim1) 341 err = nf_inq(ncid2, ndims1, nvars1, ngatts1, recdim1)
|
H A D | test03_write.F | 22 integer recdim1 !/* id of unlimited dimension */ local 39 err = nf_inq(ncid, ndims1, nvars1, ngatts1, recdim1) 54 else if (recdim1 .ge. 1) then 57 + recdim1) 299 integer recdim1 local 352 err = nf_inq (ncid, ndims1, nvars1, ngatts1, recdim1)
|
H A D | test_write.F | 22 integer recdim1 !/* id of unlimited dimension */ local 39 err = nf_inq(ncid, ndims1, nvars1, ngatts1, recdim1) 54 else if (recdim1 .ge. 1) then 57 + recdim1) 299 integer recdim1 local 352 err = nf_inq (ncid, ndims1, nvars1, ngatts1, recdim1)
|