diff --git a/src/MNH/aircraft_balloon_evol.f90 b/src/MNH/aircraft_balloon_evol.f90 index e6cfc21bad4548fe49bd153d979a04d2a7a1739d..6a81850ba548ec1f84101c07ea3ed3976f895f1b 100644 --- a/src/MNH/aircraft_balloon_evol.f90 +++ b/src/MNH/aircraft_balloon_evol.f90 @@ -1459,6 +1459,7 @@ IF ( GSTORE ) THEN END DO IF (SIZE(PTKE)>0) CALL DISTRIBUTE_FLYER(TPFLYER%XTKE (IN)) IF (SIZE(PTS) >0) CALL DISTRIBUTE_FLYER(TPFLYER%XTSRAD(IN)) + IF (LDIAG_IN_RUN) CALL DISTRIBUTE_FLYER(TPFLYER%XTKE_DISS(IN)) CALL DISTRIBUTE_FLYER(TPFLYER%XZS (IN)) CALL DISTRIBUTE_FLYER(TPFLYER%XTHW_FLUX(IN)) CALL DISTRIBUTE_FLYER(TPFLYER%XRCW_FLUX(IN))