Index: trunk/LMDZ.COMMON/libf/evolution/sorption.F90
===================================================================
--- trunk/LMDZ.COMMON/libf/evolution/sorption.F90	(revision 4170)
+++ trunk/LMDZ.COMMON/libf/evolution/sorption.F90	(revision 4174)
@@ -142,5 +142,5 @@
 use slopes,     only: subslope_dist, def_slope_mean
 use atmosphere, only: ap, bp
-use physics,    only: alpha_clap_h2o, beta_clap_h2o, m_h2o, m_co2, A, B
+use physics,    only: alpha_clap_h2o, beta_clap_h2o, m_h2o, A, B
 use maths,      only: pi