| File |
Line number |
Procedure |
Code |
|
./pkg/mnc/mnc_cw_missingvals.F |
12 |
MNC_CW_VATTR_MISSING |
I vname, |
|
./pkg/mnc/mnc_cw_missingvals.F |
27 |
MNC_CW_VATTR_MISSING |
character*(*) vname |
|
./pkg/mnc/mnc_cw_missingvals.F |
40 |
MNC_CW_VATTR_MISSING |
nvf = IFNBLNK(vname) |
|
./pkg/mnc/mnc_cw_missingvals.F |
41 |
MNC_CW_VATTR_MISSING |
nvl = ILNBLNK(vname) |
|
./pkg/mnc/mnc_cw_missingvals.F |
44 |
MNC_CW_VATTR_MISSING |
CALL MNC_GET_IND(MNC_MAX_ID, vname, mnc_cw_vname, indv, myThid) |
|
./pkg/mnc/mnc_cw_missingvals.F |
47 |
MNC_CW_VATTR_MISSING |
& vname(nvf:nvl), ''' is not defined' |
|
./pkg/mnc/mnc_cwrapper.F |
240 |
MNC_CW_APPEND_VNAME |
I vname, |
|
./pkg/mnc/mnc_cwrapper.F |
255 |
MNC_CW_APPEND_VNAME |
character*(*) vname, gname |
|
./pkg/mnc/mnc_cwrapper.F |
262 |
MNC_CW_APPEND_VNAME |
CALL MNC_GET_IND(MNC_MAX_ID, vname, mnc_cw_vname, indv, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
264 |
MNC_CW_APPEND_VNAME |
CALL MNC_CW_ADD_VNAME(vname, gname, bi_dim, bj_dim, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
277 |
MNC_CW_ADD_VNAME |
I vname, |
|
./pkg/mnc/mnc_cwrapper.F |
300 |
MNC_CW_ADD_VNAME |
character*(*) vname, gname |
|
./pkg/mnc/mnc_cwrapper.F |
310 |
MNC_CW_ADD_VNAME |
nvf = IFNBLNK(vname) |
|
./pkg/mnc/mnc_cwrapper.F |
311 |
MNC_CW_ADD_VNAME |
nvl = ILNBLNK(vname) |
|
./pkg/mnc/mnc_cwrapper.F |
316 |
MNC_CW_ADD_VNAME |
CALL MNC_GET_IND(MNC_MAX_ID, vname, mnc_cw_vname, indv, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
319 |
MNC_CW_ADD_VNAME |
& vname(nvf:nvl), ''' is already defined' |
|
./pkg/mnc/mnc_cwrapper.F |
336 |
MNC_CW_ADD_VNAME |
mnc_cw_vname(indv)(1:(nvl-nvf+1)) = vname(nvf:nvl) |
|
./pkg/mnc/mnc_cwrapper.F |
345 |
MNC_CW_ADD_VNAME |
CALL MNC_CW_ADD_VATTR_TEXT(vname,1,'mitgcm_grid',gname, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
357 |
MNC_CW_DEL_VNAME |
I vname, |
|
./pkg/mnc/mnc_cwrapper.F |
370 |
MNC_CW_DEL_VNAME |
character*(*) vname |
|
./pkg/mnc/mnc_cwrapper.F |
377 |
MNC_CW_DEL_VNAME |
CALL MNC_GET_IND(MNC_MAX_ID, vname, mnc_cw_vname, indv, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
396 |
MNC_CW_ADD_VATTR_TEXT |
I vname, tname, tval, |
|
./pkg/mnc/mnc_cwrapper.F |
407 |
MNC_CW_ADD_VATTR_TEXT |
character*(*) vname, tname, tval |
|
./pkg/mnc/mnc_cwrapper.F |
413 |
MNC_CW_ADD_VATTR_TEXT |
CALL MNC_CW_ADD_VATTR_ANY(vname, 1, |
|
./pkg/mnc/mnc_cwrapper.F |
422 |
MNC_CW_ADD_VATTR_INT |
I vname, iname, ival, |
|
./pkg/mnc/mnc_cwrapper.F |
433 |
MNC_CW_ADD_VATTR_INT |
character*(*) vname, iname |
|
./pkg/mnc/mnc_cwrapper.F |
438 |
MNC_CW_ADD_VATTR_INT |
CALL MNC_CW_ADD_VATTR_ANY(vname, 2, |
|
./pkg/mnc/mnc_cwrapper.F |
447 |
MNC_CW_ADD_VATTR_DBL |
I vname, dname, dval, |
|
./pkg/mnc/mnc_cwrapper.F |
458 |
MNC_CW_ADD_VATTR_DBL |
character*(*) vname, dname |
|
./pkg/mnc/mnc_cwrapper.F |
463 |
MNC_CW_ADD_VATTR_DBL |
CALL MNC_CW_ADD_VATTR_ANY(vname, 3, |
|
./pkg/mnc/mnc_cwrapper.F |
473 |
MNC_CW_ADD_VATTR_ANY |
I vname, |
|
./pkg/mnc/mnc_cwrapper.F |
489 |
MNC_CW_ADD_VATTR_ANY |
character*(*) vname |
|
./pkg/mnc/mnc_cwrapper.F |
503 |
MNC_CW_ADD_VATTR_ANY |
nvf = IFNBLNK(vname) |
|
./pkg/mnc/mnc_cwrapper.F |
504 |
MNC_CW_ADD_VATTR_ANY |
nvl = ILNBLNK(vname) |
|
./pkg/mnc/mnc_cwrapper.F |
507 |
MNC_CW_ADD_VATTR_ANY |
CALL MNC_GET_IND(MNC_MAX_ID, vname, mnc_cw_vname, indv, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
510 |
MNC_CW_ADD_VATTR_ANY |
& vname(nvf:nvl), ''' is not defined' |
|
./pkg/mnc/mnc_var.F |
100 |
MNC_VAR_INIT_ANY |
I vname, |
|
./pkg/mnc/mnc_var.F |
117 |
MNC_VAR_INIT_ANY |
character*(*) fname,gname,vname |
|
./pkg/mnc/mnc_var.F |
134 |
MNC_VAR_INIT_ANY |
lenv = ILNBLNK(vname) |
|
./pkg/mnc/mnc_var.F |
14 |
MNC_VAR_INIT_DBL |
I vname, |
|
./pkg/mnc/mnc_var.F |
192 |
MNC_VAR_INIT_ANY |
IF (mnc_v_names(mnc_fv_ids(indf,j)) .EQ. vname) THEN |
|
./pkg/mnc/mnc_var.F |
196 |
MNC_VAR_INIT_ANY |
& vname(1:lenv), ''' is already defined in file ''', |
|
./pkg/mnc/mnc_var.F |
212 |
MNC_VAR_INIT_ANY |
err = NF_DEF_VAR(fid, vname, vtype, nd, ids, vid) |
|
./pkg/mnc/mnc_var.F |
223 |
MNC_VAR_INIT_ANY |
write(msgbuf,'(5a)') 'defining variable ''', vname(1:lenv), |
|
./pkg/mnc/mnc_var.F |
231 |
MNC_VAR_INIT_ANY |
mnc_v_names(indv)(1:lenv) = vname(1:lenv) |
|
./pkg/mnc/mnc_var.F |
249 |
MNC_VAR_ADD_ATTR_STR |
I vname, |
|
./pkg/mnc/mnc_var.F |
263 |
MNC_VAR_ADD_ATTR_STR |
character*(*) fname,vname,atname,sval |
|
./pkg/mnc/mnc_var.F |
272 |
MNC_VAR_ADD_ATTR_STR |
CALL MNC_VAR_ADD_ATTR_ANY(fname,vname,atname, |
|
./pkg/mnc/mnc_var.F |
283 |
MNC_VAR_ADD_ATTR_DBL |
I vname, |
|
./pkg/mnc/mnc_var.F |
28 |
MNC_VAR_INIT_DBL |
character*(*) fname,gname,vname |
|
./pkg/mnc/mnc_var.F |
298 |
MNC_VAR_ADD_ATTR_DBL |
character*(*) fname,vname,atname |
|
./pkg/mnc/mnc_var.F |
306 |
MNC_VAR_ADD_ATTR_DBL |
CALL MNC_VAR_ADD_ATTR_ANY(fname,vname,atname, |
|
./pkg/mnc/mnc_var.F |
318 |
MNC_VAR_ADD_ATTR_REAL |
I vname, |
|
./pkg/mnc/mnc_var.F |
31 |
MNC_VAR_INIT_DBL |
CALL MNC_VAR_INIT_ANY(fname,gname,vname, NF_DOUBLE, irv,myThid) |
|
./pkg/mnc/mnc_var.F |
333 |
MNC_VAR_ADD_ATTR_REAL |
character*(*) fname,vname,atname |
|
./pkg/mnc/mnc_var.F |
341 |
MNC_VAR_ADD_ATTR_REAL |
CALL MNC_VAR_ADD_ATTR_ANY(fname,vname,atname, |
|
./pkg/mnc/mnc_var.F |
353 |
MNC_VAR_ADD_ATTR_INT |
I vname, |
|
./pkg/mnc/mnc_var.F |
368 |
MNC_VAR_ADD_ATTR_INT |
character*(*) fname,vname,atname |
|
./pkg/mnc/mnc_var.F |
376 |
MNC_VAR_ADD_ATTR_INT |
CALL MNC_VAR_ADD_ATTR_ANY(fname,vname,atname, |
|
./pkg/mnc/mnc_var.F |
388 |
MNC_VAR_ADD_ATTR_ANY |
I vname, |
|
./pkg/mnc/mnc_var.F |
404 |
MNC_VAR_ADD_ATTR_ANY |
character*(*) fname,vname,atname |
|
./pkg/mnc/mnc_var.F |
421 |
MNC_VAR_ADD_ATTR_ANY |
lenv = ILNBLNK(vname) |
|
./pkg/mnc/mnc_var.F |
425 |
MNC_VAR_ADD_ATTR_ANY |
CALL MNC_GET_FVINDS(fname, vname, indf, ind_fv_ids, myThid) |
|
./pkg/mnc/mnc_var.F |
429 |
MNC_VAR_ADD_ATTR_ANY |
& vname(1:lenv), '''' |
|
./pkg/mnc/mnc_var.F |
43 |
MNC_VAR_INIT_REAL |
I vname, |
|
./pkg/mnc/mnc_var.F |
464 |
MNC_VAR_WRITE_DBL |
I vname, |
|
./pkg/mnc/mnc_var.F |
471 |
MNC_VAR_WRITE_DBL |
character*(*) fname,vname |
|
./pkg/mnc/mnc_var.F |
474 |
MNC_VAR_WRITE_DBL |
CALL MNC_VAR_WRITE_ANY(fname,vname,1,0,var,0.0,0, myThid) |
|
./pkg/mnc/mnc_var.F |
482 |
MNC_VAR_WRITE_REAL |
I vname, |
|
./pkg/mnc/mnc_var.F |
489 |
MNC_VAR_WRITE_REAL |
character*(*) fname,vname |
|
./pkg/mnc/mnc_var.F |
492 |
MNC_VAR_WRITE_REAL |
CALL MNC_VAR_WRITE_ANY(fname,vname,2,0,0.0D0,var,0, myThid) |
|
./pkg/mnc/mnc_var.F |
500 |
MNC_VAR_WRITE_INT |
I vname, |
|
./pkg/mnc/mnc_var.F |
507 |
MNC_VAR_WRITE_INT |
character*(*) fname,vname |
|
./pkg/mnc/mnc_var.F |
510 |
MNC_VAR_WRITE_INT |
CALL MNC_VAR_WRITE_ANY(fname,vname,3,0,0.0D0,0.0,var, myThid) |
|
./pkg/mnc/mnc_var.F |
518 |
MNC_VAR_APPEND_DBL |
I vname, |
|
./pkg/mnc/mnc_var.F |
526 |
MNC_VAR_APPEND_DBL |
character*(*) fname,vname |
|
./pkg/mnc/mnc_var.F |
529 |
MNC_VAR_APPEND_DBL |
CALL MNC_VAR_WRITE_ANY(fname,vname,1,append,var,0.0,0, myThid) |
|
./pkg/mnc/mnc_var.F |
537 |
MNC_VAR_APPEND_REAL |
I vname, |
|
./pkg/mnc/mnc_var.F |
545 |
MNC_VAR_APPEND_REAL |
character*(*) fname,vname |
|
./pkg/mnc/mnc_var.F |
548 |
MNC_VAR_APPEND_REAL |
CALL MNC_VAR_WRITE_ANY(fname,vname,2,append,0.0D0,var,0,myThid) |
|
./pkg/mnc/mnc_var.F |
556 |
MNC_VAR_APPEND_INT |
I vname, |
|
./pkg/mnc/mnc_var.F |
564 |
MNC_VAR_APPEND_INT |
character*(*) fname,vname |
|
./pkg/mnc/mnc_var.F |
567 |
MNC_VAR_APPEND_INT |
CALL MNC_VAR_WRITE_ANY(fname,vname,3,append,0.0D0,0.0,var,myThid) |
|
./pkg/mnc/mnc_var.F |
575 |
MNC_VAR_WRITE_ANY |
I vname, |
|
./pkg/mnc/mnc_var.F |
57 |
MNC_VAR_INIT_REAL |
character*(*) fname,gname,vname |
|
./pkg/mnc/mnc_var.F |
590 |
MNC_VAR_WRITE_ANY |
character*(*) fname,vname |
|
./pkg/mnc/mnc_var.F |
607 |
MNC_VAR_WRITE_ANY |
lenv = ILNBLNK(vname) |
|
./pkg/mnc/mnc_var.F |
609 |
MNC_VAR_WRITE_ANY |
CALL MNC_GET_FVINDS(fname, vname, indf, ind_fv_ids, myThid) |
|
./pkg/mnc/mnc_var.F |
60 |
MNC_VAR_INIT_REAL |
CALL MNC_VAR_INIT_ANY(fname,gname,vname, NF_FLOAT, irv,myThid) |
|
./pkg/mnc/mnc_var.F |
613 |
MNC_VAR_WRITE_ANY |
& vname(1:lenv), '''' |
|
./pkg/mnc/mnc_var.F |
660 |
MNC_VAR_WRITE_ANY |
write(msgbuf,'(5a)') 'writing variable ''', vname(1:lenv), |
|
./pkg/mnc/mnc_var.F |
72 |
MNC_VAR_INIT_INT |
I vname, |
|
./pkg/mnc/mnc_var.F |
85 |
MNC_VAR_INIT_INT |
character*(*) fname,gname,vname |
|
./pkg/mnc/mnc_var.F |
88 |
MNC_VAR_INIT_INT |
CALL MNC_VAR_INIT_ANY(fname,gname,vname, NF_INT, irv,myThid) |
|
./pkg/mnc/mnc_utils.F |
177 |
MNC_GET_FVINDS |
I vname, |
|
./pkg/mnc/mnc_utils.F |
193 |
MNC_GET_FVINDS |
character*(*) vname |
|
./pkg/mnc/mnc_utils.F |
203 |
MNC_GET_FVINDS |
lenv = ILNBLNK(vname) |
|
./pkg/mnc/mnc_utils.F |
219 |
MNC_GET_FVINDS |
& .AND. (mnc_v_names(j)(1:n) .EQ. vname(1:n))) THEN |