diff --git a/src/MNH/aircraft_balloon.f90 b/src/MNH/aircraft_balloon.f90 index b66fdc49efafc4abaf07a4bff1dcacaf006f07f6..2ad204176f5edaf2dd3b5ed557bc9d10b7411c7a 100644 --- a/src/MNH/aircraft_balloon.f90 +++ b/src/MNH/aircraft_balloon.f90 @@ -154,6 +154,8 @@ IF ( ISP == NFLYER_DEFAULT_RANK ) THEN ELSE IF ( TDTCUR > TZAIRCRAFT%TLAND ) THEN ! Nothing to do ! Aircraft will never be in flight in this run. Data will remain on the initial process. + NRANKNXT_AIRCRAFT(JI) = NFLYER_DEFAULT_RANK + CYCLE ELSE ! Aircraft is already in flight at the beginning of the run TZDATE = TDTCUR diff --git a/src/MNH/aircraft_balloon_evol.f90 b/src/MNH/aircraft_balloon_evol.f90 index 2303011daab21515ccc45b5ad0daada2bba701fd..b50740df54301b3a890d0dd74ccdbd413b31ceda 100644 --- a/src/MNH/aircraft_balloon_evol.f90 +++ b/src/MNH/aircraft_balloon_evol.f90 @@ -1,4 +1,4 @@ -!MNH_LIC Copyright 2000-2023 CNRS, Meteo-France and Universite Paul Sabatier +!MNH_LIC Copyright 2000-2024 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. @@ -998,7 +998,6 @@ USE MODD_AIRCRAFT_BALLOON, ONLY: TAIRCRAFTDATA USE MODD_TYPE_DATE, ONLY: DATE_TIME USE MODE_DATETIME -USE MODE_POSITION_TOOLS, ONLY: FIND_PROCESS_AND_MODEL_FROM_XY_POS IMPLICIT NONE