From 3fd56d32389b2329e53e0f31176763afddf6c7b0 Mon Sep 17 00:00:00 2001
From: Philippe WAUTELET <philippe.wautelet@aero.obs-mip.fr>
Date: Thu, 29 Sep 2022 09:56:32 +0200
Subject: [PATCH] Philippe 29/09/2022: bugfix: NBALLOONS->NAIRCRAFTS for
AIRCRAFTS_NML_ALLOCATE
---
src/MNH/read_exsegn.f90 | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/MNH/read_exsegn.f90 b/src/MNH/read_exsegn.f90
index ca2f7047a..c469bd5d4 100644
--- a/src/MNH/read_exsegn.f90
+++ b/src/MNH/read_exsegn.f90
@@ -855,7 +855,7 @@ IF (KMI == 1) THEN
IF (GFOUND) READ(UNIT=ILUSEG,NML=NAM_FLYERS)
IF ( NAIRCRAFTS > 0 ) THEN
- CALL AIRCRAFTS_NML_ALLOCATE( NBALLOONS )
+ CALL AIRCRAFTS_NML_ALLOCATE( NAIRCRAFTS )
CALL POSNAM(ILUSEG,'NAM_AIRCRAFTS',GFOUND,ILUOUT)
IF (GFOUND) READ(UNIT=ILUSEG,NML=NAM_AIRCRAFTS)
END IF
--
GitLab