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

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

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

revision 1.14 by jmc, Mon Nov 5 18:49:39 2007 UTC revision 1.15 by jmc, Mon Dec 17 21:20:38 2007 UTC
# Line 44  C  myThid               :: thread number Line 44  C  myThid               :: thread number
44        INTEGER myThid        INTEGER myThid
45    
46  C !OUTPUT PARAMETERS: ==================================================  C !OUTPUT PARAMETERS: ==================================================
47  C  gPtracer             :: updates tendency array  C  gPtracer       :: updates tendency array
48    
49  #ifdef ALLOW_PTRACERS  #ifdef ALLOW_PTRACERS
50    
51  C !LOCAL VARIABLES: ====================================================  C !LOCAL VARIABLES: ====================================================
52  C  i,j                  :: loop indices  C  i,j            :: loop indices
53        INTEGER i,j        INTEGER i,j
54  C     number of surface interface layer  C     number of surface interface layer
55        INTEGER kSurface        INTEGER kSurface

Legend:
Removed from v.1.14  
changed lines
  Added in v.1.15

  ViewVC Help
Powered by ViewVC 1.1.22