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

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

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

revision 1.1 by heimbach, Thu Aug 25 16:10:42 2005 UTC revision 1.2 by heimbach, Tue Dec 13 16:15:32 2005 UTC
# Line 62  c--   Initialize the tiled cost function Line 62  c--   Initialize the tiled cost function
62            end do            end do
63  #endif  #endif
64  c  c
65  #ifdef ALLOW_COST_ATLANTIC_HEAT  #if (defined (ALLOW_COST_TEST) || defined (ALLOW_COST_ATLANTIC_HEAT))
66            do k=1,nr            do k=1,nr
67              do j=1,sNy              do j=1,sNy
68                do i=1,sNx                do i=1,sNx
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22