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

Diff of /MITgcm/pkg/generic_advdiff/gad_som_fill_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 58  C     myThid    :: my Thread Id. number Line 58  C     myThid    :: my Thread Id. number
58        INTEGER bi,bj        INTEGER bi,bj
59        INTEGER myThid        INTEGER myThid
60    
 #ifdef GAD_ALLOW_SOM_ADVECT  
61  C     !LOCAL VARIABLES:  C     !LOCAL VARIABLES:
62  C     == Local variables ==  C     == Local variables ==
63  CEOP  CEOP
# Line 82  CEOP Line 81  CEOP
81       &                               sm_xz, sm_yz, bi,bj, myThid )       &                               sm_xz, sm_yz, bi,bj, myThid )
82        ENDIF        ENDIF
83    
 #endif /* GAD_ALLOW_SOM_ADVECT */  
   
84        RETURN        RETURN
85        END        END
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22