Index: trunk/LMDZ.COMMON/libf/evolution/layered_deposits.F90
===================================================================
--- trunk/LMDZ.COMMON/libf/evolution/layered_deposits.F90	(revision 4135)
+++ trunk/LMDZ.COMMON/libf/evolution/layered_deposits.F90	(revision 4170)
@@ -33,5 +33,5 @@
 logical(k4), protected, private :: impose_dust_ratio            ! Impose dust-to-ice ratio instead of dust tendency (see 'dust2ice_ratio')
 real(dp),    protected, private :: dust2ice_ratio               ! Dust-to-ice ratio when ice condenses (10% by default)
-real(dp),    protected, private :: d_dust                       ! Tendency of dust [kg.m-2.y-1]
+real(dp),    protected, private :: d_dust                       ! Tendency of dust [kg/m2/y]
 real(dp),    parameter, private :: dry_lag_porosity  = 0.2_dp   ! Porosity of dust lag
 real(dp),    parameter, private :: wet_lag_porosity  = 0.15_dp  ! Porosity of water ice lag
@@ -85,5 +85,5 @@
 !
 ! DESCRIPTION
-!     Setter for 'layered_deposits' configuration parameters.
+!     Setter for "layered_deposits" configuration parameters.
 !
 ! AUTHORS & DATE
@@ -749,5 +749,5 @@
             h2o_ice(ig,islope) = layerings_map(ig,islope)%top%h_h2oice*rho_h2oice
         else
-            call subsurface_ice_layering(layerings_map(ig,islope),h2oice_depth(ig,islope),h2o_ice(ig,islope),co2_ice(ig,islope))
+            call get_ssice_layering(layerings_map(ig,islope),h2oice_depth(ig,islope),h2o_ice(ig,islope),co2_ice(ig,islope))
         end if
     end do
@@ -1034,8 +1034,8 @@
 
 !=======================================================================
-SUBROUTINE subsurface_ice_layering(this,h_toplag,h2o_ice,co2_ice)
-!-----------------------------------------------------------------------
-! NAME
-!     subsurface_ice_layering
+SUBROUTINE get_ssice_layering(this,h_toplag,h2o_ice,co2_ice)
+!-----------------------------------------------------------------------
+! NAME
+!     get_ssice_layering
 !
 ! DESCRIPTION
@@ -1095,5 +1095,5 @@
 end if
 
-END SUBROUTINE subsurface_ice_layering
+END SUBROUTINE get_ssice_layering
 !=======================================================================