| File |
Line number |
Procedure |
Code |
|
./optim/optim_readdata.F |
176 |
OPTIM_READDATA |
read( funit ) (ncvarindex(i), i=1,maxcvars) |
|
./optim/optim_readdata.F |
177 |
OPTIM_READDATA |
read( funit ) (ncvarrecs(i), i=1,maxcvars) |
|
./optim/optim_readdata.F |
178 |
OPTIM_READDATA |
read( funit ) (ncvarxmax(i), i=1,maxcvars) |
|
./optim/optim_readdata.F |
179 |
OPTIM_READDATA |
read( funit ) (ncvarymax(i), i=1,maxcvars) |
|
./optim/optim_readdata.F |
180 |
OPTIM_READDATA |
read( funit ) (ncvarnrmax(i), i=1,maxcvars) |
|
./optim/optim_readdata.F |
181 |
OPTIM_READDATA |
read( funit ) (ncvargrd(i), i=1,maxcvars) |
|
./optim/optim_readdata.F |
233 |
OPTIM_READDATA |
& (ncvarindex(i), i=1,maxcvars) |
|
./optim/optim_readdata.F |
235 |
OPTIM_READDATA |
& (ncvarrecs(i), i=1,maxcvars) |
|
./optim/optim_readdata.F |
237 |
OPTIM_READDATA |
& (ncvarxmax(i), i=1,maxcvars) |
|
./optim/optim_readdata.F |
239 |
OPTIM_READDATA |
& (ncvarymax(i), i=1,maxcvars) |
|
./optim/optim_readdata.F |
241 |
OPTIM_READDATA |
& (ncvarnrmax(i), i=1,maxcvars) |
|
./optim/optim_readdata.F |
243 |
OPTIM_READDATA |
& (ncvargrd(i), i=1,maxcvars) |
|
./optim/optim_readdata.F |
286 |
OPTIM_READDATA |
do icvar = 1,maxcvars |
|
./optim/optim_writedata.F |
125 |
OPTIM_WRITEDATA |
& (ncvarindex(i), i=1,maxcvars) |
|
./optim/optim_writedata.F |
127 |
OPTIM_WRITEDATA |
& (ncvarrecs(i), i=1,maxcvars) |
|
./optim/optim_writedata.F |
129 |
OPTIM_WRITEDATA |
& (ncvarxmax(i), i=1,maxcvars) |
|
./optim/optim_writedata.F |
131 |
OPTIM_WRITEDATA |
& (ncvarymax(i), i=1,maxcvars) |
|
./optim/optim_writedata.F |
133 |
OPTIM_WRITEDATA |
& (ncvarnrmax(i), i=1,maxcvars) |
|
./optim/optim_writedata.F |
135 |
OPTIM_WRITEDATA |
& (ncvargrd(i), i=1,maxcvars) |
|
./optim/optim_writedata.F |
174 |
OPTIM_WRITEDATA |
write( funit ) (ncvarindex(i), i=1,maxcvars) |
|
./optim/optim_writedata.F |
175 |
OPTIM_WRITEDATA |
write( funit ) (ncvarrecs(i), i=1,maxcvars) |
|
./optim/optim_writedata.F |
176 |
OPTIM_WRITEDATA |
write( funit ) (ncvarxmax(i), i=1,maxcvars) |
|
./optim/optim_writedata.F |
177 |
OPTIM_WRITEDATA |
write( funit ) (ncvarymax(i), i=1,maxcvars) |
|
./optim/optim_writedata.F |
178 |
OPTIM_WRITEDATA |
write( funit ) (ncvarnrmax(i), i=1,maxcvars) |
|
./optim/optim_writedata.F |
179 |
OPTIM_WRITEDATA |
write( funit ) (ncvargrd(i), i=1,maxcvars) |
|
./optim/optim_writedata.F |
184 |
OPTIM_WRITEDATA |
do icvar = 1,maxcvars |
|
./pkg/admtlm/admtlm_dsvd2model.F |
248 |
ADMTLM_DSVD2MODEL |
read(cunit) (filencvarindex(i), i=1,maxcvars) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
249 |
ADMTLM_DSVD2MODEL |
read(cunit) (filencvarrecs(i), i=1,maxcvars) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
250 |
ADMTLM_DSVD2MODEL |
read(cunit) (filencvarxmax(i), i=1,maxcvars) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
251 |
ADMTLM_DSVD2MODEL |
read(cunit) (filencvarymax(i), i=1,maxcvars) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
252 |
ADMTLM_DSVD2MODEL |
read(cunit) (filencvarnrmax(i), i=1,maxcvars) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
253 |
ADMTLM_DSVD2MODEL |
read(cunit) (filencvargrd(i), i=1,maxcvars) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
235 |
ADMTLM_MODEL2DSVD |
write(cunit) (ncvarindex(i), i=1,maxcvars) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
236 |
ADMTLM_MODEL2DSVD |
write(cunit) (ncvarrecs(i), i=1,maxcvars) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
237 |
ADMTLM_MODEL2DSVD |
write(cunit) (ncvarxmax(i), i=1,maxcvars) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
238 |
ADMTLM_MODEL2DSVD |
write(cunit) (ncvarymax(i), i=1,maxcvars) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
239 |
ADMTLM_MODEL2DSVD |
write(cunit) (ncvarnrmax(i), i=1,maxcvars) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
240 |
ADMTLM_MODEL2DSVD |
write(cunit) (ncvargrd(i), i=1,maxcvars) |
|
./pkg/ctrl/ctrl.h |
109 |
NO PROCEDURE |
integer ncvarindex ( maxcvars ) |
|
./pkg/ctrl/ctrl.h |
110 |
NO PROCEDURE |
integer ncvarrecs ( maxcvars ) |
|
./pkg/ctrl/ctrl.h |
111 |
NO PROCEDURE |
integer ncvarrecstart ( maxcvars ) |
|
./pkg/ctrl/ctrl.h |
112 |
NO PROCEDURE |
integer ncvarrecsend ( maxcvars ) |
|
./pkg/ctrl/ctrl.h |
113 |
NO PROCEDURE |
integer ncvarxmax ( maxcvars ) |
|
./pkg/ctrl/ctrl.h |
114 |
NO PROCEDURE |
integer ncvarymax ( maxcvars ) |
|
./pkg/ctrl/ctrl.h |
115 |
NO PROCEDURE |
integer ncvarnrmax ( maxcvars ) |
|
./pkg/ctrl/ctrl.h |
166 |
NO PROCEDURE |
character*(1) ncvargrd(maxcvars) |
|
./pkg/ctrl/ctrl.h |
19 |
NO PROCEDURE |
integer maxcvars |
|
./pkg/ctrl/ctrl.h |
205 |
NO PROCEDURE |
integer filencvarindex(maxcvars) |
|
./pkg/ctrl/ctrl.h |
206 |
NO PROCEDURE |
integer filencvarrecs(maxcvars) |
|
./pkg/ctrl/ctrl.h |
207 |
NO PROCEDURE |
integer filencvarxmax(maxcvars) |
|
./pkg/ctrl/ctrl.h |
208 |
NO PROCEDURE |
integer filencvarymax(maxcvars) |
|
./pkg/ctrl/ctrl.h |
209 |
NO PROCEDURE |
integer filencvarnrmax(maxcvars) |
|
./pkg/ctrl/ctrl.h |
219 |
NO PROCEDURE |
character*( 1) filencvargrd(maxcvars) |
|
./pkg/ctrl/ctrl.h |
21 |
NO PROCEDURE |
parameter ( maxcvars = 30 ) |
|
./pkg/ctrl/ctrl.h |
23 |
NO PROCEDURE |
parameter ( maxcvars = 40 ) |
|
./pkg/ctrl/ctrl.h |
25 |
NO PROCEDURE |
parameter ( maxcvars = 400 ) |
|
./pkg/ctrl/ctrl.h |
27 |
NO PROCEDURE |
parameter ( maxcvars = 60 ) |
|
./pkg/ctrl/ctrl_init.F |
84 |
CTRL_INIT |
do ivar = 1,maxcvars |
|
./pkg/ctrl/ctrl_init_wet.F |
181 |
CTRL_INIT_WET |
do i = 1,maxcvars |
|
./pkg/ctrl/ctrl_init_wet.F |
281 |
CTRL_INIT_WET |
do i = 1, maxcvars |
|
./pkg/ctrl/ctrl_pack.F |
241 |
CTRL_PACK |
write(cunit) (ncvarindex(i), i=1,maxcvars) |
|
./pkg/ctrl/ctrl_pack.F |
242 |
CTRL_PACK |
write(cunit) (ncvarrecs(i), i=1,maxcvars) |
|
./pkg/ctrl/ctrl_pack.F |
243 |
CTRL_PACK |
write(cunit) (ncvarxmax(i), i=1,maxcvars) |
|
./pkg/ctrl/ctrl_pack.F |
244 |
CTRL_PACK |
write(cunit) (ncvarymax(i), i=1,maxcvars) |
|
./pkg/ctrl/ctrl_pack.F |
245 |
CTRL_PACK |
write(cunit) (ncvarnrmax(i), i=1,maxcvars) |
|
./pkg/ctrl/ctrl_pack.F |
246 |
CTRL_PACK |
write(cunit) (ncvargrd(i), i=1,maxcvars) |
|
./pkg/ctrl/ctrl_unpack.F |
253 |
CTRL_UNPACK |
read(cunit) (filencvarindex(i), i=1,maxcvars) |
|
./pkg/ctrl/ctrl_unpack.F |
254 |
CTRL_UNPACK |
read(cunit) (filencvarrecs(i), i=1,maxcvars) |
|
./pkg/ctrl/ctrl_unpack.F |
255 |
CTRL_UNPACK |
read(cunit) (filencvarxmax(i), i=1,maxcvars) |
|
./pkg/ctrl/ctrl_unpack.F |
256 |
CTRL_UNPACK |
read(cunit) (filencvarymax(i), i=1,maxcvars) |
|
./pkg/ctrl/ctrl_unpack.F |
257 |
CTRL_UNPACK |
read(cunit) (filencvarnrmax(i), i=1,maxcvars) |
|
./pkg/ctrl/ctrl_unpack.F |
258 |
CTRL_UNPACK |
read(cunit) (filencvargrd(i), i=1,maxcvars) |