File |
Line number |
Procedure |
Code |
./pkg/grdchk/grdchk_loc.F |
127 |
GRDCHK_LOC |
do irec = irecwrk, ncvarrecs(grdchkvarindex) |
./pkg/grdchk/grdchk_init.F |
165 |
GRDCHK_INIT |
ncvarcomp = ncvarcomp*ncvarrecs(grdchkvarindex) |
./pkg/grdchk/grdchk_init.F |
166 |
GRDCHK_INIT |
maxncvarcomps = maxncvarcomps*ncvarrecs(grdchkvarindex) |
./pkg/grdchk/grdchk_get_position.F |
115 |
GRDCHK_GET_POSITION |
do irec = irecwrk, ncvarrecs(grdchkvarindex) |
./optim/optim_readdata.F |
174 |
OPTIM_READDATA |
read( funit ) (ncvarrecs(i), i=1,maxcvars) |
./optim/optim_readdata.F |
204 |
OPTIM_READDATA |
& (ncvarrecs(i), i=1,maxcvars) |
./optim/optim_readdata.F |
257 |
OPTIM_READDATA |
do icvrec = 1,ncvarrecs(icvar) |
./optim/optim_writedata.F |
128 |
OPTIM_WRITEDATA |
& (ncvarrecs(i), i=1,maxcvars) |
./optim/optim_writedata.F |
172 |
OPTIM_WRITEDATA |
write( funit ) (ncvarrecs(i), i=1,maxcvars) |
./optim/optim_writedata.F |
183 |
OPTIM_WRITEDATA |
do icvrec = 1,ncvarrecs(icvar) |
./pkg/ctrl/ctrl_set_pack_yz.F |
158 |
CTRL_SET_PACK_YZ |
nrec_nl=int(ncvarrecs(ivartype)/snx) |
./pkg/ctrl/ctrl_set_pack_yz.F |
249 |
CTRL_SET_PACK_YZ |
do irec = nrec_nl*snx+1, ncvarrecs(ivartype) |
./pkg/ctrl/ctrl_set_unpack_xy.F |
156 |
CTRL_SET_UNPACK_XY |
nrec_nl=int(ncvarrecs(ivartype)/Nr) |
./pkg/ctrl/ctrl_set_unpack_xy.F |
236 |
CTRL_SET_UNPACK_XY |
do irec = nrec_nl*Nr+1,ncvarrecs(ivartype) |
./pkg/ctrl/ctrl_set_pack_xy.F |
154 |
CTRL_SET_PACK_XY |
nrec_nl=int(ncvarrecs(ivartype)/Nr) |
./pkg/ctrl/ctrl_set_pack_xy.F |
217 |
CTRL_SET_PACK_XY |
do irec = nrec_nl*Nr+1, ncvarrecs(ivartype) |
./pkg/ctrl/ctrl_set_globfld_xyz.F |
84 |
CTRL_SET_GLOBFLD_XYZ |
do irec = 1, ncvarrecs(ivartype) |
./pkg/ctrl/ctrl_set_unpack_xz.F |
159 |
CTRL_SET_UNPACK_XZ |
nrec_nl=int(ncvarrecs(ivartype)/sny) |
./pkg/ctrl/ctrl_set_unpack_xz.F |
236 |
CTRL_SET_UNPACK_XZ |
do irec = nrec_nl*sny+1, ncvarrecs(ivartype) |
./pkg/ctrl/ctrl_pack.F |
199 |
CTRL_PACK |
write(cunit) (ncvarrecs(i), i=1,maxcvars) |
./pkg/ctrl/ctrl_set_globfld_xy.F |
104 |
CTRL_SET_GLOBFLD_XY |
nrec_nl=int(ncvarrecs(ivartype)/Nr) |
./pkg/ctrl/ctrl_set_globfld_xy.F |
111 |
CTRL_SET_GLOBFLD_XY |
do irec = nrec_nl*Nr+1, ncvarrecs(ivartype) |
./pkg/ctrl/ctrl_set_globfld_yz.F |
104 |
CTRL_SET_GLOBFLD_YZ |
nrec_nl=int(ncvarrecs(ivartype)/snx) |
./pkg/ctrl/ctrl_set_globfld_yz.F |
111 |
CTRL_SET_GLOBFLD_YZ |
do irec = nrec_nl*snx+1, ncvarrecs(ivartype) |
./pkg/ctrl/ctrl_set_unpack_yz.F |
159 |
CTRL_SET_UNPACK_YZ |
nrec_nl=int(ncvarrecs(ivartype)/snx) |
./pkg/ctrl/ctrl_set_unpack_yz.F |
237 |
CTRL_SET_UNPACK_YZ |
do irec = nrec_nl*snx+1,ncvarrecs(ivartype) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
172 |
CTRL_SET_UNPACK_XYZ |
do irec = 1, ncvarrecs(ivartype) |
./pkg/ctrl/ctrl_set_globfld_xz.F |
104 |
CTRL_SET_GLOBFLD_XZ |
nrec_nl=int(ncvarrecs(ivartype)/sny) |
./pkg/ctrl/ctrl_set_globfld_xz.F |
111 |
CTRL_SET_GLOBFLD_XZ |
do irec = nrec_nl*sny+1, ncvarrecs(ivartype) |
./pkg/ctrl/ctrl_init_wet.F |
169 |
CTRL_INIT_WET |
& ncvarrecs(i)*nwetctile(bi,bj,k) |
./pkg/ctrl/ctrl_init_wet.F |
172 |
CTRL_INIT_WET |
& ncvarrecs(i)*nwetstile(bi,bj,k) |
./pkg/ctrl/ctrl_init_wet.F |
175 |
CTRL_INIT_WET |
& ncvarrecs(i)*nwetwtile(bi,bj,k) |
./pkg/ctrl/ctrl_init_wet.F |
178 |
CTRL_INIT_WET |
& ncvarrecs(i)*nwetvtile(bi,bj,k) |
./pkg/ctrl/ctrl_init_wet.F |
187 |
CTRL_INIT_WET |
& (ncvarrecs(i)/nobcs) |
./pkg/ctrl/ctrl_init_wet.F |
193 |
CTRL_INIT_WET |
& (ncvarrecs(i)/nobcs) |
./pkg/ctrl/ctrl_init_wet.F |
199 |
CTRL_INIT_WET |
& (ncvarrecs(i)/nobcs) |
./pkg/ctrl/ctrl_init_wet.F |
205 |
CTRL_INIT_WET |
& (ncvarrecs(i)/nobcs) |
./pkg/ctrl/ctrl_init_wet.F |
256 |
CTRL_INIT_WET |
& 'ctrl-wet 6: no recs for i = ', i, ncvarrecs(i) |
./pkg/ctrl/ctrl_init_wet.F |
263 |
CTRL_INIT_WET |
& ncvarrecs(3)*nwetctile(1,1,1) + |
./pkg/ctrl/ctrl_init_wet.F |
264 |
CTRL_INIT_WET |
& ncvarrecs(4)*nwetctile(1,1,1) + |
./pkg/ctrl/ctrl_init_wet.F |
265 |
CTRL_INIT_WET |
& ncvarrecs(5)*nwetwtile(1,1,1) + |
./pkg/ctrl/ctrl_init_wet.F |
266 |
CTRL_INIT_WET |
& ncvarrecs(6)*nwetstile(1,1,1) |
./pkg/ctrl/ctrl_init_wet.F |
274 |
CTRL_INIT_WET |
& ncvarrecs(7)*nwetctile(1,1,1) + |
./pkg/ctrl/ctrl_init_wet.F |
275 |
CTRL_INIT_WET |
& ncvarrecs(8)*nwetctile(1,1,1) + |
./pkg/ctrl/ctrl_init_wet.F |
276 |
CTRL_INIT_WET |
& ncvarrecs(9)*nwetwtile(1,1,1) + |
./pkg/ctrl/ctrl_init_wet.F |
277 |
CTRL_INIT_WET |
& ncvarrecs(10)*nwetstile(1,1,1) |
./pkg/ctrl/ctrl.h |
66 |
NO PROCEDURE |
& ncvarrecs, |
./pkg/ctrl/ctrl.h |
84 |
NO PROCEDURE |
integer ncvarrecs ( maxcvars ) |
./pkg/ctrl/ctrl_set_pack_xyz.F |
164 |
CTRL_SET_PACK_XYZ |
do irec = 1, ncvarrecs(ivartype) |
./pkg/ctrl/ctrl_init.F |
111 |
CTRL_INIT |
ncvarrecs(ivar) = 0 |
./pkg/ctrl/ctrl_set_pack_xz.F |
159 |
CTRL_SET_PACK_XZ |
nrec_nl=int(ncvarrecs(ivartype)/sny) |
./pkg/ctrl/ctrl_set_pack_xz.F |
242 |
CTRL_SET_PACK_XZ |
do irec = nrec_nl*sny+1, ncvarrecs(ivartype) |
./pkg/ctrl/ctrl_init_ctrlvar.F |
63 |
CTRL_INIT_CTRLVAR |
ncvarrecs (ivarindex) = ncvarrecs_loc |