/[MITgcm]/MITgcm/pkg/cost/adcost.h
ViewVC logotype

Diff of /MITgcm/pkg/cost/adcost.h

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

revision 1.3 by heimbach, Thu Oct 2 21:34:45 2003 UTC revision 1.4 by heimbach, Thu Nov 6 22:03:49 2003 UTC
# Line 5  c     ================================== Line 5  c     ==================================
5  c  c
6  c     o Header for model-data comparison; adjoint part.  c     o Header for model-data comparison; adjoint part.
7  c  c
 c     The individual cost function contributions are multiplied by  
 c     factors mult_"var" which allow to switch off these contributions  
 c     without removing them in the adjoint code. This is useful for  
 c     doing tests with the adjoint and perhaps useful in assimilation  
 c     experiments where individual contributions are successively  
 c     switched on. For future applications it would be better to place  
 c     the initialisation of the multipliers somewhere else, for example  
 c     in a namelist, which is read in at the start of the model.  
 c  
8  c     started: Christian Eckert eckert@mit.edu  06-Apr-2000  c     started: Christian Eckert eckert@mit.edu  06-Apr-2000
 c  
9  c     changed: Christian Eckert eckert@mit.edu  c     changed: Christian Eckert eckert@mit.edu
10  c  c     heimbach@mit.edu 5-Nov-2003 retain only adfc
11  c  c
12  c     ==================================================================  c     ==================================================================
13  c     HEADER ADCOST  c     HEADER ADCOST
14  c     ==================================================================  c     ==================================================================
15    
16        common /adcost_r/        common /adcost_r/
17       &                  adfc,       &                  adfc
      &                  adobjf_hflux,  
      &                  adobjf_sflux,  
      &                  adobjf_tauu,  
      &                  adobjf_tauv,  
      &                  adobjf_hmean,  
      &                  adobjf_h,  
      &                  adobjf_temp,  
      &                  adobjf_salt,  
      &                  adobjf_sst,  
      &                  adobjf_ctds,  
      &                  adobjf_ctdt  
18        _RL  adfc        _RL  adfc
       _RL  adobjf_hflux   (nsx,nsy)  
       _RL  adobjf_sflux   (nsx,nsy)  
       _RL  adobjf_tauu (nsx,nsy)  
       _RL  adobjf_tauv (nsx,nsy)  
       _RL  adobjf_hmean  
       _RL  adobjf_h    (nsx,nsy)  
       _RL  adobjf_temp (nsx,nsy)  
       _RL  adobjf_salt (nsx,nsy)  
       _RL  adobjf_sst  (nsx,nsy)  
       _RL  adobjf_ctds (nsx,nsy)  
       _RL  adobjf_ctdt (nsx,nsy)  
19    
20  #ifdef ALLOW_COST_STATE_FINAL  #ifdef ALLOW_COST_STATE_FINAL
21        common /adcost_state_final_r/        common /adcost_state_final_r/
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22