/[MITgcm]/MITgcm/optim/optim_numbmod.F
ViewVC logotype

Diff of /MITgcm/optim/optim_numbmod.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.7 by heimbach, Thu Dec 28 12:19:52 2006 UTC revision 1.8 by dfer, Tue Jan 15 16:36:32 2008 UTC
# Line 73  c     == global variables == Line 73  c     == global variables ==
73  #include "EEPARAMS.h"  #include "EEPARAMS.h"
74  #include "SIZE.h"  #include "SIZE.h"
75    
76  #include "ecco.h"  cdfer#include "ecco.h"
77  #include "ctrl.h"  #include "ctrl.h"
78  #include "optim.h"  #include "optim.h"
79  #include "minimization.h"  #include "minimization.h"
# Line 155  c     == end of interface == Line 155  c     == end of interface ==
155       &  xx_obcsestartdate1,  xx_obcsestartdate2,  xx_obcseperiod,       &  xx_obcsestartdate1,  xx_obcsestartdate2,  xx_obcseperiod,
156       &  xx_diffkr_file, xx_kapgm_file, xx_tr1_file,       &  xx_diffkr_file, xx_kapgm_file, xx_tr1_file,
157       &  xx_sst_file, xx_sss_file,       &  xx_sst_file, xx_sss_file,
158       &  xx_sst_file, xx_sststartdate1, xx_sststartdate2, xx_sstperiod,       &  xx_sststartdate1, xx_sststartdate2, xx_sstperiod,
159       &  xx_sss_file, xx_sssstartdate1, xx_sssstartdate2, xx_sssperiod,       &  xx_sssstartdate1, xx_sssstartdate2, xx_sssperiod,
160       &  xx_depth_file, xx_efluxy_file, xx_efluxp_file,       &  xx_depth_file, xx_efluxy_file, xx_efluxp_file,
161       &  xx_bottomdrag_file, xx_edtaux_file, xx_edtauy_file,       &  xx_bottomdrag_file, xx_edtaux_file, xx_edtauy_file,
162       &  xx_uvel_file, xx_vvel_file, xx_etan_file,       &  xx_uvel_file, xx_vvel_file, xx_etan_file,
163       &  doInitXX, doPackDiag, doZscaleUnpack, doZscalePack,       &  doInitXX, doPackDiag, doZscaleUnpack, doZscalePack,
164       &  doMainUnpack, doMainPack, doAdmtlmBypassAD, delZexp       &  doMainUnpack, doMainPack, doAdmtlmBypassAD, delZexp
165    cdfer
166         & ,xx_hfluxm_file
167    cdfer
168    
169        namelist /CTRL_PACKNAMES/        namelist /CTRL_PACKNAMES/
170       &  yadmark, yctrlid, yctrlposunpack, yctrlpospack,       &  yadmark, yctrlid, yctrlposunpack, yctrlpospack,
# Line 185  c--   Preset the optimization parameters Line 188  c--   Preset the optimization parameters
188        eps        = -1.e-6        eps        = -1.e-6
189        nupdate    =  1        nupdate    =  1
190        ff         = 0.        ff         = 0.
191        expId      = 'MIT_CE_000'  cdfer      expId      = 'MIT_CE_000'
192        yctrlid    = expId        yctrlid    = 'MIT_CE_000'
193    
194        modeldataunit = 14        modeldataunit = 14
195        scrunit1      = 11        scrunit1      = 11
# Line 216  c--   Read control parameters from file. Line 219  c--   Read control parameters from file.
219        print*, ' OPTIM_NUMBMOD: Control options have been read.'        print*, ' OPTIM_NUMBMOD: Control options have been read.'
220    
221  cph(  cph(
222        expId = yctrlid  cdfer      expId = yctrlid
223  cph)  cph)
224    
225  c--   Read optimization parameters from file.  c--   Read optimization parameters from file.
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22