--- trunk/dyn3d/exner_hyb.f 2018/02/05 10:39:38 254 +++ trunk/dyn3d/exner_hyb.f 2018/03/20 09:35:59 265 @@ -28,7 +28,7 @@ ! haut des couches, "pk(:, :, l)" donn\'e par la relation (2), pour ! l = 2 \`a l = llm. - use dimens_m, only: llm + use dimensions, only: llm use comconst, only: kappa, cpp use disvert_m, only: preff