Index: LMDZ6/trunk/libf/phylmdiso/cv3param_mod_h.f90
===================================================================
--- LMDZ6/trunk/libf/phylmdiso/cv3param_mod_h.f90	(revision 5352)
+++ LMDZ6/trunk/libf/phylmdiso/cv3param_mod_h.f90	(revision 5352)
@@ -0,0 +1,44 @@
+! Replaces cv3param.h
+
+MODULE cv3param_mod_h
+  !------------------------------------------------------------
+  ! Parameters for convectL, iflag_con=3:
+  ! (includes - microphysical parameters,
+  !            - parameters that control the rate of approach
+  !               to quasi-equilibrium)
+  !            - noff & minorig (previously in input of convect1)
+  !------------------------------------------------------------
+  IMPLICIT NONE; PRIVATE
+  PUBLIC sigdz, spfac, pbcrit, ptcrit, elcrit, tlcrit, coef_peel, omtrain, dtovsh, dpbase, &
+          dttrig, dtcrit, tau, beta, alpha, alpha1, T_top_max, tau_stop, noconv_stop, wbmax, &
+          delta, betad, ejectliq, ejectice, flag_wb, flag_epKEorig, cv_flag_feed, noff, minorig, &
+          nl, nlp, nlm
+
+  INTEGER flag_epKEorig
+  REAL flag_wb
+  INTEGER cv_flag_feed
+  INTEGER noff, minorig, nl, nlp, nlm
+  REAL sigdz, spfac
+  REAL pbcrit, ptcrit
+  REAL elcrit, tlcrit
+  REAL coef_peel
+  REAL omtrain
+  REAL dtovsh, dpbase, dttrig
+  REAL dtcrit, tau, beta, alpha, alpha1
+  REAL T_top_max
+  REAL tau_stop, noconv_stop
+  REAL wbmax
+  REAL delta
+  REAL betad
+  REAL ejectliq
+  REAL ejectice
+
+  !$OMP THREADPRIVATE(sigdz, spfac, pbcrit, ptcrit, elcrit, tlcrit, coef_peel, omtrain, dtovsh, dpbase, &
+  !$OMP      dttrig, dtcrit, tau, beta, alpha, alpha1, T_top_max, tau_stop, noconv_stop, wbmax, &
+  !$OMP      delta, betad, ejectliq, ejectice, flag_wb, flag_epKEorig, cv_flag_feed, noff, minorig, &
+  !$OMP      nl, nlp, nlm)
+END MODULE cv3param_mod_h
+
+
+
+
Index: LMDZ6/trunk/libf/phylmdiso/cvparam_mod_h.f90
===================================================================
--- LMDZ6/trunk/libf/phylmdiso/cvparam_mod_h.f90	(revision 5352)
+++ LMDZ6/trunk/libf/phylmdiso/cvparam_mod_h.f90	(revision 5352)
@@ -0,0 +1,25 @@
+MODULE cvparam_mod_h
+  IMPLICIT NONE; PRIVATE
+  PUBLIC noff, minorig, nl, nlp, nlm &
+          , elcrit, tlcrit &
+          , entp, sigs, sigd &
+          , omtrain, omtsnow, coeffr, coeffs &
+          , dtmax, cu, betad, alpha, damp, delta
+
+  integer noff, minorig, nl, nlp, nlm
+  real elcrit, tlcrit
+  real entp
+  real sigs, sigd
+  real omtrain, omtsnow, coeffr, coeffs
+  real dtmax
+  real cu
+  real betad
+  real alpha, damp
+  real delta
+
+  !$OMP THREADPRIVATE(noff, minorig, nl, nlp, nlm &
+  !$OMP          , elcrit, tlcrit &
+  !$OMP          , entp, sigs, sigd &
+  !$OMP          , omtrain, omtsnow, coeffr, coeffs &
+  !$OMP          , dtmax, cu, betad, alpha, damp, delta)
+END MODULE cvparam_mod_h
Index: LMDZ6/trunk/libf/phylmdiso/cvthermo_mod_h.f90
===================================================================
--- LMDZ6/trunk/libf/phylmdiso/cvthermo_mod_h.f90	(revision 5352)
+++ LMDZ6/trunk/libf/phylmdiso/cvthermo_mod_h.f90	(revision 5352)
@@ -0,0 +1,17 @@
+! Replaces cvthermo.h
+
+MODULE cvthermo_mod_h
+  IMPLICIT NONE; PRIVATE
+  PUBLIC cpd, cpv, cl, ci, rrv, rrd, lv0, lf0, g, rowl, t0, clmcpv, clmcpd, cpdmcp, cpvmcpd, cpvmcl  &
+          , clmci, eps, epsi, epsim1, ginv, hrd, grav
+
+  ! Thermodynamical constants for convectL:
+  REAL cpd, cpv, cl, ci, rrv, rrd, lv0, lf0, g, rowl, t0
+  REAL clmcpv, clmcpd, cpdmcp, cpvmcpd, cpvmcl, clmci
+  REAL eps, epsi, epsim1
+  REAL ginv, hrd
+  REAL grav
+
+  !$OMP THREADPRIVATE(cpd, cpv, cl, ci, rrv, rrd, lv0, lf0, g, rowl, t0, clmcpv, clmcpd, cpdmcp, cpvmcpd, cpvmcl  &
+  !$OMP      , clmci, eps, epsi, epsim1, ginv, hrd, grav)
+END MODULE cvthermo_mod_h