/[MITgcm]/MITgcm/pkg/ptracers/ptracers_integrate.F
ViewVC logotype

Diff of /MITgcm/pkg/ptracers/ptracers_integrate.F

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

revision 1.41 by heimbach, Tue Jan 18 19:37:41 2011 UTC revision 1.42 by heimbach, Tue Jan 18 22:58:20 2011 UTC
# Line 131  CADJ &      = comlev1_bibj_k_ptracers, k Line 131  CADJ &      = comlev1_bibj_k_ptracers, k
131  # ifdef NONLIN_FRSURF  # ifdef NONLIN_FRSURF
132  CADJ STORE gpTr(:,:,k,bi,bj,iTracer)  CADJ STORE gpTr(:,:,k,bi,bj,iTracer)
133  CADJ &      = comlev1_bibj_k_ptracers, key=kkey, byte=isbyte  CADJ &      = comlev1_bibj_k_ptracers, key=kkey, byte=isbyte
134  CADJ STORE rFlx(:,:,k,iTracer)  CADJ STORE rFlx(:,:,:,iTracer)
135  CADJ &      = comlev1_bibj_k_ptracers, key=kkey, byte=isbyte  CADJ &      = comlev1_bibj_k_ptracers, key=kkey, byte=isbyte
136  # endif  # endif
137  #endif /* ALLOW_AUTODIFF_TAMC */  #endif /* ALLOW_AUTODIFF_TAMC */
Legend:
Removed from v.1.41  
changed lines
  Added in v.1.42
  ViewVC Help
Powered by ViewVC 1.1.22