From 2056f2b3b9ceac707b8c0ad5305c4f13f80e1ec9 Mon Sep 17 00:00:00 2001 From: Bhavin Patel <15210802+bpatel2107@users.noreply.github.com> Date: Tue, 29 Oct 2024 15:42:39 +0000 Subject: [PATCH] Correct if statement --- cgyro/src/cgyro_flux.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/cgyro/src/cgyro_flux.f90 b/cgyro/src/cgyro_flux.f90 index 80ab8416e..b9e6e7c38 100644 --- a/cgyro/src/cgyro_flux.f90 +++ b/cgyro/src/cgyro_flux.f90 @@ -261,7 +261,7 @@ subroutine cgyro_flux NEW_COMM_1, & i_err) - if (stress_print_flag .eq 1) then + if (stress_print_flag .eq. 1) then ! Reduce complex stress(kx, theta), distributed over n call MPI_ALLREDUCE(stress_integrated_loc, &