File |
Line number |
Procedure |
Code |
./optim/optim_readdata.F |
106 |
OPTIM_READDATA |
funit = 20 |
./optim/optim_readdata.F |
138 |
OPTIM_READDATA |
open( funit, file = fname, |
./optim/optim_readdata.F |
145 |
OPTIM_READDATA |
read( funit ) nvartype |
./optim/optim_readdata.F |
146 |
OPTIM_READDATA |
read( funit ) nvarlength |
./optim/optim_readdata.F |
147 |
OPTIM_READDATA |
read( funit ) yctrlid |
./optim/optim_readdata.F |
148 |
OPTIM_READDATA |
read( funit ) filenopt |
./optim/optim_readdata.F |
149 |
OPTIM_READDATA |
read( funit ) fileff |
./optim/optim_readdata.F |
150 |
OPTIM_READDATA |
read( funit ) fileiG |
./optim/optim_readdata.F |
151 |
OPTIM_READDATA |
read( funit ) filejG |
./optim/optim_readdata.F |
152 |
OPTIM_READDATA |
read( funit ) filensx |
./optim/optim_readdata.F |
153 |
OPTIM_READDATA |
read( funit ) filensy |
./optim/optim_readdata.F |
155 |
OPTIM_READDATA |
read( funit ) (nWetcGlobal(k), k=1,nr) |
./optim/optim_readdata.F |
156 |
OPTIM_READDATA |
read( funit ) (nWetsGlobal(k), k=1,nr) |
./optim/optim_readdata.F |
157 |
OPTIM_READDATA |
read( funit ) (nWetwGlobal(k), k=1,nr) |
./optim/optim_readdata.F |
159 |
OPTIM_READDATA |
read( funit ) (nWetvGlobal(k), k=1,nr) |
./optim/optim_readdata.F |
162 |
OPTIM_READDATA |
read(funit) (nWetiGlobal(k), k=1,nr) |
./optim/optim_readdata.F |
168 |
OPTIM_READDATA |
read( funit ) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
./optim/optim_readdata.F |
171 |
OPTIM_READDATA |
read( funit ) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
./optim/optim_readdata.F |
174 |
OPTIM_READDATA |
read( funit ) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
./optim/optim_readdata.F |
177 |
OPTIM_READDATA |
read( funit ) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
./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 |
186 |
OPTIM_READDATA |
read( funit ) |
./optim/optim_readdata.F |
295 |
OPTIM_READDATA |
read( funit ) ncvarindex(icvar) |
./optim/optim_readdata.F |
296 |
OPTIM_READDATA |
read( funit ) filej |
./optim/optim_readdata.F |
297 |
OPTIM_READDATA |
read( funit ) filei |
./optim/optim_readdata.F |
355 |
OPTIM_READDATA |
read( funit ) cbuffindex |
./optim/optim_readdata.F |
356 |
OPTIM_READDATA |
read( funit ) filek |
./optim/optim_readdata.F |
357 |
OPTIM_READDATA |
read( funit ) (cbuff(ii), ii=1,cbuffindex) |
./optim/optim_readdata.F |
381 |
OPTIM_READDATA |
close( funit ) |
./optim/optim_readdata.F |
78 |
OPTIM_READDATA |
integer funit |
./optim/optim_writedata.F |
104 |
OPTIM_WRITEDATA |
open( funit, file = fname, |
./optim/optim_writedata.F |
143 |
OPTIM_WRITEDATA |
write( funit ) nvartype |
./optim/optim_writedata.F |
144 |
OPTIM_WRITEDATA |
write( funit ) nvarlength |
./optim/optim_writedata.F |
145 |
OPTIM_WRITEDATA |
write( funit ) yctrlid |
./optim/optim_writedata.F |
146 |
OPTIM_WRITEDATA |
write( funit ) optimcycle |
./optim/optim_writedata.F |
147 |
OPTIM_WRITEDATA |
write( funit ) ff |
./optim/optim_writedata.F |
148 |
OPTIM_WRITEDATA |
write( funit ) big |
./optim/optim_writedata.F |
149 |
OPTIM_WRITEDATA |
write( funit ) bjg |
./optim/optim_writedata.F |
150 |
OPTIM_WRITEDATA |
write( funit ) nsx |
./optim/optim_writedata.F |
151 |
OPTIM_WRITEDATA |
write( funit ) nsy |
./optim/optim_writedata.F |
152 |
OPTIM_WRITEDATA |
write( funit ) (nWetcGlobal(k), k=1,nr) |
./optim/optim_writedata.F |
153 |
OPTIM_WRITEDATA |
write( funit ) (nWetsGlobal(k), k=1,nr) |
./optim/optim_writedata.F |
154 |
OPTIM_WRITEDATA |
write( funit ) (nWetwGlobal(k), k=1,nr) |
./optim/optim_writedata.F |
156 |
OPTIM_WRITEDATA |
write( funit ) (nWetvGlobal(k), k=1,nr) |
./optim/optim_writedata.F |
159 |
OPTIM_WRITEDATA |
write(funit) (nWetiGlobal(k), k=1,nr) |
./optim/optim_writedata.F |
165 |
OPTIM_WRITEDATA |
write(funit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
./optim/optim_writedata.F |
168 |
OPTIM_WRITEDATA |
write(funit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
./optim/optim_writedata.F |
171 |
OPTIM_WRITEDATA |
write(funit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
./optim/optim_writedata.F |
174 |
OPTIM_WRITEDATA |
write(funit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
./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 |
184 |
OPTIM_WRITEDATA |
write( funit ) |
./optim/optim_writedata.F |
193 |
OPTIM_WRITEDATA |
write( funit ) ncvarindex(icvar) |
./optim/optim_writedata.F |
194 |
OPTIM_WRITEDATA |
write( funit ) bj |
./optim/optim_writedata.F |
195 |
OPTIM_WRITEDATA |
write( funit ) bi |
./optim/optim_writedata.F |
246 |
OPTIM_WRITEDATA |
write( funit ) cbuffindex |
./optim/optim_writedata.F |
247 |
OPTIM_WRITEDATA |
write( funit ) k |
./optim/optim_writedata.F |
248 |
OPTIM_WRITEDATA |
write( funit ) (cbuff(ii), ii=1,cbuffindex) |
./optim/optim_writedata.F |
258 |
OPTIM_WRITEDATA |
close( funit ) |
./optim/optim_writedata.F |
65 |
OPTIM_WRITEDATA |
integer funit |
./optim/optim_writedata.F |
80 |
OPTIM_WRITEDATA |
funit = 20 |