--- trunk/libf/phylmd/concvl.f90 2008/08/05 13:31:32 17 +++ trunk/libf/phylmd/concvl.f90 2011/01/06 17:52:19 38 @@ -10,8 +10,8 @@ USE dimens_m USE dimphy - USE yomcst - USE yoethf + USE suphec_m + USE yoethf_m USE fcttre IMPLICIT NONE