Minor change in the if statement.

modified: components/eam/src/chemistry/mozart/rate_diags.F90 [BFB]
E3SM-Project · Oct 28, 2024 · 53d9dc2 · 53d9dc2
1 parent bcd1092
commit 53d9dc2
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/components/eam/src/chemistry/mozart/rate_diags.F90 b/components/eam/src/chemistry/mozart/rate_diags.F90
@@ -128,7 +128,7 @@ subroutine rate_diags_calc( rxt_rates, vmr, m, ncol, lchnk, pver, pdeldry, mbar
        rxt_rates(:ncol,:,rxt_tag_map(i)) = rxt_rates(:ncol,:,rxt_tag_map(i)) *  m(:,:)
        call outfld( rate_names(i), rxt_rates(:ncol,:,rxt_tag_map(i)), ncol, lchnk )
 
-      if ( .not. history_UCIgaschmbudget_2D .and. .not. history_UCIgaschmbudget_2D_levels) then
+      if (history_UCIgaschmbudget_2D .or. history_UCIgaschmbudget_2D_levels) then
 
         if (rate_names(i) .eq. 'r_lch4') then
           !kg/m2/sec