/[MITgcm]/MITgcm/pkg/cost/cost_dependent_init.F
ViewVC logotype

Diff of /MITgcm/pkg/cost/cost_dependent_init.F

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

revision 1.8 by heimbach, Wed Oct 14 20:50:06 2009 UTC revision 1.9 by heimbach, Thu Oct 15 05:21:50 2009 UTC
# Line 54  c     == end of interface == Line 54  c     == end of interface ==
54  #ifdef ALLOW_AUTODIFF  #ifdef ALLOW_AUTODIFF
55    
56        adfc = 1.0        adfc = 1.0
 #ifdef ALLOW_DIC  
       adtotcost = 1.0  
 #endif  
57    
58        do bj = jtlo,jthi        do bj = jtlo,jthi
59         do bi = itlo,ithi         do bi = itlo,ithi
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9
  ViewVC Help
Powered by ViewVC 1.1.22