diff --git a/Generators/MadGraph_i/src/initmadgraph.F b/Generators/MadGraph_i/src/initmadgraph.F
index 321ef409593299d3e7f8a010e855dfc565e1fb63..c05e5e1039cb2b39a34772f8b84607487296c890 100644
--- a/Generators/MadGraph_i/src/initmadgraph.F
+++ b/Generators/MadGraph_i/src/initmadgraph.F
@@ -1171,7 +1171,7 @@ c     if (found) write (*,*) name,var
         write (*,*) "         setting it to default value ",def_value
         var=def_value
       else
-        write(*,*),'Found parameter ',name,var
+        write(*,*) 'Found parameter ',name,var
       endif
       return
 
diff --git a/Generators/MadGraph_i/src/usemadgraph.F b/Generators/MadGraph_i/src/usemadgraph.F
index 5252cbcda2619fc1d4e8834ff242cae5911e4c40..e146561607e509cfc6df3d80be08c829fe24949b 100644
--- a/Generators/MadGraph_i/src/usemadgraph.F
+++ b/Generators/MadGraph_i/src/usemadgraph.F
@@ -657,7 +657,7 @@ c        PRINT *,'Y,VINT:',SQRT(Y(NLJETS+1)),SQRT(VINT(390))
      $       (mektsc.eq.2.and.MAX(VINT(360),VINT(358)).GT.SQRT(YCUT))))
      $       THEN
           if(idbg.eq.1)
-     $       WRITE(LNHOUT,*),
+     $       WRITE(LNHOUT,*)
      $       'Failed due to ',max(VINT(357),VINT(358)),' > ',SQRT(YCUT)
           GOTO 999
         ENDIF
@@ -670,7 +670,7 @@ c     Highest multiplicity case
      $       THEN
 c     $     VINT(390).GT.PTCLUS(1)**2)THEN
           if(idbg.eq.1)
-     $       WRITE(LNHOUT,*),
+     $       WRITE(LNHOUT,*)
      $       'Failed due to ',max(VINT(357),VINT(358)),' > ',PTCLUS(1)
           GOTO 999
         ENDIF