diff --git a/src/MNH/write_lfifm1_for_diag_supp.f90 b/src/MNH/write_lfifm1_for_diag_supp.f90
index c067e62189f73bf435dff6b1160824cd1c3edc74..93ea1f7f17519fe5a0b47e0e23d70796f0f1489c 100644
--- a/src/MNH/write_lfifm1_for_diag_supp.f90
+++ b/src/MNH/write_lfifm1_for_diag_supp.f90
@@ -1032,7 +1032,7 @@ IF (CSURF=='EXTE') THEN
     TZFIELD%NTYPE      = TYPEREAL
     TZFIELD%NDIMS      = 2
     TZFIELD%LTIMEDEP   = .TRUE.
-    CALL IO_Field_write(TPFILE,TZFIELD,XCURRENT_LWD)
+    CALL IO_Field_write(TPFILE,TZFIELD,XCURRENT_LWU)
   END IF
 END IF