/[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.12 by jmc, Fri Aug 10 19:36:02 2012 UTC revision 1.13 by gforget, Fri Aug 10 22:57:20 2012 UTC
# Line 110  cph because we need it in ADM*TLM Line 110  cph because we need it in ADM*TLM
110  c--   Initialise the "global" parts of the cost function.  c--   Initialise the "global" parts of the cost function.
111        _BEGIN_MASTER( mythid )        _BEGIN_MASTER( mythid )
112          fc         = 0. _d 0          fc         = 0. _d 0
113            glofc      = 0. _d 0
114        _END_MASTER( mythid )        _END_MASTER( mythid )
115    
116        _BARRIER        _BARRIER
Legend:
Removed from v.1.12  
changed lines
  Added in v.1.13
  ViewVC Help
Powered by ViewVC 1.1.22