From a3b87ad37224dbf11de6e3e1a75c67121b09fe3e Mon Sep 17 00:00:00 2001 From: Adam Nelson Date: Sat, 26 Sep 2015 14:16:04 -0400 Subject: [PATCH] Fixed source code standard issues that travis called me out on --- src/tally.F90 | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/tally.F90 b/src/tally.F90 index 2b805b27df..0b13dbeba4 100644 --- a/src/tally.F90 +++ b/src/tally.F90 @@ -176,7 +176,7 @@ contains ! weight times the multiplicity as the estimate for the number of ! neutrons exiting a reaction with neutrons in the exit channel if (p % event_MT == ELASTIC .or. p % event_MT == N_LEVEL .or. & - (p % event_MT >= N_N1 .and. p % event_MT <= N_NC)) then + (p % event_MT >= N_N1 .and. p % event_MT <= N_NC)) then multiplicity = ONE else do m = 1, nuclides(p % event_nuclide) % n_reaction @@ -211,7 +211,7 @@ contains ! weight times the multiplicity as the estimate for the number of ! neutrons exiting a reaction with neutrons in the exit channel if (p % event_MT == ELASTIC .or. p % event_MT == N_LEVEL .or. & - (p % event_MT >= N_N1 .and. p % event_MT <= N_NC)) then + (p % event_MT >= N_N1 .and. p % event_MT <= N_NC)) then multiplicity = ONE else do m = 1, nuclides(p % event_nuclide) % n_reaction @@ -246,7 +246,7 @@ contains ! weight times the multiplicity as the estimate for the number of ! neutrons exiting a reaction with neutrons in the exit channel if (p % event_MT == ELASTIC .or. p % event_MT == N_LEVEL .or. & - (p % event_MT >= N_N1 .and. p % event_MT <= N_NC)) then + (p % event_MT >= N_N1 .and. p % event_MT <= N_NC)) then multiplicity = ONE else do m = 1, nuclides(p % event_nuclide) % n_reaction