--- trunk/libf/phylmd/Orography/orodrag.f90	2009/12/14 15:25:16	23
+++ trunk/phylmd/Orography/orodrag.f	2014/03/05 14:57:53	82
@@ -4,8 +4,9 @@
 
       USE dimens_m
       USE dimphy
-      USE yomcst
+      USE suphec_m
       USE yoegwd
+      use gwprofil_m, only: gwprofil
       IMPLICIT NONE