From a30cbea0255356cef59f9cfa9b37ce54a400b89d Mon Sep 17 00:00:00 2001
From: scott snyder <snyder@bnl.gov>
Date: Tue, 30 Jan 2018 15:59:42 +0100
Subject: [PATCH] Matchig_i: Fix fortran warning.
Fortran warning: spurious comma in write statement.
Former-commit-id: 06addfab948cb3cb6e81e1e695d38f1f943e184e
---
Generators/Matchig_i/src/matchig.F | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/Generators/Matchig_i/src/matchig.F b/Generators/Matchig_i/src/matchig.F
index 07637dcc133..ff5d515812e 100755
--- a/Generators/Matchig_i/src/matchig.F
+++ b/Generators/Matchig_i/src/matchig.F
@@ -105,7 +105,7 @@ C YST FROM YST-YSTMIN OR YSTMAX-YST
X(1) = SQRT(TAU)*EXP(YST)
X(2) = SQRT(TAU)*EXP(-YST)
IF(X(1).LT.TAU.OR.X(2).LT.TAU.OR.X(1).GT.1D0.OR.X(2).GT.1D0)
- & WRITE(*,*),'WARNING! ERROR IN X1,X2 GENERATION'
+ & WRITE(*,*) 'WARNING! ERROR IN X1,X2 GENERATION'
C...Set alpha_em and alpha_s as for 2->3 process
Q2=SQM4
--
GitLab