/[MITgcm]/MITgcm/pkg/kpp/kpp_transport_s.F
ViewVC logotype

Diff of /MITgcm/pkg/kpp/kpp_transport_s.F

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

revision 1.17 by heimbach, Wed May 21 10:45:33 2014 UTC revision 1.18 by heimbach, Thu May 22 13:11:14 2014 UTC
# Line 74  catn: will not apply if use SALT_PLUME_V Line 74  catn: will not apply if use SALT_PLUME_V
74  c      will be exchanged  c      will be exchanged
75  #ifdef ALLOW_SALT_PLUME  #ifdef ALLOW_SALT_PLUME
76        IF ( useSALT_PLUME ) THEN        IF ( useSALT_PLUME ) THEN
77  #ifndef SALT_PLUME_VOLUME  # ifndef SALT_PLUME_VOLUME
78           tmpFac1 = 1. _d 0           tmpFac1 = 1. _d 0
79  #else  # else
80           tmpFac1 = 0. _d 0           tmpFac1 = 0. _d 0
81  #endif /* ndef SALT_PLUME_VOLUME */  # endif /* ndef SALT_PLUME_VOLUME */
82        ELSE        ELSE
83           tmpFac1 = 0. _d 0           tmpFac1 = 0. _d 0
84        ENDIF        ENDIF
Legend:
Removed from v.1.17  
changed lines
  Added in v.1.18
  ViewVC Help
Powered by ViewVC 1.1.22