File |
Line number |
Procedure |
Code |
./pkg/mnc/mnc_cwrapper.F |
464 |
MNC_CW_ADD_VATTR_DBL |
I vname, dname, dval, |
./pkg/mnc/mnc_cwrapper.F |
475 |
MNC_CW_ADD_VATTR_DBL |
character*(*) vname, dname |
./pkg/mnc/mnc_cwrapper.F |
481 |
MNC_CW_ADD_VATTR_DBL |
& ' ', ' ', dname, ' ', ival, dval, myThid ) |
./pkg/mnc/mnc_cwrapper.F |
492 |
MNC_CW_ADD_VATTR_ANY |
I tname, iname, dname, |
./pkg/mnc/mnc_cwrapper.F |
507 |
MNC_CW_ADD_VATTR_ANY |
character*(*) tname, iname, dname |
./pkg/mnc/mnc_cwrapper.F |
589 |
MNC_CW_ADD_VATTR_ANY |
n1 = IFNBLNK(dname) |
./pkg/mnc/mnc_cwrapper.F |
590 |
MNC_CW_ADD_VATTR_ANY |
n2 = ILNBLNK(dname) |
./pkg/mnc/mnc_cwrapper.F |
592 |
MNC_CW_ADD_VATTR_ANY |
mnc_cw_vdnm(n,indv)(1:(n2-n1+1)) = dname(n1:n2) |
./pkg/mnc/mnc_dim.F |
115 |
MNC_DIM_INIT_ALL_CV |
& .AND. (dname(dnf:dnl) .EQ. mnc_d_names(j)(1:ntmp))) THEN |
./pkg/mnc/mnc_dim.F |
119 |
MNC_DIM_INIT_ALL_CV |
& dname(dnf:dnl), ''' already exists within file ''', |
./pkg/mnc/mnc_dim.F |
13 |
MNC_DIM_INIT |
I dname, |
./pkg/mnc/mnc_dim.F |
145 |
MNC_DIM_INIT_ALL_CV |
err = NF_DEF_DIM(mnc_f_info(indf,2), dname(dnf:dnl), tlen, idd) |
./pkg/mnc/mnc_dim.F |
147 |
MNC_DIM_INIT_ALL_CV |
& 'dim ''', dname(dnf:dnl), ''' in file ''', fname(1:nf) |
./pkg/mnc/mnc_dim.F |
153 |
MNC_DIM_INIT_ALL_CV |
CALL MNC_CW_WRITE_CVAR(fname, dname(dnf:dnl), |
./pkg/mnc/mnc_dim.F |
160 |
MNC_DIM_INIT_ALL_CV |
mnc_d_names(indd)(1:(dnl-dnf+1)) = dname(dnf:dnl) |
./pkg/mnc/mnc_dim.F |
22 |
MNC_DIM_INIT |
character*(*) fname, dname |
./pkg/mnc/mnc_dim.F |
25 |
MNC_DIM_INIT |
CALL MNC_DIM_INIT_ALL(fname, dname, dlen, 'Y', myThid) |
./pkg/mnc/mnc_dim.F |
37 |
MNC_DIM_INIT_ALL |
I dname, |
./pkg/mnc/mnc_dim.F |
50 |
MNC_DIM_INIT_ALL |
character*(*) fname, dname |
./pkg/mnc/mnc_dim.F |
54 |
MNC_DIM_INIT_ALL |
CALL MNC_DIM_INIT_ALL_CV(fname,dname,dlen,doWrite,-1,-1,myThid) |
./pkg/mnc/mnc_dim.F |
66 |
MNC_DIM_INIT_ALL_CV |
I dname, |
./pkg/mnc/mnc_dim.F |
83 |
MNC_DIM_INIT_ALL_CV |
character*(*) fname, dname |
./pkg/mnc/mnc_dim.F |
97 |
MNC_DIM_INIT_ALL_CV |
dnf = IFNBLNK(dname) |
./pkg/mnc/mnc_dim.F |
98 |
MNC_DIM_INIT_ALL_CV |
dnl = ILNBLNK(dname) |
./pkg/mnc/mnc_grid.F |
224 |
MNC_GRID_GET_DIMIND |
I dname, |
./pkg/mnc/mnc_grid.F |
237 |
MNC_GRID_GET_DIMIND |
character*(*) dname |
./pkg/mnc/mnc_grid.F |
248 |
MNC_GRID_GET_DIMIND |
n = ILNBLNK(dname) |
./pkg/mnc/mnc_grid.F |
258 |
MNC_GRID_GET_DIMIND |
& .AND. (mnc_d_names(l)(1:n1) .EQ. dname(1:n))) THEN |