diff --git a/src/MNH/write_lfifm1_for_diag_supp.f90 b/src/MNH/write_lfifm1_for_diag_supp.f90 index 7af90ee87753eca4bc66de373a067c330ae32736..d55684efa88ed69971bfd94e404eefa170f95806 100644 --- a/src/MNH/write_lfifm1_for_diag_supp.f90 +++ b/src/MNH/write_lfifm1_for_diag_supp.f90 @@ -441,17 +441,17 @@ IF (LCLD_COV .AND. LUSERC) THEN ZWORK21(:,:)=0.0 ZWORK21(IIB:IIE,IJB:IJE)=MAXVAL(XCLDFR(IIB:IIE,IJB:IJE,JPVEXT+1:IKE),DIM=3) - TZFIELD = TFIELDMETADATA( & - CMNHNAME = 'CLDFRMAX', & + TZFIELD = TFIELDMETADATA( & + CMNHNAME = 'CLDFRMAX', & !Invalid CF convention standard name: CSTDNAME = 'max_cloud_fraction', & - CLONGNAME = 'CLDFRMAX', & - CUNITS = '1', & - CDIR = 'XY', & - CCOMMENT = 'X_Y_MAx of CLoud fraction, & - NGRID = 1, & - NTYPE = TYPEREAL, & - NDIMS = 2, & - LTIMEDEP = .TRUE. ) + CLONGNAME = 'CLDFRMAX', & + CUNITS = '1', & + CDIR = 'XY', & + CCOMMENT = 'X_Y_MAx of CLoud fraction', & + NGRID = 1, & + NTYPE = TYPEREAL, & + NDIMS = 2, & + LTIMEDEP = .TRUE. ) CALL IO_Field_write(TPFILE,TZFIELD,ZWORK21) ! ! Visibility