File |
Line number |
Procedure |
Code |
./pkg/mnc/mnc_utils.F |
267 |
MNC_CHK_VTYP_R_NCVAR |
ncgt = ILNBLNK(mnc_cw_gname(ind_cw_g)) |
./pkg/mnc/mnc_utils.F |
274 |
MNC_CHK_VTYP_R_NCVAR |
& mnc_cw_gname(ind_cw_g)(1:ncgt), '''' |
./pkg/mnc/mnc_init.F |
51 |
MNC_INIT |
mnc_cw_gname(g)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_cwrapper.F |
104 |
MNC_CW_DEL_GNAME |
CALL MNC_GET_IND(MNC_MAX_ID, name, mnc_cw_gname, indg, myThid) |
./pkg/mnc/mnc_cwrapper.F |
109 |
MNC_CW_DEL_GNAME |
mnc_cw_gname(indg)(1:MNC_MAX_CHAR)=mnc_blank_name(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_cwrapper.F |
156 |
MNC_CW_DUMP |
IF (mnc_cw_gname(j)(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_cwrapper.F |
163 |
MNC_CW_DUMP |
& j, ntot, ' : ', mnc_cw_gname(j)(1:20), mnc_cw_ndim(j), |
./pkg/mnc/mnc_cwrapper.F |
327 |
MNC_CW_ADD_VNAME |
CALL MNC_GET_IND(MNC_MAX_ID, gname, mnc_cw_gname, indg, myThid) |
./pkg/mnc/mnc_cwrapper.F |
45 |
MNC_CW_ADD_GNAME |
CALL MNC_GET_IND(MNC_MAX_ID, name, mnc_cw_gname, indg, myThid) |
./pkg/mnc/mnc_cwrapper.F |
52 |
MNC_CW_ADD_GNAME |
CALL MNC_GET_NEXT_EMPTY_IND(MNC_MAX_ID, mnc_cw_gname, |
./pkg/mnc/mnc_cwrapper.F |
55 |
MNC_CW_ADD_GNAME |
mnc_cw_gname(indg)(1:MNC_MAX_CHAR)=mnc_blank_name(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_cwrapper.F |
56 |
MNC_CW_ADD_GNAME |
mnc_cw_gname(indg)(1:(nnl-nnf+1)) = name(nnf:nnl) |
./pkg/mnc/mnc_common.h |
150 |
NO PROCEDURE |
& mnc_cw_gname, mnc_cw_dn, |
./pkg/mnc/mnc_common.h |
169 |
NO PROCEDURE |
character*(MNC_MAX_CHAR) mnc_cw_gname(MNC_MAX_ID) |