Changeset 4602

Timestamp:

Jul 3, 2023, 2:54:38 PM (11 months ago)

Author:

yann meurdesoif

Message:

Bug fix introduced in rev 4600 (is_using_mpi was undefined)

YM

File:

• LMDZ6/trunk/libf/phy_common/mod_phys_lmdz_mpi_data.F90 (modified) (1 diff)

LMDZ6/trunk/libf/phy_common/mod_phys_lmdz_mpi_data.F90

@@ -62 +62 @@
     INTEGER :: klon_glo
     INTEGER :: i
+    
+    is_using_mpi = using_mpi
     
     if ((nbp_lon.eq.1).and.(nbp_lat.eq.1)) then ! running 1D column model