Changeset 3780 for branches/2012/dev_MERGE_2012/NEMOGCM/NEMO/TOP_SRC/PISCES/sms_pisces.F90

Timestamp:

2013-02-08T12:13:47+01:00 (11 years ago)

Author:

cetlod

Message:

nemo_v3_5_alpha : bug correction to avoid compilation errors when using key_kriest, see ticket #1050

File:

• branches/2012/dev_MERGE_2012/NEMOGCM/NEMO/TOP_SRC/PISCES/sms_pisces.F90 (modified) (1 diff)

branches/2012/dev_MERGE_2012/NEMOGCM/NEMO/TOP_SRC/PISCES/sms_pisces.F90

@@ -104 +104 @@
 #if defined key_kriest
    !!*  Kriest parameter for aggregation
-   REAL(wp) ::   xkr_eta                            !: ???
-   REAL(wp) ::   xkr_zeta                           !: ???
-   REAL(wp) ::   xkr_massp                          !: ???
-   REAL(wp) ::   xkr_mass_min, xkr_mass_max         !: ???
+   REAL(wp) ::   xkr_eta                            !: Sinking  exponent 
+   REAL(wp) ::   xkr_zeta                           !:  N content exponent 
+   REAL(wp) ::   xkr_ncontent                       !:  N content factor   
+   REAL(wp) ::   xkr_massp                          !: 
+   REAL(wp) ::   xkr_mass_min, xkr_mass_max         !:  Minimum, Maximum mass for Aggregates 
 #endif