File |
Line number |
Procedure |
Code |
./optim/optim_readdata.F |
146 |
OPTIM_READDATA |
read( funit ) nvarlength |
./optim/optim_readdata.F |
191 |
OPTIM_READDATA |
print *, 'pathei: nvarlength ', nvarlength |
./optim/optim_readdata.F |
340 |
OPTIM_READDATA |
if ( icvoffset + cbuffindex .gt. nvarlength ) then |
./optim/optim_readdata.F |
346 |
OPTIM_READDATA |
& nvarlength, '.' |
./optim/optim_readdata.F |
377 |
OPTIM_READDATA |
nn = nvarlength |
./optim/optim_writedata.F |
111 |
OPTIM_WRITEDATA |
print *, 'pathei: nvarlength ', nvarlength |
./optim/optim_writedata.F |
144 |
OPTIM_WRITEDATA |
write( funit ) nvarlength |
./pkg/admtlm/admtlm_dsvd2model.F |
258 |
ADMTLM_DSVD2MODEL |
if ( filenvarlength .NE. nvarlength ) then |
./pkg/admtlm/admtlm_dsvd2model.F |
260 |
ADMTLM_DSVD2MODEL |
& filenvarlength, nvarlength |
./pkg/admtlm/admtlm_model2dsvd.F |
206 |
ADMTLM_MODEL2DSVD |
write(cunit) nvarlength |
./pkg/ctrl/ctrl.h |
111 |
NO PROCEDURE |
integer nvarlength |
./pkg/ctrl/ctrl.h |
93 |
NO PROCEDURE |
& nvarlength, |
./pkg/ctrl/ctrl_init_wet.F |
181 |
CTRL_INIT_WET |
nvarlength = 0 |
./pkg/ctrl/ctrl_init_wet.F |
190 |
CTRL_INIT_WET |
nvarlength = nvarlength + |
./pkg/ctrl/ctrl_init_wet.F |
193 |
CTRL_INIT_WET |
nvarlength = nvarlength + |
./pkg/ctrl/ctrl_init_wet.F |
196 |
CTRL_INIT_WET |
nvarlength = nvarlength + |
./pkg/ctrl/ctrl_init_wet.F |
199 |
CTRL_INIT_WET |
nvarlength = nvarlength + |
./pkg/ctrl/ctrl_init_wet.F |
204 |
CTRL_INIT_WET |
nvarlength = nvarlength + |
./pkg/ctrl/ctrl_init_wet.F |
214 |
CTRL_INIT_WET |
nvarlength = nvarlength + |
./pkg/ctrl/ctrl_init_wet.F |
220 |
CTRL_INIT_WET |
nvarlength = nvarlength + |
./pkg/ctrl/ctrl_init_wet.F |
226 |
CTRL_INIT_WET |
nvarlength = nvarlength + |
./pkg/ctrl/ctrl_init_wet.F |
232 |
CTRL_INIT_WET |
nvarlength = nvarlength + |
./pkg/ctrl/ctrl_init_wet.F |
253 |
CTRL_INIT_WET |
& 'ctrl-wet 1: nvarlength = ', nvarlength |
./pkg/ctrl/ctrl_init_wet.F |
350 |
CTRL_INIT_WET |
CALL GLOBAL_SUM_INT( nvarlength, myThid ) |
./pkg/ctrl/ctrl_init_wet.F |
353 |
CTRL_INIT_WET |
& 'ctrl-wet 13: global nvarlength for Nr =', nr, nvarlength |
./pkg/ctrl/ctrl_init_wet.F |
588 |
CTRL_INIT_WET |
& 'ctrl_init: control vector length: ', nvarlength |
./pkg/ctrl/ctrl_pack.F |
224 |
CTRL_PACK |
write(cunit) nvarlength |
./pkg/ctrl/ctrl_unpack.F |
280 |
CTRL_UNPACK |
if ( filenvarlength .NE. nvarlength ) then |
./pkg/ctrl/ctrl_unpack.F |
282 |
CTRL_UNPACK |
& filenvarlength, nvarlength |