--- trunk/libf/phylmd/cltracrn.f90	2008/04/18 14:45:53	10
+++ trunk/libf/phylmd/cltracrn.f90	2011/01/06 17:52:19	38
@@ -10,7 +10,7 @@
 
   use indicesol, only: nbsrf
   use dimphy, only: klon, klev
-  use YOMCST, only: RD, rg
+  use SUPHEC_M, only: RD, rg
 
   IMPLICIT none
   !======================================================================