| File |
Line number |
Procedure |
Code |
|
./pkg/mnc/MNC_COMMON.h |
148 |
NO PROCEDURE |
& mnc_f_info, mnc_fd_ind, mnc_fv_ids, mnc_f_alld, |
|
./pkg/mnc/MNC_COMMON.h |
153 |
NO PROCEDURE |
integer mnc_fv_ids(MNC_MAX_FID,MNC_MAX_INFO) |
|
./pkg/mnc/mnc_dump.F |
77 |
MNC_DUMP_ALL |
write(*,*) i,': ',(mnc_fv_ids(i,j), j=1,n_items) |
|
./pkg/mnc/mnc_file.F |
105 |
MNC_FILE_OPEN |
mnc_fv_ids(indf,1) = 0 |
|
./pkg/mnc/mnc_file.F |
362 |
MNC_FILE_CLOSE |
n = mnc_fv_ids(indf,1) |
|
./pkg/mnc/mnc_file.F |
366 |
MNC_FILE_CLOSE |
k = mnc_fv_ids(indf,j) |
|
./pkg/mnc/mnc_file.F |
370 |
MNC_FILE_CLOSE |
mnc_fv_ids(indf,i) = 0 |
|
./pkg/mnc/mnc_file.F |
738 |
MNC_FILE_TRY_READ |
iv = 2 + 3*mnc_fv_ids(indf,1) |
|
./pkg/mnc/mnc_file.F |
739 |
MNC_FILE_TRY_READ |
mnc_fv_ids(indf,iv) = indv |
|
./pkg/mnc/mnc_file.F |
740 |
MNC_FILE_TRY_READ |
mnc_fv_ids(indf,iv+1) = id |
|
./pkg/mnc/mnc_file.F |
745 |
MNC_FILE_TRY_READ |
mnc_fv_ids(indf,iv+2) = j |
|
./pkg/mnc/mnc_file.F |
750 |
MNC_FILE_TRY_READ |
mnc_fv_ids(indf,1) = mnc_fv_ids(indf,1) + 1 |
|
./pkg/mnc/mnc_init.F |
47 |
MNC_INIT |
mnc_fv_ids(i,j) = 0 |
|
./pkg/mnc/mnc_utils.F |
228 |
MNC_GET_FVINDS |
DO i = 1,mnc_fv_ids(indf,1) |
|
./pkg/mnc/mnc_utils.F |
230 |
MNC_GET_FVINDS |
j = mnc_fv_ids(indf,k) |
|
./pkg/mnc/mnc_utils.F |
282 |
MNC_CHK_VTYP_R_NCVAR |
ig = mnc_fv_ids(indf,ind_fv_ids+2) |
|
./pkg/mnc/mnc_utils.F |
289 |
MNC_CHK_VTYP_R_NCVAR |
ncvr = ILNBLNK(mnc_v_names(mnc_fv_ids(indf,ind_fv_ids))) |
|
./pkg/mnc/mnc_utils.F |
292 |
MNC_CHK_VTYP_R_NCVAR |
& mnc_v_names(mnc_fv_ids(indf,ind_fv_ids))(1:ncvr), |
|
./pkg/mnc/mnc_var.F |
168 |
MNC_VAR_INIT_ANY |
needed = 1 + 3*(mnc_fv_ids(indf,1) + 1) |
|
./pkg/mnc/mnc_var.F |
209 |
MNC_VAR_INIT_ANY |
nvar = mnc_fv_ids(indf,1) |
|
./pkg/mnc/mnc_var.F |
212 |
MNC_VAR_INIT_ANY |
IF (mnc_v_names(mnc_fv_ids(indf,j)) .EQ. vname) THEN |
|
./pkg/mnc/mnc_var.F |
213 |
MNC_VAR_INIT_ANY |
k = mnc_f_info(indf,mnc_fv_ids(indf,j+2)) |
|
./pkg/mnc/mnc_var.F |
252 |
MNC_VAR_INIT_ANY |
nv = mnc_fv_ids(indf,1) |
|
./pkg/mnc/mnc_var.F |
254 |
MNC_VAR_INIT_ANY |
mnc_fv_ids(indf,i) = indv |
|
./pkg/mnc/mnc_var.F |
255 |
MNC_VAR_INIT_ANY |
mnc_fv_ids(indf,i+1) = vid |
|
./pkg/mnc/mnc_var.F |
256 |
MNC_VAR_INIT_ANY |
mnc_fv_ids(indf,i+2) = ind_g_finfo |
|
./pkg/mnc/mnc_var.F |
257 |
MNC_VAR_INIT_ANY |
mnc_fv_ids(indf,1) = nv + 1 |
|
./pkg/mnc/mnc_var.F |
459 |
MNC_VAR_ADD_ATTR_ANY |
vid = mnc_fv_ids(indf,(ind_fv_ids+1)) |
|
./pkg/mnc/mnc_var.F |
698 |
MNC_VAR_WRITE_ANY |
vid = mnc_fv_ids(indf,(ind_fv_ids+1)) |
|
./pkg/mnc/mnc_var.F |
701 |
MNC_VAR_WRITE_ANY |
ig = mnc_fv_ids(indf,(ind_fv_ids+2)) |