/[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.6 by heimbach, Wed Jun 7 01:55:13 2006 UTC revision 1.7 by dfer, Wed Jul 19 14:34:19 2006 UTC
# Line 68  c--   Initialize the tiled cost function Line 68  c--   Initialize the tiled cost function
68            end do            end do
69  #endif  #endif
70  c  c
71  #if (defined (ALLOW_COST_TEST) || defined (ALLOW_COST_ATLANTIC_HEAT))  #ifdef ALLOW_COST
72            do k=1,nr            do k=1,nr
73              do j=1,sNy              do j=1,sNy
74                do i=1,sNx                do i=1,sNx
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.22