/[MITgcm]/MITgcm/pkg/exf/exf_ad_check_lev3_dir.h
ViewVC logotype

Contents of /MITgcm/pkg/exf/exf_ad_check_lev3_dir.h

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

Revision 1.15 - (show annotations) (download)
Fri Jun 1 23:30:16 2007 UTC (17 years ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint59e, checkpoint59d, checkpoint59g, checkpoint59f, checkpoint59c, checkpoint59h
Changes since 1.14: +3 -146 lines
File MIME type: text/plain 
Re-organized adjoint checkpointing according to Matt Mazloff
(but with modifs/completions/cleanups)
Storing is now bundled into large arrays to optimized I/O
(and second step in cleanup of the_main_loop)
1 #ifdef ALLOW_EXF
2
3 CADJ STORE StoreEXF1 = tapelev3, key = ilev_3
4 CADJ STORE StoreEXF2 = tapelev3, key = ilev_3
5 CADJ STORE StoreCTRLS1 = tapelev3, key = ilev_3
6
7
8 # ifdef ALLOW_HFLUX_CONTROL
9 CADJ STORE xx_hflux0 = tapelev3, key = ilev_3
10 CADJ STORE xx_hflux1 = tapelev3, key = ilev_3
11 # endif
12 # ifdef ALLOW_SFLUX_CONTROL
13 CADJ STORE xx_sflux0 = tapelev3, key = ilev_3
14 CADJ STORE xx_sflux1 = tapelev3, key = ilev_3
15 # endif
16 # ifdef ALLOW_USTRESS_CONTROL
17 CADJ STORE xx_tauu0 = tapelev3, key = ilev_3
18 CADJ STORE xx_tauu1 = tapelev3, key = ilev_3
19 # endif
20 # ifdef ALLOW_VSTRESS_CONTROL
21 CADJ STORE xx_tauv0 = tapelev3, key = ilev_3
22 CADJ STORE xx_tauv1 = tapelev3, key = ilev_3
23 # endif
24
25 #endif /* ALLOW_EXF */
  ViewVC Help
Powered by ViewVC 1.1.22