From e77059d84c1c77ab77ff3115e755dc0ed1783d5b Mon Sep 17 00:00:00 2001
From: Paul Romano <paul.k.romano@gmail.com>
Date: Fri, 8 Feb 2013 16:37:45 -0500
Subject: [PATCH] Fixed reaction_name for MT=849.

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

diff --git a/src/endf.F90 b/src/endf.F90
index 04383065fc..163246ff58 100644
--- a/src/endf.F90
+++ b/src/endf.F90
@@ -142,7 +142,7 @@ contains
     case (800 : 848)
       string = '(n,a' // trim(to_str(MT-800)) // ')'
     case (849)
-      string = '(n,tc)'
+      string = '(n,ac)'
     case default
       string = 'MT=' // trim(to_str(MT))
     end select