/[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.2 by heimbach, Thu Jan 17 17:03:34 2002 UTC revision 1.3 by heimbach, Thu Oct 2 21:34:45 2003 UTC
# Line 49  c     ================================== Line 49  c     ==================================
49        _RL  adobjf_ctds (nsx,nsy)        _RL  adobjf_ctds (nsx,nsy)
50        _RL  adobjf_ctdt (nsx,nsy)        _RL  adobjf_ctdt (nsx,nsy)
51    
52    #ifdef ALLOW_COST_STATE_FINAL
53          common /adcost_state_final_r/
54         &                adobjf_state_final
55          _RL  adobjf_state_final (snx,sny,nsx,nsy)
56    cph      _RL  adobjf_state_final (snx,sny,nr,nsx,nsy,2)
57    #endif
58    
59  #ifdef ALLOW_COST_VECTOR  #ifdef ALLOW_COST_VECTOR
60        common /adcost_array/        common /adcost_vector_r/
61       &                  adobjf_vector       &                  adobjf_vector
62        _RL  adobjf_vector(snx,nsx,nsy)        _RL  adobjf_vector(snx,nsx,nsy)
63  #endif  #endif
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22