Changeset 2220 for LMDZ5/branches/testing/libf/phylmd/cv3_inicp.F90

Timestamp:

Mar 3, 2015, 2:41:13 PM (10 years ago)

Author:

Laurent Fairhead

Message:

Merged trunk changes -r2186:2216 into testing branch

Location:

LMDZ5/branches/testing

Files:

• . (modified) (1 prop)
• libf/phylmd/cv3_inicp.F90 (modified) (2 diffs)

LMDZ5/branches/testing/libf/phylmd/cv3_inicp.F90

@@ -9 +9 @@
   ! modified by :                                               *
   ! **************************************************************
-
+  IMPLICIT NONE
   include "YOMCST2.h"
 
@@ -19 +19 @@
 
   REAL qcoef1, qcoef2, qff, qfff, qmix, rmix, qmix1, rmix1, qmix2, rmix2, f
+  REAL :: sumcoef,sigma,aire,pdf,mu,df,ff
 
   qcoef1(f) = tanh(f/gammas)