diff --git a/src/ace.F90 b/src/ace.F90
index 13e4caff7b..0406c7dbca 100644
--- a/src/ace.F90
+++ b/src/ace.F90
@@ -137,7 +137,7 @@ contains
     ! READ ALL ACE CROSS SECTION TABLES
 
     ! display header in summary.out
-    if (master) call header("CROSS SECTION TABLES", unit=UNIT_SUMMARY)
+    if (master) call header("CROSS SECTION TABLES", unit=UNIT_XS)
 
     call dict_create(already_read)
 
@@ -156,9 +156,9 @@ contains
 
              call read_ace_table(index_nuclides, index_list)
 
-             ! Print out information on table to summary.out file
+             ! Print out information on table to cross_sections.out file
              nuc => nuclides(index_nuclides)
-             if (master) call print_nuclide(nuc, unit=UNIT_SUMMARY)
+             if (master) call print_nuclide(nuc, unit=UNIT_XS)
 
              call dict_add_key(already_read, name, 0)
              call dict_add_key(already_read, alias, 0)
diff --git a/src/constants.F90 b/src/constants.F90
index 9168727771..d2fad27b82 100644
--- a/src/constants.F90
+++ b/src/constants.F90
@@ -318,5 +318,6 @@ module constants
   integer, parameter :: UNIT_SUMMARY = 11 ! unit # for writing summary file
   integer, parameter :: UNIT_TALLY   = 12 ! unit # for writing tally file
   integer, parameter :: UNIT_PLOT    = 13 ! unit # for writing plot file
+  integer, parameter :: UNIT_XS      = 14 ! unit # for writing xs summary file
 
 end module constants
diff --git a/src/initialize.F90 b/src/initialize.F90
index b3196ae4ad..697273533e 100644
--- a/src/initialize.F90
+++ b/src/initialize.F90
@@ -14,7 +14,8 @@ module initialize
   use input_xml,        only: read_input_xml, read_cross_sections_xml,         &
                               cells_in_univ_dict
   use output,           only: title, header, print_summary, print_geometry,    &
-                              print_plot, create_summary_file
+                              print_plot, create_summary_file,                 &
+                              create_xs_summary_file
   use random_lcg,       only: initialize_prng
   use source,           only: initialize_source
   use string,           only: to_str, starts_with, ends_with, lower_case
@@ -56,8 +57,9 @@ contains
     call read_command_line()
 
     if (master) then
-       ! Create summary.out file
+       ! Create output files
        call create_summary_file()
+       call create_xs_summary_file()
 
 #ifdef HDF5
        ! Open HDF5 output file for writing and write header information
diff --git a/src/output.F90 b/src/output.F90
index e1226e1ea3..5da98d1ca7 100644
--- a/src/output.F90
+++ b/src/output.F90
@@ -968,7 +968,6 @@ contains
 
   subroutine create_summary_file()
 
-    integer :: io_error
     logical :: file_exists  ! does log file already exist?
     character(MAX_FILE_LEN) :: path ! path of summary file
 
@@ -983,8 +982,32 @@ contains
 
     ! Open log file for writing
     open(UNIT=UNIT_SUMMARY, FILE=path, STATUS='replace', &
-         ACTION='write', IOSTAT=io_error)
+         ACTION='write')
 
   end subroutine create_summary_file
 
+!===============================================================================
+! CREATE_XS_SUMMARY_FILE
+!===============================================================================
+
+  subroutine create_xs_summary_file()
+
+    logical :: file_exists  ! does log file already exist?
+    character(MAX_FILE_LEN) :: path ! path of summary file
+
+    ! Create filename for log file
+    path = "cross_sections.out"
+
+    ! Check if log file already exists
+    inquire(FILE=path, EXIST=file_exists)
+    if (file_exists) then
+       ! Possibly copy old log file
+    end if
+
+    ! Open log file for writing
+    open(UNIT=UNIT_XS, FILE=path, STATUS='replace', &
+         ACTION='write')
+
+  end subroutine create_xs_summary_file
+
 end module output