/[MITgcm]/MITgcm_contrib/atnguyen/code_21Dec2012_saltplume/kpp_calc.F
ViewVC logotype

Diff of /MITgcm_contrib/atnguyen/code_21Dec2012_saltplume/kpp_calc.F

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

revision 1.1 by atn, Sun Apr 20 04:03:07 2014 UTC revision 1.3 by atn, Tue Apr 29 07:26:42 2014 UTC
# Line 2  C $Header$ Line 2  C $Header$
2  C $Name$  C $Name$
3    
4  #include "KPP_OPTIONS.h"  #include "KPP_OPTIONS.h"
5    #ifdef ALLOW_SALT_PLUME
6    #include "SALT_PLUME_OPTIONS.h"
7    #endif
8    
9  CBOP  CBOP
10  C !ROUTINE: KPP_CALC  C !ROUTINE: KPP_CALC
# Line 179  c     vRef   (nx,ny)       - Reference m Line 182  c     vRef   (nx,ny)       - Reference m
182        _RL bo    ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy                )        _RL bo    ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy                )
183        _RL bosol ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy                )        _RL bosol ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy                )
184  #ifdef ALLOW_SALT_PLUME  #ifdef ALLOW_SALT_PLUME
185    #ifndef SALT_PLUME_VOLUME
186        _RL boplume ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy              )        _RL boplume ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy              )
187    #endif /* ndef SALT_PLUME_VOLUME */
188  #endif /* ALLOW_SALT_PLUME */  #endif /* ALLOW_SALT_PLUME */
189        _RL shsq  ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy, Nr            )        _RL shsq  ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy, Nr            )
190        _RL dVsq  ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy, Nr            )        _RL dVsq  ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy, Nr            )
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22