Symbol Description Uses
dfile 13


File Line number Procedure Code
./optim/optim_readdata.F 111 OPTIM_READDATA 
      if      ( dfile .eq. ctrlname ) then
./optim/optim_readdata.F 116 OPTIM_READDATA 
      else if ( dfile .eq. costname ) then
./optim/optim_readdata.F 125 OPTIM_READDATA 
        print*,'            argument. *dfile* = ',dfile
./optim/optim_readdata.F 12 OPTIM_READDATA 
     I                      dfile,
./optim/optim_readdata.F 137 OPTIM_READDATA 
     &     dfile,'_',yctrlid(1:10),'.opt', nopt
./optim/optim_readdata.F 385 OPTIM_READDATA 
      if      ( dfile .eq. ctrlname ) then
./optim/optim_readdata.F 387 OPTIM_READDATA 
      else if ( dfile .eq. costname ) then
./optim/optim_readdata.F 64 OPTIM_READDATA 
      character*(9) dfile
./optim/optim_writedata.F 103 OPTIM_WRITEDATA 
     &     dfile,'_',yctrlid(1:10),'.opt', nopt
./optim/optim_writedata.F 12 OPTIM_WRITEDATA 
     I                       dfile,
./optim/optim_writedata.F 51 OPTIM_WRITEDATA 
      character*(9) dfile
./optim/optim_writedata.F 85 OPTIM_WRITEDATA 
      if ( dfile .eq. ctrlname ) then
./optim/optim_writedata.F 93 OPTIM_WRITEDATA 
        print*,'             argument. *dfile* = ',dfile