Fixed display of header for tally output.

This commit is contained in:
Paul Romano 2011-12-13 18:15:17 -06:00
parent 4ddcf54387
commit 0617d50817

View file

@ -1043,7 +1043,7 @@ contains
t => tallies(i)
! Write header block
call header("TALLY " // trim(int_to_str(t % id)), 3, UNIT_TALLY)
call header("TALLY " // trim(int_to_str(t % id)), unit=UNIT_TALLY, level=3)
! Handle surface current tallies separately
if (t % surface_current) then