--- trunk/libf/phylmd/albedo.f 2010/12/21 15:45:48 37 +++ trunk/libf/phylmd/albedo.f 2011/01/06 17:52:19 38 @@ -6,7 +6,7 @@ SUBROUTINE alboc(rjour,rlat,albedo) use dimens_m use dimphy - use YOMCST + use yomcst use orbite_m, only: orbite IMPLICIT none c======================================================================