--- trunk/Sources/phylmd/clmain.f	2018/01/05 18:18:53	250
+++ trunk/Sources/phylmd/clmain.f	2018/01/08 14:12:02	251
@@ -339,9 +339,10 @@
              END DO
           end IF
 
-          call coef_diff_turb(dtime, nsrf, ni(:knon), ypaprs, ypplay, yu, yv, &
-               yq, yt, yts, ycdragm, zgeop(:knon, :), ycoefm(:knon, :), &
-               ycoefh(:knon, :), yq2)
+          call coef_diff_turb(dtime, nsrf, ni(:knon), ypaprs(:knon, :), &
+               ypplay(:knon, :), yu(:knon, :), yv(:knon, :), yq(:knon, :), &
+               yt(:knon, :), yts(:knon), ycdragm(:knon), zgeop(:knon, :), &
+               ycoefm(:knon, :), ycoefh(:knon, :), yq2(:knon, :))
 
           CALL clvent(dtime, yu(:knon, 1), yv(:knon, 1), ycoefm(:knon, :), &
                ycdragm(:knon), yt(:knon, :), yu(:knon, :), ypaprs(:knon, :), &