From 2898702569afa74e586e23f7c7d6e601fd250baa Mon Sep 17 00:00:00 2001
From: Paul Romano <romano7@gmail.com>
Date: Tue, 20 Dec 2011 09:56:43 -0500
Subject: [PATCH] Fixed cross section output.

---
 src/output.F90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/output.F90 b/src/output.F90
index d51f83ee09..8ebf16d846 100644
--- a/src/output.F90
+++ b/src/output.F90
@@ -780,7 +780,7 @@ contains
           size_energy = 0
        end if
 
-       write(unit_,'(3X,A11,1X,F8.3,2X,I3,3X,I6,1X,I11,1X,I11)') &
+       write(unit_,'(3X,A11,1X,F8.3,2X,I4,2X,I6,1X,I11,1X,I11)') &
             reaction_name(rxn % MT), rxn % Q_value, rxn % TY, rxn % IE, &
             size_angle, size_energy