diff --git a/src/MNH/write_lfifm1_for_diag_supp.f90 b/src/MNH/write_lfifm1_for_diag_supp.f90 index fe258339c24f28ce5f521bd18685baccdd86b2d8..1412e986da03976f1c12034a49dd7a083cd443b4 100644 --- a/src/MNH/write_lfifm1_for_diag_supp.f90 +++ b/src/MNH/write_lfifm1_for_diag_supp.f90 @@ -963,7 +963,7 @@ IF (CSURF=='EXTE') THEN NTYPE = TYPEREAL, & NDIMS = 2, & LTIMEDEP = .TRUE. ) - CALL IO_Field_write(TPFILE,TZFIELD,XCURRENT_LWD) + CALL IO_Field_write(TPFILE,TZFIELD,XCURRENT_LWU) END IF END IF