| File |
Line number |
Procedure |
Code |
|
./pkg/mnc/mnc_utils.F |
199 |
MNC_GET_FVINDS |
CALL MNC_GET_IND(MNC_MAX_ID, fname, mnc_f_names, indf, myThid) |
|
./pkg/mnc/mnc_utils.F |
269 |
MNC_CHK_VTYP_R_NCVAR |
ncvf = ILNBLNK(mnc_f_names(indf)) |
|
./pkg/mnc/mnc_utils.F |
272 |
MNC_CHK_VTYP_R_NCVAR |
& ''' within file ''', mnc_f_names(indf)(1:ncvf), |
|
./pkg/mnc/mnc_init.F |
37 |
MNC_INIT |
mnc_f_names(i)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |
|
./pkg/mnc/mnc_cwrapper.F |
643 |
MNC_CW_FILE_AORC |
CALL MNC_GET_IND(MNC_MAX_ID, fname, mnc_f_names, indf, myThid) |
|
./pkg/mnc/mnc_common.h |
129 |
NO PROCEDURE |
& mnc_f_names, mnc_g_names, mnc_v_names, mnc_d_names, |
|
./pkg/mnc/mnc_common.h |
137 |
NO PROCEDURE |
character*(MNC_MAX_CHAR) mnc_f_names(MNC_MAX_ID) |
|
./pkg/mnc/mnc_var.F |
133 |
MNC_VAR_INIT_ANY |
CALL MNC_GET_IND(MNC_MAX_ID, fname, mnc_f_names, indf, myThid) |
|
./pkg/mnc/mnc_dim.F |
101 |
MNC_DIM_INIT_ALL_CV |
CALL MNC_GET_IND(MNC_MAX_ID, fname, mnc_f_names, indf, myThid) |
|
./pkg/mnc/mnc_dim.F |
202 |
MNC_DIM_UNLIM_SIZE |
CALL MNC_GET_IND(MNC_MAX_ID, fname, mnc_f_names, indf, myThid) |
|
./pkg/mnc/mnc_dump.F |
47 |
MNC_DUMP_ALL |
write(*,'(i3,a,a40)') i,':', mnc_f_names(i) |
|
./pkg/mnc/mnc_grid.F |
134 |
MNC_GRID_INIT_ALL |
& mnc_f_names(indf), ''' with a different ', |
|
./pkg/mnc/mnc_grid.F |
147 |
MNC_GRID_INIT_ALL |
& mnc_f_names(indf), ''' with a different ', |
|
./pkg/mnc/mnc_grid.F |
87 |
MNC_GRID_INIT_ALL |
CALL MNC_GET_IND(MNC_MAX_ID,file_name,mnc_f_names,indf, myThid) |
|
./pkg/mnc/mnc_file.F |
100 |
MNC_FILE_OPEN |
mnc_f_names(indf)(1:n) = fname(1:n) |
|
./pkg/mnc/mnc_file.F |
265 |
MNC_FILE_ADD_ATTR_ANY |
CALL MNC_GET_IND(MNC_MAX_ID, fname, mnc_f_names, ind, myThid) |
|
./pkg/mnc/mnc_file.F |
346 |
MNC_FILE_CLOSE |
CALL MNC_GET_IND(MNC_MAX_ID, fname, mnc_f_names, indf, myThid) |
|
./pkg/mnc/mnc_file.F |
395 |
MNC_FILE_CLOSE |
mnc_f_names(indf)(1:MNC_MAX_CHAR) = mnc_blank_name(1:MNC_MAX_CHAR) |
|
./pkg/mnc/mnc_file.F |
433 |
MNC_FILE_CLOSE_ALL_MATCHING |
IF (fname(1:n) .EQ. mnc_f_names(i)(1:n)) THEN |
|
./pkg/mnc/mnc_file.F |
434 |
MNC_FILE_CLOSE_ALL_MATCHING |
CALL MNC_FILE_CLOSE(mnc_f_names(i), myThid) |
|
./pkg/mnc/mnc_file.F |
469 |
MNC_FILE_CLOSE_ALL |
IF (mnc_f_names(i)(1:MNC_MAX_CHAR) |
|
./pkg/mnc/mnc_file.F |
471 |
MNC_FILE_CLOSE_ALL |
CALL MNC_FILE_CLOSE(mnc_f_names(i), myThid) |
|
./pkg/mnc/mnc_file.F |
510 |
MNC_FILE_REDEF |
CALL MNC_GET_IND(MNC_MAX_ID, fname, mnc_f_names, ind, myThid) |
|
./pkg/mnc/mnc_file.F |
563 |
MNC_FILE_ENDDEF |
CALL MNC_GET_IND(MNC_MAX_ID, fname, mnc_f_names, ind, myThid) |
|
./pkg/mnc/mnc_file.F |
669 |
MNC_FILE_TRY_READ |
CALL MNC_GET_NEXT_EMPTY_IND(MNC_MAX_ID,mnc_f_names,indf, myThid) |
|
./pkg/mnc/mnc_file.F |
670 |
MNC_FILE_TRY_READ |
mnc_f_names(indf)(1:(nlf-nff+1)) = fname(nff:nlf) |
|
./pkg/mnc/mnc_file.F |
70 |
MNC_FILE_OPEN |
CALL MNC_GET_IND(MNC_MAX_ID, fname, mnc_f_names, indf, myThid) |
|
./pkg/mnc/mnc_file.F |
98 |
MNC_FILE_OPEN |
CALL MNC_GET_NEXT_EMPTY_IND(MNC_MAX_ID,mnc_f_names,indf, myThid) |