Skip to content

Commit 40b456a

Browse files
committed
it runs but does it work?
1 parent 5b3fde7 commit 40b456a

File tree

2 files changed

+5
-4
lines changed

2 files changed

+5
-4
lines changed

src/post_process/m_data_output.fpp

Lines changed: 4 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -573,16 +573,17 @@ contains
573573
574574
end subroutine s_open_energy_data_file ! ----------------------------------------
575575
576-
subroutine s_open_kymo_data_file(t_step) ! ------------------------
576+
subroutine s_open_kymo_data_file() ! ------------------------
577577
! Time-step that is currently being post-processed
578-
integer, intent(in) :: t_step
578+
! integer, intent(in) :: t_step
579579
580580
! Relative path to a file in the case directory
581581
character(LEN=path_len + 3*name_len) :: file_path
582582
583583
! Kymo information is in binary database format
584584
! Generates relative path to database, opened for current time-step
585-
write (file_path, '(A,I0,A)') '/', t_step, '/kymo_data.dat'
585+
! write (file_path, '(A,I0,A)') '/', t_step, '/kymo_data.dat'
586+
write (file_path, '(A)') '/kymo_data.dat'
586587
file_path = trim(case_dir)//trim(file_path)
587588
588589
! Opening the simulation data file

src/post_process/m_start_up.f90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -206,7 +206,7 @@ subroutine s_save_data(t_step, varname, pres, c, H)
206206
end if
207207

208208
if (kymograph .and. proc_rank == 0) then
209-
call s_open_kymo_data_file(t_step)
209+
call s_open_kymo_data_file()
210210
end if
211211

212212
if (kymograph) then

0 commit comments

Comments
 (0)