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

removed filename from message, path_source_point instead

Browse source
This commit is contained in:
Bryan Herman 2014-03-18 08:49:32 -04:00
parent 59f94b5cdf
commit 3a980225ab
1 changed files with 1 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/state_point.F90
View file

@ -517,7 +517,6 @@ contains
subroutine load_state_point()
character(MAX_FILE_LEN) :: filename
character(MAX_FILE_LEN) :: path_temp
character(19) :: current_time
integer :: i
@ -790,7 +789,7 @@ contains
call sp % file_close()
! Write message
message = "Loading source file " // trim(filename) // "..."
message = "Loading source file " // trim(path_source_point) // "..."
call write_message(1)
! Open source file