From dd71c88e2c7bdfa81e344ebfede2578da0b6401d Mon Sep 17 00:00:00 2001 From: Philippe WAUTELET <philippe.wautelet@aero.obs-mip.fr> Date: Wed, 16 Mar 2022 11:31:11 +0100 Subject: [PATCH] Philippe 16/03/2022: IO: bugfix: CDIR was wrong for COVERnnn in READ_SURFX2COV_1COV_MNH (cherry picked from commit a00ee173e9041a92c094e6fc540c77772d940518) --- src/MNH/read_surf_mnh.f90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/MNH/read_surf_mnh.f90 b/src/MNH/read_surf_mnh.f90 index f051ed739..30b2a9371 100644 --- a/src/MNH/read_surf_mnh.f90 +++ b/src/MNH/read_surf_mnh.f90 @@ -1,4 +1,4 @@ -!MNH_LIC Copyright 2003-2020 CNRS, Meteo-France and Universite Paul Sabatier +!MNH_LIC Copyright 2003-2022 CNRS, Meteo-France and Universite Paul Sabatier !MNH_LIC This is part of the Meso-NH software governed by the CeCILL-C licence !MNH_LIC version 1. See LICENSE, CeCILL-C_V1-en.txt and CeCILL-C_V1-fr.txt !MNH_LIC for details. version 1. @@ -1023,7 +1023,7 @@ IF (.NOT. GCOVER_PACKED) THEN TZFIELD%CSTDNAME = '' TZFIELD%CLONGNAME = TRIM(YREC) TZFIELD%CUNITS = '' - TZFIELD%CDIR = YDIR1 + TZFIELD%CDIR = YDIR TZFIELD%CCOMMENT = 'X_Y_'//TRIM(YREC) TZFIELD%NGRID = 4 TZFIELD%NTYPE = TYPEREAL -- GitLab