diff --git a/src/tally.F90 b/src/tally.F90 index f7ac74bee..3bdc12b00 100644 --- a/src/tally.F90 +++ b/src/tally.F90 @@ -1801,7 +1801,6 @@ contains integer :: i_listing ! index in xs_listings array real(8) :: t_value ! t-values for confidence intervals real(8) :: alpha ! significance level for CI - logical :: file_exists ! does tallies.out file already exists? logical :: has_filter(N_FILTER_TYPES) ! does tally have this filter? logical :: no_filters ! does tally have no filters at all? character(MAX_FILE_LEN) :: filename ! name of output file @@ -1845,16 +1844,9 @@ contains ! Create filename for tally output if (run_mode == MODE_TALLIES) then - filename = trim(path_input) // "tallies." // & - trim(to_str(restart_batch)) // ".out" + filename = "tallies." // trim(to_str(restart_batch)) // ".out" else - filename = trim(path_input) // "tallies.out" - end if - - ! Check if tally file already exists - inquire(FILE=filename, EXIST=file_exists) - if (file_exists) then - ! Possibly make backup of old tally file + filename = "tallies.out" end if ! Open tally file for writing