diff --git a/src/MNH/read_field.f90 b/src/MNH/read_field.f90 index 1488327fe0928654d088a67d3c2392a5b803da95..860010bdecc6380a911508f5fda42b59cf95bedc 100644 --- a/src/MNH/read_field.f90 +++ b/src/MNH/read_field.f90 @@ -671,7 +671,7 @@ TZFIELD = TFIELDMETADATA( & CUNITS = '', & CDIR = '--', & CCOMMENT = '', & - NGRID = 1, & + NGRID = 0, & NTYPE = TYPELOG, & NDIMS = 0, & LTIMEDEP = .FALSE. ) @@ -1474,7 +1474,7 @@ IF ( LFORCING ) THEN CUNITS = 'Pa', & CDIR = '--', & CCOMMENT = 'Forcing ground pressure', & - NGRID = 1, & + NGRID = 0, & NTYPE = TYPEREAL, & NDIMS = 0, & LTIMEDEP = .FALSE. ) diff --git a/src/MNH/write_lfifm1_for_diag.f90 b/src/MNH/write_lfifm1_for_diag.f90 index a6099e6a0f4eb779347699adbcf1e6f85fc896ca..0347435aeb1246f4e13efdd3f88cffeb667d3b8b 100644 --- a/src/MNH/write_lfifm1_for_diag.f90 +++ b/src/MNH/write_lfifm1_for_diag.f90 @@ -2169,7 +2169,7 @@ IF (LVAR_FRC .AND. LFORCING) THEN CUNITS = 'Pa', & CDIR = '--', & CCOMMENT = 'Forcing ground pressure', & - NGRID = 1, & + NGRID = 0, & NTYPE = TYPEREAL, & NDIMS = 0, & LTIMEDEP = .FALSE. ) diff --git a/src/MNH/write_lfin.f90 b/src/MNH/write_lfin.f90 index 0eb4fca4991126b2d02d53a2aa10e81df2e0167b..2da738140919a0322a2450cf195be528ba028b77 100644 --- a/src/MNH/write_lfin.f90 +++ b/src/MNH/write_lfin.f90 @@ -424,7 +424,7 @@ TZFIELD = TFIELDMETADATA( & CUNITS = '', & CDIR = '--', & CCOMMENT = '', & - NGRID = 1, & + NGRID = 0, & NTYPE = TYPELOG, & NDIMS = 0, & LTIMEDEP = .FALSE. ) @@ -1725,7 +1725,7 @@ IF (LFORCING) THEN CUNITS = 'Pa', & CDIR = '--', & CCOMMENT = 'Forcing ground pressure', & - NGRID = 1, & + NGRID = 0, & NTYPE = TYPEREAL, & NDIMS = 0, & LTIMEDEP = .FALSE. )