File |
Line number |
Procedure |
Code |
./optim/optim_readdata.F |
180 |
OPTIM_READDATA |
read( funit ) (ncvarindex(i), i=1,maxcvars) |
./optim/optim_readdata.F |
181 |
OPTIM_READDATA |
read( funit ) (ncvarrecs(i), i=1,maxcvars) |
./optim/optim_readdata.F |
182 |
OPTIM_READDATA |
read( funit ) (ncvarxmax(i), i=1,maxcvars) |
./optim/optim_readdata.F |
183 |
OPTIM_READDATA |
read( funit ) (ncvarymax(i), i=1,maxcvars) |
./optim/optim_readdata.F |
184 |
OPTIM_READDATA |
read( funit ) (ncvarnrmax(i), i=1,maxcvars) |
./optim/optim_readdata.F |
185 |
OPTIM_READDATA |
read( funit ) (ncvargrd(i), i=1,maxcvars) |
./optim/optim_readdata.F |
237 |
OPTIM_READDATA |
& (ncvarindex(i), i=1,maxcvars) |
./optim/optim_readdata.F |
239 |
OPTIM_READDATA |
& (ncvarrecs(i), i=1,maxcvars) |
./optim/optim_readdata.F |
241 |
OPTIM_READDATA |
& (ncvarxmax(i), i=1,maxcvars) |
./optim/optim_readdata.F |
243 |
OPTIM_READDATA |
& (ncvarymax(i), i=1,maxcvars) |
./optim/optim_readdata.F |
245 |
OPTIM_READDATA |
& (ncvarnrmax(i), i=1,maxcvars) |
./optim/optim_readdata.F |
247 |
OPTIM_READDATA |
& (ncvargrd(i), i=1,maxcvars) |
./optim/optim_readdata.F |
290 |
OPTIM_READDATA |
do icvar = 1,maxcvars |
./optim/optim_writedata.F |
129 |
OPTIM_WRITEDATA |
& (ncvarindex(i), i=1,maxcvars) |
./optim/optim_writedata.F |
131 |
OPTIM_WRITEDATA |
& (ncvarrecs(i), i=1,maxcvars) |
./optim/optim_writedata.F |
133 |
OPTIM_WRITEDATA |
& (ncvarxmax(i), i=1,maxcvars) |
./optim/optim_writedata.F |
135 |
OPTIM_WRITEDATA |
& (ncvarymax(i), i=1,maxcvars) |
./optim/optim_writedata.F |
137 |
OPTIM_WRITEDATA |
& (ncvarnrmax(i), i=1,maxcvars) |
./optim/optim_writedata.F |
139 |
OPTIM_WRITEDATA |
& (ncvargrd(i), i=1,maxcvars) |
./optim/optim_writedata.F |
178 |
OPTIM_WRITEDATA |
write( funit ) (ncvarindex(i), i=1,maxcvars) |
./optim/optim_writedata.F |
179 |
OPTIM_WRITEDATA |
write( funit ) (ncvarrecs(i), i=1,maxcvars) |
./optim/optim_writedata.F |
180 |
OPTIM_WRITEDATA |
write( funit ) (ncvarxmax(i), i=1,maxcvars) |
./optim/optim_writedata.F |
181 |
OPTIM_WRITEDATA |
write( funit ) (ncvarymax(i), i=1,maxcvars) |
./optim/optim_writedata.F |
182 |
OPTIM_WRITEDATA |
write( funit ) (ncvarnrmax(i), i=1,maxcvars) |
./optim/optim_writedata.F |
183 |
OPTIM_WRITEDATA |
write( funit ) (ncvargrd(i), i=1,maxcvars) |
./optim/optim_writedata.F |
188 |
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 |
112 |
NO PROCEDURE |
integer ncvarindex ( maxcvars ) |
./pkg/ctrl/ctrl.h |
113 |
NO PROCEDURE |
integer ncvarrecs ( maxcvars ) |
./pkg/ctrl/ctrl.h |
114 |
NO PROCEDURE |
integer ncvarrecstart ( maxcvars ) |
./pkg/ctrl/ctrl.h |
115 |
NO PROCEDURE |
integer ncvarrecsend ( maxcvars ) |
./pkg/ctrl/ctrl.h |
116 |
NO PROCEDURE |
integer ncvarxmax ( maxcvars ) |
./pkg/ctrl/ctrl.h |
117 |
NO PROCEDURE |
integer ncvarymax ( maxcvars ) |
./pkg/ctrl/ctrl.h |
118 |
NO PROCEDURE |
integer ncvarnrmax ( maxcvars ) |
./pkg/ctrl/ctrl.h |
140 |
NO PROCEDURE |
character*(1) ncvargrd(maxcvars) |
./pkg/ctrl/ctrl.h |
179 |
NO PROCEDURE |
integer filencvarindex(maxcvars) |
./pkg/ctrl/ctrl.h |
180 |
NO PROCEDURE |
integer filencvarrecs(maxcvars) |
./pkg/ctrl/ctrl.h |
181 |
NO PROCEDURE |
integer filencvarxmax(maxcvars) |
./pkg/ctrl/ctrl.h |
182 |
NO PROCEDURE |
integer filencvarymax(maxcvars) |
./pkg/ctrl/ctrl.h |
183 |
NO PROCEDURE |
integer filencvarnrmax(maxcvars) |
./pkg/ctrl/ctrl.h |
193 |
NO PROCEDURE |
character*( 1) filencvargrd(maxcvars) |
./pkg/ctrl/ctrl.h |
19 |
NO PROCEDURE |
integer 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 |
98 |
CTRL_INIT |
do ivar = 1,maxcvars |
./pkg/ctrl/ctrl_init_wet.F |
182 |
CTRL_INIT_WET |
do i = 1,maxcvars |
./pkg/ctrl/ctrl_init_wet.F |
282 |
CTRL_INIT_WET |
do i = 1, maxcvars |
./pkg/ctrl/ctrl_pack.F |
264 |
CTRL_PACK |
write(cunit) (ncvarindex(i), i=1,maxcvars) |
./pkg/ctrl/ctrl_pack.F |
265 |
CTRL_PACK |
write(cunit) (ncvarrecs(i), i=1,maxcvars) |
./pkg/ctrl/ctrl_pack.F |
266 |
CTRL_PACK |
write(cunit) (ncvarxmax(i), i=1,maxcvars) |
./pkg/ctrl/ctrl_pack.F |
267 |
CTRL_PACK |
write(cunit) (ncvarymax(i), i=1,maxcvars) |
./pkg/ctrl/ctrl_pack.F |
268 |
CTRL_PACK |
write(cunit) (ncvarnrmax(i), i=1,maxcvars) |
./pkg/ctrl/ctrl_pack.F |
269 |
CTRL_PACK |
write(cunit) (ncvargrd(i), i=1,maxcvars) |
./pkg/ctrl/ctrl_unpack.F |
270 |
CTRL_UNPACK |
read(cunit) (filencvarindex(i), i=1,maxcvars) |
./pkg/ctrl/ctrl_unpack.F |
271 |
CTRL_UNPACK |
read(cunit) (filencvarrecs(i), i=1,maxcvars) |
./pkg/ctrl/ctrl_unpack.F |
272 |
CTRL_UNPACK |
read(cunit) (filencvarxmax(i), i=1,maxcvars) |
./pkg/ctrl/ctrl_unpack.F |
273 |
CTRL_UNPACK |
read(cunit) (filencvarymax(i), i=1,maxcvars) |
./pkg/ctrl/ctrl_unpack.F |
274 |
CTRL_UNPACK |
read(cunit) (filencvarnrmax(i), i=1,maxcvars) |
./pkg/ctrl/ctrl_unpack.F |
275 |
CTRL_UNPACK |
read(cunit) (filencvargrd(i), i=1,maxcvars) |