File |
Line number |
Procedure |
Code |
./optim/optim_readdata.F |
157 |
OPTIM_READDATA |
read( funit ) (nWetwGlobal(k), k=1,nr) |
./optim/optim_readdata.F |
205 |
OPTIM_READDATA |
& (nWetwGlobal(k), k=1,nr) |
./optim/optim_readdata.F |
305 |
OPTIM_READDATA |
cbuffindex = nWetwGlobal(k) |
./optim/optim_writedata.F |
125 |
OPTIM_WRITEDATA |
& (nWetwGlobal(k), k=1,nr) |
./optim/optim_writedata.F |
154 |
OPTIM_WRITEDATA |
write( funit ) (nWetwGlobal(k), k=1,nr) |
./optim/optim_writedata.F |
203 |
OPTIM_WRITEDATA |
cbuffindex = nWetwGlobal(k) |
./pkg/admtlm/admtlm_dsvd2model.F |
270 |
ADMTLM_DSVD2MODEL |
& filenWetwGlobal(k) .NE. nWetwGlobal(k) .OR. |
./pkg/admtlm/admtlm_model2dsvd.F |
218 |
ADMTLM_MODEL2DSVD |
write(cunit) (nWetwGlobal(k), k=1,nr) |
./pkg/ctrl/ctrl_init_wet.F |
392 |
CTRL_INIT_WET |
nWetwGlobal(k)=ntmp2(3) |
./pkg/ctrl/ctrl_pack.F |
240 |
CTRL_PACK |
write(cunit) (nWetwGlobal(k), k=1,nr) |
./pkg/ctrl/ctrl_unpack.F |
292 |
CTRL_UNPACK |
& filenWetwGlobal(k) .NE. nWetwGlobal(k) .OR. |