/[MITgcm]/MITgcm/pkg/generic_advdiff/gad_som_prep_cs_corner.F
ViewVC logotype

Diff of /MITgcm/pkg/generic_advdiff/gad_som_prep_cs_corner.F

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

revision 1.1 by jmc, Tue Feb 12 20:32:34 2008 UTC revision 1.2 by jmc, Fri May 9 21:43:16 2008 UTC
# Line 57  C     myThid     :: my Thread Id number Line 57  C     myThid     :: my Thread Id number
57        INTEGER myThid        INTEGER myThid
58  CEOP  CEOP
59    
 #ifdef GAD_ALLOW_SOM_ADVECT  
60  C     !LOCAL VARIABLES:  C     !LOCAL VARIABLES:
61  C     === Local variables ===  C     === Local variables ===
62        INTEGER i,j, jPass, n        INTEGER i,j, jPass, n
# Line 228  C--   End getting back corner values fro Line 227  C--   End getting back corner values fro
227  C---  End if/else - overlapOnly - block  C---  End if/else - overlapOnly - block
228        ENDIF        ENDIF
229    
 #endif /* GAD_ALLOW_SOM_ADVECT */  
   
230        RETURN        RETURN
231        END        END
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22