File |
Line number |
Procedure |
Code |
./pkg/grdchk/grdchk_check.F |
47 |
GRDCHK_CHECK |
IF ( ncvarindex(grdchkvarindex) .LE. 0 ) THEN |
./optim/optim_readdata.F |
180 |
OPTIM_READDATA |
read( funit ) (ncvarindex(i), i=1,maxcvars) |
./optim/optim_readdata.F |
237 |
OPTIM_READDATA |
& (ncvarindex(i), i=1,maxcvars) |
./optim/optim_readdata.F |
291 |
OPTIM_READDATA |
if ( ncvarindex(icvar) .ne. -1 ) then |
./optim/optim_readdata.F |
295 |
OPTIM_READDATA |
read( funit ) ncvarindex(icvar) |
./optim/optim_writedata.F |
129 |
OPTIM_WRITEDATA |
& (ncvarindex(i), i=1,maxcvars) |
./optim/optim_writedata.F |
178 |
OPTIM_WRITEDATA |
write( funit ) (ncvarindex(i), i=1,maxcvars) |
./optim/optim_writedata.F |
189 |
OPTIM_WRITEDATA |
if ( ncvarindex(icvar) .ne. -1 ) then |
./optim/optim_writedata.F |
193 |
OPTIM_WRITEDATA |
write( funit ) ncvarindex(icvar) |
./pkg/admtlm/admtlm_model2dsvd.F |
235 |
ADMTLM_MODEL2DSVD |
write(cunit) (ncvarindex(i), i=1,maxcvars) |
./pkg/ctrl/ctrl.h |
112 |
NO PROCEDURE |
integer ncvarindex ( maxcvars ) |
./pkg/ctrl/ctrl.h |
94 |
NO PROCEDURE |
& ncvarindex, |
./pkg/ctrl/ctrl_init.F |
99 |
CTRL_INIT |
ncvarindex(ivar) = -1 |
./pkg/ctrl/ctrl_init_ctrlvar.F |
62 |
CTRL_INIT_CTRLVAR |
ncvarindex(ivarindex) = ncvarindex_loc |
./pkg/ctrl/ctrl_init_wet.F |
184 |
CTRL_INIT_WET |
if ( ncvarindex(i) .ne. -1 ) then |
./pkg/ctrl/ctrl_init_wet.F |
241 |
CTRL_INIT_WET |
print*,' control variable = ',ncvarindex(i) |
./pkg/ctrl/ctrl_pack.F |
264 |
CTRL_PACK |
write(cunit) (ncvarindex(i), i=1,maxcvars) |
./pkg/ctrl/ctrl_set_pack_xy.F |
184 |
CTRL_SET_PACK_XY |
write(cunit) ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_pack_xy.F |
276 |
CTRL_SET_PACK_XY |
write(cunit) ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_pack_xy.F |
512 |
CTRL_SET_PACK_XY |
write(cunit) ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_pack_xyz.F |
194 |
CTRL_SET_PACK_XYZ |
write(cunit) ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_pack_xyz.F |
431 |
CTRL_SET_PACK_XYZ |
write(cunit) ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_pack_xz.F |
191 |
CTRL_SET_PACK_XZ |
write(cunit) ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_pack_xz.F |
266 |
CTRL_SET_PACK_XZ |
write(cunit) ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_pack_yz.F |
194 |
CTRL_SET_PACK_YZ |
write(cunit) ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_pack_yz.F |
270 |
CTRL_SET_PACK_YZ |
write(cunit) ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_unpack_xy.F |
183 |
CTRL_SET_UNPACK_XY |
if (filencvarindex(ivartype) .NE. ncvarindex(ivartype)) |
./pkg/ctrl/ctrl_set_unpack_xy.F |
186 |
CTRL_SET_UNPACK_XY |
& filencvarindex(ivartype), ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_unpack_xy.F |
291 |
CTRL_SET_UNPACK_XY |
if (filencvarindex(ivartype) .NE. ncvarindex(ivartype)) |
./pkg/ctrl/ctrl_set_unpack_xy.F |
294 |
CTRL_SET_UNPACK_XY |
& filencvarindex(ivartype), ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_unpack_xy.F |
491 |
CTRL_SET_UNPACK_XY |
if (filencvarindex(ivartype) .NE. ncvarindex(ivartype)) |
./pkg/ctrl/ctrl_set_unpack_xy.F |
494 |
CTRL_SET_UNPACK_XY |
& filencvarindex(ivartype), ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
200 |
CTRL_SET_UNPACK_XYZ |
if (filencvarindex(ivartype) .NE. ncvarindex(ivartype)) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
203 |
CTRL_SET_UNPACK_XYZ |
& filencvarindex(ivartype), ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
401 |
CTRL_SET_UNPACK_XYZ |
if (filencvarindex(ivartype) .NE. ncvarindex(ivartype)) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
404 |
CTRL_SET_UNPACK_XYZ |
& filencvarindex(ivartype), ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_unpack_xz.F |
196 |
CTRL_SET_UNPACK_XZ |
if (filencvarindex(ivartype) .NE. ncvarindex(ivartype)) |
./pkg/ctrl/ctrl_set_unpack_xz.F |
199 |
CTRL_SET_UNPACK_XZ |
& filencvarindex(ivartype), ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_unpack_xz.F |
283 |
CTRL_SET_UNPACK_XZ |
if (filencvarindex(ivartype) .NE. ncvarindex(ivartype)) |
./pkg/ctrl/ctrl_set_unpack_xz.F |
286 |
CTRL_SET_UNPACK_XZ |
& filencvarindex(ivartype), ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_unpack_yz.F |
196 |
CTRL_SET_UNPACK_YZ |
if (filencvarindex(ivartype) .NE. ncvarindex(ivartype)) |
./pkg/ctrl/ctrl_set_unpack_yz.F |
199 |
CTRL_SET_UNPACK_YZ |
& filencvarindex(ivartype), ncvarindex(ivartype) |
./pkg/ctrl/ctrl_set_unpack_yz.F |
283 |
CTRL_SET_UNPACK_YZ |
if (filencvarindex(ivartype) .NE. ncvarindex(ivartype)) |
./pkg/ctrl/ctrl_set_unpack_yz.F |
286 |
CTRL_SET_UNPACK_YZ |
& filencvarindex(ivartype), ncvarindex(ivartype) |
./pkg/ctrl/ctrl_summary.F |
141 |
CTRL_SUMMARY |
&' Control variable index: ',ncvarindex(1) |
./pkg/ctrl/ctrl_summary.F |
155 |
CTRL_SUMMARY |
&' Control variable index: ',ncvarindex(2) |
./pkg/ctrl/ctrl_summary.F |
169 |
CTRL_SUMMARY |
&' Control variable index: ',ncvarindex(3) |
./pkg/ctrl/ctrl_summary.F |
210 |
CTRL_SUMMARY |
&' Control varibale index: ',ncvarindex(4) |
./pkg/ctrl/ctrl_summary.F |
251 |
CTRL_SUMMARY |
&' Control variable index: ',ncvarindex(5) |
./pkg/ctrl/ctrl_summary.F |
292 |
CTRL_SUMMARY |
&' Control variable index: ',ncvarindex(6) |