From 721ffd13885fb5d95a729fb56bc0a7f3466ba169 Mon Sep 17 00:00:00 2001 From: David Sagan Date: Sat, 8 Feb 2025 20:26:28 -0500 Subject: [PATCH 1/2] Fixed print statement causing bomb. --- bmad/multiparticle/beam_utils.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/bmad/multiparticle/beam_utils.f90 b/bmad/multiparticle/beam_utils.f90 index 9ffa065ec..addc6ec32 100644 --- a/bmad/multiparticle/beam_utils.f90 +++ b/bmad/multiparticle/beam_utils.f90 @@ -1413,7 +1413,7 @@ subroutine calc_bunch_params (bunch, bunch_params, error, print_err, n_mat, is_t call calc_emittances_and_twiss_from_sigma_matrix (bunch_params%sigma, bunch_params, error, print_err, n_mat) if (error .and. logic_option(.true., print_err)) then - call out_io(s_blank$, r_name, 'This at element: ' // ele_full_name(ele)) + if (present(ele)) call out_io(s_blank$, r_name, 'This at element: ' // ele_full_name(ele)) endif end subroutine calc_bunch_params From 75cf52488b57488607d87586038fa2d41ffa4c48 Mon Sep 17 00:00:00 2001 From: David Sagan Date: Sat, 8 Feb 2025 20:27:01 -0500 Subject: [PATCH 2/2] Tao version update. --- tao/version/tao_version_mod.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tao/version/tao_version_mod.f90 b/tao/version/tao_version_mod.f90 index d2e907cc0..459f05604 100644 --- a/tao/version/tao_version_mod.f90 +++ b/tao/version/tao_version_mod.f90 @@ -6,5 +6,5 @@ !- module tao_version_mod -character(*), parameter :: tao_version_date = "2025/02/04 17:43:02" +character(*), parameter :: tao_version_date = "2025/02/08 20:26:28" end module