/[MITgcm]/MITgcm/pkg/seaice/seaice_ad_check_lev4_dir.h
ViewVC logotype

Annotation of /MITgcm/pkg/seaice/seaice_ad_check_lev4_dir.h

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

Revision 1.13 - (hide annotations) (download)
Fri Jan 14 01:34:58 2011 UTC (14 years, 5 months ago) by gforget
Branch: MAIN
CVS Tags: checkpoint63d, checkpoint63a, checkpoint63b, checkpoint63c, checkpoint63, checkpoint62s, checkpoint62r, checkpoint62w, checkpoint62v, checkpoint62u, checkpoint62t, checkpoint62z, checkpoint62y, checkpoint62x
Changes since 1.12: +2 -2 lines
File MIME type: text/plain 
o model/src, pkg/autodiff, pkg/ecco, pkg/seaice:
 alleviate the need for additional 3D tapes when using
 the non-inear free surface in the adjoint. This is done
 by adding an 'update' of hfacc etc. to their current
 value at the beginning of forward_step.F.
1 gforget 1.13 C $Header: /u/gcmpack/MITgcm/pkg/seaice/seaice_ad_check_lev4_dir.h,v 1.12 2010/12/17 04:02:25 gforget Exp $
2 jmc 1.10 C $Name: $
3 heimbach 1.8
4     CADJ STORE StoreSEAICE = tapelev4, key = ilev_4
5    
6 heimbach 1.11 #ifdef SEAICE_MULTICATEGORY
7     CADJ STORE tices = tapelev4, key = ilev_4
8     #endif
9    
10 gforget 1.13 #ifdef AUTODIFF_SOMETIMES_NEEDED
11 gforget 1.12 CADJ STORE area = tapelev4, key = ilev_4
12     CADJ STORE heff = tapelev4, key = ilev_4
13     CADJ STORE uice = tapelev4, key = ilev_4
14     CADJ STORE vice = tapelev4, key = ilev_4
15     #endif
16    
17 heimbach 1.4 #ifdef ALLOW_COST_ICE
18     CADJ STORE objf_ice = tapelev4, key = ilev_4
19     #endif
20 heimbach 1.9 #ifdef ALLOW_SEAICE_COST_EXPORT
21     CADJ STORE uHeffExportCell = tapelev4, key = ilev_4
22     CADJ STORE vHeffExportCell = tapelev4, key = ilev_4
23     #endif
  ViewVC Help
Powered by ViewVC 1.1.22