Index: LMDZ6/branches/PBLSURF_GPUPORT/libf/phylmd/surf_ocean_mod.F90
===================================================================
--- LMDZ6/branches/PBLSURF_GPUPORT/libf/phylmd/surf_ocean_mod.F90	(revision 5932)
+++ LMDZ6/branches/PBLSURF_GPUPORT/libf/phylmd/surf_ocean_mod.F90	(revision 5934)
@@ -73,5 +73,5 @@
     REAL, DIMENSION(knon), INTENT(IN)        :: alb1   ! albedo in visible SW interval
     REAL, DIMENSION(knon), INTENT(IN)        :: windsp ! wind at 10 m, in m s-1
-    REAL, DIMENSION(klon), INTENT(IN)        :: rmu0  
+    REAL, DIMENSION(knon), INTENT(IN)        :: rmu0  
     REAL, DIMENSION(knon), INTENT(IN)        :: fder
     REAL, DIMENSION(knon), INTENT(IN)        :: tsurf_in     ! defined only for subscripts 1:knon