/[MITgcm]/MITgcm/pkg/ptracers/ptracers_ad_check_lev2_dir.h
ViewVC logotype

Annotation of /MITgcm/pkg/ptracers/ptracers_ad_check_lev2_dir.h

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


Revision 1.6 - (hide annotations) (download)
Fri Aug 15 19:18:12 2014 UTC (9 years, 9 months ago) by jmc
Branch: MAIN
CVS Tags: checkpoint66g, checkpoint66f, checkpoint66e, checkpoint66d, checkpoint66c, checkpoint66b, checkpoint66a, checkpoint66o, checkpoint66n, checkpoint66m, checkpoint66l, checkpoint66k, checkpoint66j, checkpoint66i, checkpoint66h, checkpoint65z, checkpoint65x, checkpoint65y, checkpoint65r, checkpoint65s, checkpoint65p, checkpoint65q, checkpoint65v, checkpoint65w, checkpoint65t, checkpoint65u, checkpoint65j, checkpoint65k, checkpoint65h, checkpoint65i, checkpoint65n, checkpoint65o, checkpoint65l, checkpoint65m, checkpoint65c, checkpoint65f, checkpoint65g, checkpoint65d, checkpoint65e, HEAD
Changes since 1.5: +5 -8 lines
File MIME type: text/plain
remove gPtr from common block

1 jmc 1.6 C $Header: /u/gcmpack/MITgcm/pkg/ptracers/ptracers_ad_check_lev2_dir.h,v 1.5 2011/03/24 21:39:55 heimbach Exp $
2 jmc 1.3 C $Name: $
3    
4 heimbach 1.1 #ifdef ALLOW_PTRACERS
5 heimbach 1.4 # ifdef AUTODIFF_PTRACERS_SPLIT_FILES
6 jmc 1.6 CADJ STORE pTracer(:,:,:,:,:,1:PTRACERS_num)
7 heimbach 1.5 CADJ & = tapelev2, key = ilev_2
8 jmc 1.6 CADJ STORE gpTrNm1(:,:,:,:,:,1:PTRACERS_num)
9 heimbach 1.5 CADJ & = tapelev2, key = ilev_2
10 heimbach 1.4 # else
11 jmc 1.6 CADJ STORE pTracer = tapelev2, key = ilev_2
12     CADJ STORE gpTrNm1 = tapelev2, key = ilev_2
13 heimbach 1.4 # endif
14 heimbach 1.1 #endif /* ALLOW_PTRACERS */

  ViewVC Help
Powered by ViewVC 1.1.22