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

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

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

revision 1.4 by heimbach, Thu Mar 24 12:17:39 2011 UTC revision 1.5 by heimbach, Thu Mar 24 21:39:55 2011 UTC
# Line 4  C $Name$ Line 4  C $Name$
4  #ifdef ALLOW_PTRACERS  #ifdef ALLOW_PTRACERS
5  # ifdef AUTODIFF_PTRACERS_SPLIT_FILES  # ifdef AUTODIFF_PTRACERS_SPLIT_FILES
6  CADJ STORE ptracer(:,:,:,:,:,1:PTRACERS_num)  CADJ STORE ptracer(:,:,:,:,:,1:PTRACERS_num)
7  CADJ &     = tapelev2_ptr, key = ilev_2  CADJ &     = tapelev2, key = ilev_2
8  CADJ STORE gptrnm1(:,:,:,:,:,1:PTRACERS_num)  CADJ STORE gptrnm1(:,:,:,:,:,1:PTRACERS_num)
9  CADJ &     = tapelev2_ptr, key = ilev_2  CADJ &     = tapelev2, key = ilev_2
10  CADJ STORE gptr(:,:,:,:,:,1:PTRACERS_num)  CADJ STORE gptr(:,:,:,:,:,1:PTRACERS_num)
11  CADJ &     = tapelev2_ptr, key = ilev_2  CADJ &     = tapelev2, key = ilev_2
12  # else  # else
13  CADJ STORE ptracer = tapelev2, key = ilev_2  CADJ STORE ptracer = tapelev2, key = ilev_2
14  CADJ STORE gptrnm1 = tapelev2, key = ilev_2  CADJ STORE gptrnm1 = tapelev2, key = ilev_2
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.22