| File |
Line number |
Procedure |
Code |
|
./pkg/mnc/mnc_utils.F |
204 |
MNC_GET_FVINDS |
fid = mnc_f_info(indf,2) |
|
./pkg/mnc/mnc_utils.F |
262 |
MNC_CHK_VTYP_R_NCVAR |
ids = mnc_f_info(indf,ig+1) |
|
./pkg/mnc/mnc_utils.F |
263 |
MNC_CHK_VTYP_R_NCVAR |
ide = mnc_f_info(indf,ig+2) |
|
./pkg/mnc/mnc_init.F |
42 |
MNC_INIT |
mnc_f_info(i,j) = 0 |
|
./pkg/mnc/mnc_common.h |
133 |
NO PROCEDURE |
& mnc_f_info, mnc_fd_ind, mnc_fv_ids, mnc_f_alld, |
|
./pkg/mnc/mnc_common.h |
141 |
NO PROCEDURE |
integer mnc_f_info(MNC_MAX_ID,MNC_MAX_INFO) |
|
./pkg/mnc/mnc_var.F |
140 |
MNC_VAR_INIT_ANY |
fid = mnc_f_info(indf,2) |
|
./pkg/mnc/mnc_var.F |
153 |
MNC_VAR_INIT_ANY |
ngrid = mnc_f_info(indf,3) |
|
./pkg/mnc/mnc_var.F |
162 |
MNC_VAR_INIT_ANY |
k = mnc_f_info(indf,j) |
|
./pkg/mnc/mnc_var.F |
167 |
MNC_VAR_INIT_ANY |
is = mnc_f_info(indf,(j+1)) |
|
./pkg/mnc/mnc_var.F |
168 |
MNC_VAR_INIT_ANY |
ie = mnc_f_info(indf,(j+2)) |
|
./pkg/mnc/mnc_var.F |
188 |
MNC_VAR_INIT_ANY |
k = mnc_f_info(indf,mnc_fv_ids(indf,j+2)) |
|
./pkg/mnc/mnc_var.F |
424 |
MNC_VAR_ADD_ATTR_ANY |
fid = mnc_f_info(indf,2) |
|
./pkg/mnc/mnc_var.F |
608 |
MNC_VAR_WRITE_ANY |
fid = mnc_f_info(indf,2) |
|
./pkg/mnc/mnc_var.F |
613 |
MNC_VAR_WRITE_ANY |
ds = mnc_f_info(indf,ig+1) |
|
./pkg/mnc/mnc_var.F |
614 |
MNC_VAR_WRITE_ANY |
de = mnc_f_info(indf,ig+2) |
|
./pkg/mnc/mnc_dim.F |
144 |
MNC_DIM_INIT_ALL_CV |
err = NF_DEF_DIM(mnc_f_info(indf,2), dname(dnf:dnl), tlen, idd) |
|
./pkg/mnc/mnc_dim.F |
153 |
MNC_DIM_INIT_ALL_CV |
& mnc_f_info(indf,2), idd, bi, bj, myThid) |
|
./pkg/mnc/mnc_dim.F |
209 |
MNC_DIM_UNLIM_SIZE |
fid = mnc_f_info(indf,2) |
|
./pkg/mnc/mnc_dump.F |
69 |
MNC_DUMP_ALL |
write(*,*) i,': ',(mnc_f_info(i,j), j=1,n_items) |
|
./pkg/mnc/mnc_grid.F |
101 |
MNC_GRID_INIT_ALL |
ds_last = mnc_f_info(indf,(lg_ind+2)) |
|
./pkg/mnc/mnc_grid.F |
120 |
MNC_GRID_INIT_ALL |
DO igr = 1,mnc_f_info(indf,3) |
|
./pkg/mnc/mnc_grid.F |
122 |
MNC_GRID_INIT_ALL |
ngt = ILNBLNK(mnc_g_names(mnc_f_info(indf,ii))) |
|
./pkg/mnc/mnc_grid.F |
124 |
MNC_GRID_INIT_ALL |
& .AND. (mnc_g_names(mnc_f_info(indf,ii))(1:ngt) |
|
./pkg/mnc/mnc_grid.F |
127 |
MNC_GRID_INIT_ALL |
ig1 = mnc_f_info(indf,ii+1) |
|
./pkg/mnc/mnc_grid.F |
128 |
MNC_GRID_INIT_ALL |
ig2 = mnc_f_info(indf,ii+2) |
|
./pkg/mnc/mnc_grid.F |
206 |
MNC_GRID_INIT_ALL |
mnc_f_info(indf,ng_ind) = indg |
|
./pkg/mnc/mnc_grid.F |
207 |
MNC_GRID_INIT_ALL |
mnc_f_info(indf,ng_ind+1) = ds_last + 1 |
|
./pkg/mnc/mnc_grid.F |
208 |
MNC_GRID_INIT_ALL |
mnc_f_info(indf,ng_ind+2) = ds_last + ndim |
|
./pkg/mnc/mnc_grid.F |
209 |
MNC_GRID_INIT_ALL |
mnc_f_info(indf,3) = ngrid + 1 |
|
./pkg/mnc/mnc_grid.F |
247 |
MNC_GRID_GET_DIMIND |
ngrid = mnc_f_info(indf,3) |
|
./pkg/mnc/mnc_grid.F |
250 |
MNC_GRID_GET_DIMIND |
ds = mnc_f_info(indf,j+1) |
|
./pkg/mnc/mnc_grid.F |
251 |
MNC_GRID_GET_DIMIND |
de = mnc_f_info(indf,j+2) |
|
./pkg/mnc/mnc_grid.F |
94 |
MNC_GRID_INIT_ALL |
fid = mnc_f_info(indf,2) |
|
./pkg/mnc/mnc_grid.F |
95 |
MNC_GRID_INIT_ALL |
ngrid = mnc_f_info(indf,3) |
|
./pkg/mnc/mnc_file.F |
101 |
MNC_FILE_OPEN |
mnc_f_info(indf,1) = 1 |
|
./pkg/mnc/mnc_file.F |
102 |
MNC_FILE_OPEN |
mnc_f_info(indf,2) = fid |
|
./pkg/mnc/mnc_file.F |
103 |
MNC_FILE_OPEN |
mnc_f_info(indf,3) = 0 |
|
./pkg/mnc/mnc_file.F |
272 |
MNC_FILE_ADD_ATTR_ANY |
fid = mnc_f_info(ind,2) |
|
./pkg/mnc/mnc_file.F |
353 |
MNC_FILE_CLOSE |
fid = mnc_f_info(indf,2) |
|
./pkg/mnc/mnc_file.F |
382 |
MNC_FILE_CLOSE |
n = mnc_f_info(indf,3) |
|
./pkg/mnc/mnc_file.F |
386 |
MNC_FILE_CLOSE |
k = mnc_f_info(indf,j) |
|
./pkg/mnc/mnc_file.F |
391 |
MNC_FILE_CLOSE |
mnc_f_info(indf,i) = 0 |
|
./pkg/mnc/mnc_file.F |
518 |
MNC_FILE_REDEF |
def = mnc_f_info(ind,1) |
|
./pkg/mnc/mnc_file.F |
519 |
MNC_FILE_REDEF |
fid = mnc_f_info(ind,2) |
|
./pkg/mnc/mnc_file.F |
526 |
MNC_FILE_REDEF |
mnc_f_info(ind,1) = 1 |
|
./pkg/mnc/mnc_file.F |
571 |
MNC_FILE_ENDDEF |
def = mnc_f_info(ind,1) |
|
./pkg/mnc/mnc_file.F |
572 |
MNC_FILE_ENDDEF |
fid = mnc_f_info(ind,2) |
|
./pkg/mnc/mnc_file.F |
579 |
MNC_FILE_ENDDEF |
mnc_f_info(ind,1) = 2 |
|
./pkg/mnc/mnc_file.F |
671 |
MNC_FILE_TRY_READ |
mnc_f_info(indf,2) = fid |
|
./pkg/mnc/mnc_file.F |
730 |
MNC_FILE_TRY_READ |
DO i = 1,mnc_f_info(indf,3) |
|
./pkg/mnc/mnc_file.F |
732 |
MNC_FILE_TRY_READ |
k = mnc_f_info(indf,j) |