Index: LMDZ6/trunk/libf/phylmd/phys_output_write_mod.F90
===================================================================
--- LMDZ6/trunk/libf/phylmd/phys_output_write_mod.F90	(revision 3691)
+++ LMDZ6/trunk/libf/phylmd/phys_output_write_mod.F90	(revision 3692)
@@ -711,5 +711,5 @@
             ENDIF
           ENDDO
-          zx_tmp_fi2d(:)=missing_val
+          wind100m(:)=missing_val
           DO k=1, kmax_100m-1                                      !--we could stop much lower
             DO i=1,klon
@@ -726,5 +726,5 @@
          !--polynomial fit for 14,Vestas,1074,V136/3450 kW windmill - Olivier
          DO i=1,klon
-           IF (pctsrf(i,is_ter).GT.0.05) THEN
+           IF (pctsrf(i,is_ter).GT.0.05 .AND. wind100m(i).NE.missing_val) THEN
              x=wind100m(i)
              IF (x.LE.3.0 .OR. x.GE.22.5) THEN
@@ -738,5 +738,5 @@
              ENDIF
            ELSE
-             zx_tmp_fi2d(i)=missing_val_nf90
+             zx_tmp_fi2d(i)=missing_val
            ENDIF
          ENDDO
@@ -747,5 +747,5 @@
          !--polynomial fit for 14,Vestas,867,V164/8000 kW - Olivier
          DO i=1,klon
-           IF (pctsrf(i,is_oce).GT.0.05) THEN
+           IF (pctsrf(i,is_oce).GT.0.05 .AND. wind100m(i).NE.missing_val) THEN
              x=wind100m(i)
              IF (x.LE.3.0 .OR. x.GE.25.5) THEN
@@ -759,5 +759,5 @@
              ENDIF
            ELSE
-             zx_tmp_fi2d(i)=missing_val_nf90
+             zx_tmp_fi2d(i)=missing_val
            ENDIF
          ENDDO