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

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

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

revision 1.3 by heimbach, Thu Mar 24 12:17:39 2011 UTC revision 1.4 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 &     = tapelev4_ptr, key = ilev_4  CADJ &     = tapelev4, key = ilev_4
8  CADJ STORE gptrnm1(:,:,:,:,:,1:PTRACERS_num)  CADJ STORE gptrnm1(:,:,:,:,:,1:PTRACERS_num)
9  CADJ &     = tapelev4_ptr, key = ilev_4  CADJ &     = tapelev4, key = ilev_4
10  CADJ STORE gptr(:,:,:,:,:,1:PTRACERS_num)  CADJ STORE gptr(:,:,:,:,:,1:PTRACERS_num)
11  CADJ &     = tapelev4_ptr, key = ilev_4  CADJ &     = tapelev4, key = ilev_4
12  # else  # else
13  CADJ STORE ptracer = tapelev4, key = ilev_4  CADJ STORE ptracer = tapelev4, key = ilev_4
14  CADJ STORE gptrnm1 = tapelev4, key = ilev_4  CADJ STORE gptrnm1 = tapelev4, key = ilev_4
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22