crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-28 22:26:08 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Fixed spacing on loc/dir fatal_error message.

Browse source
This commit is contained in:
Paul Romano 2012-04-05 09:58:57 -04:00
parent 6dd8ea5364
commit dfed146d3b
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/error.F90
View file

@ -80,8 +80,8 @@ contains
write(ERROR_UNIT,'(1X,A,I12) ') 'Batch: ', current_batch
write(ERROR_UNIT,'(1X,A,I12) ') 'Generation:', current_gen
write(ERROR_UNIT,'(1X,A,I12)') 'Particle: ', p % id
write(ERROR_UNIT,'(1X,A,3ES11.4)') 'Location: ', p % coord0 % xyz
write(ERROR_UNIT,'(1X,A,3ES11.4)') 'Direction: ', p % coord0 % uvw
write(ERROR_UNIT,'(1X,A,3ES12.4)') 'Location: ', p % coord0 % xyz
write(ERROR_UNIT,'(1X,A,3ES12.4)') 'Direction: ', p % coord0 % uvw
write(ERROR_UNIT,*)
end if