File |
Line number |
Procedure |
Code |
./pkg/mnc/mnc_init.F |
55 |
MNC_INIT |
mnc_cw_fgnm(g)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_common.h |
154 |
NO PROCEDURE |
& mnc_cw_fgnm |
./pkg/mnc/mnc_common.h |
187 |
NO PROCEDURE |
character*(MNC_MAX_CHAR) mnc_cw_fgnm(MNC_MAX_ID) |
./pkg/mnc/mnc_cw_udim.F |
115 |
MNC_CW_GET_UDIM |
CALL MNC_GET_IND(MNC_MAX_ID, fgname, mnc_cw_fgnm, indfg, myThid) |
./pkg/mnc/mnc_cw_udim.F |
50 |
MNC_CW_SET_UDIM |
CALL MNC_GET_IND(MNC_MAX_ID, fgname, mnc_cw_fgnm, indfg, myThid) |
./pkg/mnc/mnc_cw_udim.F |
53 |
MNC_CW_SET_UDIM |
& MNC_MAX_ID, mnc_cw_fgnm, indfg, myThid) |
./pkg/mnc/mnc_cw_udim.F |
54 |
MNC_CW_SET_UDIM |
mnc_cw_fgnm(indfg)(1:(fgl-fgf+1)) = fgname(fgf:fgl) |