Skip to content

Commit

Permalink
Blank string now no longer an error with Tao "set beam dump_at" command.
Browse files Browse the repository at this point in the history
  • Loading branch information
DavidSagan committed Jun 19, 2024
1 parent 2d36d51 commit 72480de
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions tao/code/tao_set_mod.f90
Original file line number Diff line number Diff line change
Expand Up @@ -1047,7 +1047,7 @@ subroutine tao_set_beam_cmd (who, value_str, branch_str)
u%beam%dump_file = value_str

case ('dump_at', 'beam_dump_at')
call tao_locate_elements (value_str, u%ix_uni, eles, err)
call tao_locate_elements (value_str, u%ix_uni, eles, err, ignore_blank = .true.)
if (err) then
call out_io (s_error$, r_name, 'BAD DUMP_AT STRING: ' // value_str)
return
Expand All @@ -1065,7 +1065,7 @@ subroutine tao_set_beam_cmd (who, value_str, branch_str)
enddo

case ('saved_at', 'beam_saved_at')
call tao_locate_elements (value_str, u%ix_uni, eles, err)
call tao_locate_elements (value_str, u%ix_uni, eles, err, ignore_blank = .true.)
if (err) then
call out_io (s_error$, r_name, 'BAD SAVED_AT STRING: ' // value_str)
return
Expand Down

0 comments on commit 72480de

Please sign in to comment.