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

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

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

revision 1.8 by heimbach, Thu Jan 31 16:55:29 2008 UTC revision 1.9 by utke, Tue Oct 14 18:04:53 2008 UTC
# Line 39  C     ========= Local variables ======== Line 39  C     ========= Local variables ========
39        _RL     countTU(Nr), countTV(Nr)        _RL     countTU(Nr), countTV(Nr)
40        _RL     petawatt        _RL     petawatt
41        _RL     sum        _RL     sum
42        parameter( petawatt = 1.e+15 )        parameter( petawatt = 1. _d +15 )
43    
44  C     80W - 0W at 24N  C     80W - 0W at 24N
45        parameter( isecbeg = 69, isecend = 87, jsec = 28 )        parameter( isecbeg = 69, isecend = 87, jsec = 28 )
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9
  ViewVC Help
Powered by ViewVC 1.1.22