diff --git a/src/MNH/statprof_reader.f90 b/src/MNH/statprof_reader.f90 index be9c3d2e269800071670b5c4795e56745290e133..43a7168d24eb98fcd4d72e5197ff50a857f80114 100644 --- a/src/MNH/statprof_reader.f90 +++ b/src/MNH/statprof_reader.f90 @@ -1,4 +1,4 @@ -!MNH_LIC Copyright 2020-2022 CNRS, Meteo-France and Universite Paul Sabatier +!MNH_LIC Copyright 2020-2023 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. @@ -81,6 +81,9 @@ DO ! Read station/profiler coordinates READ( ILU, END = 101, FMT = '(A)' ) YSTRING + ! Skip empty lines + IF ( LEN_TRIM( YSTRING ) == 0 ) CYCLE + ! Check if record is written in French convention CALL FRENCH_TO_ENGLISH( YSTRING )