GNU bug found in SCM CI

NCAR · Jul 13, 2023 · c61a2a6 · c61a2a6
1 parent 9465b6f
commit c61a2a6
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/physics/GFS_ccpp_scheme_sim_pre.F90 b/physics/GFS_ccpp_scheme_sim_pre.F90
@@ -159,9 +159,9 @@ subroutine load_ccpp_scheme_sim(nlunit, nml_file, physics_process, iactive_T,
     close (nlunit)
 
     ! Only proceed if scheme simulator requested.
-    if (prc_SWRAD_cfg(1) .or. prc_LWRAD_cfg(1) .or. prc_PBL_cfg(1)  .or.       &
-         prc_GWD_cfg(1)  .or. prc_SCNV_cfg(1)  .or. prc_DCNV_cfg(1) .or.       &
-         prc_cldMP_cfg(1)) then
+    if (prc_SWRAD_cfg(1)  == 1 .or. prc_LWRAD_cfg(1) == 1 .or. prc_PBL_cfg(1)  == 1 .or. &
+         prc_GWD_cfg(1)   == 1 .or. prc_SCNV_cfg(1)  == 1 .or. prc_DCNV_cfg(1) == 1 .or. &
+         prc_cldMP_cfg(1) == 1 ) then
     else
        return
     endif