From 7149a90d268ca1f562084511b5bec6270027cf08 Mon Sep 17 00:00:00 2001 From: David Sagan Date: Wed, 28 Aug 2024 20:22:20 -0400 Subject: [PATCH] Fix ramping with radiation problem. --- bmad/code/create_element_slice.f90 | 1 + tao/version/tao_version_mod.f90 | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/bmad/code/create_element_slice.f90 b/bmad/code/create_element_slice.f90 index 759bf23514..6c638503a7 100644 --- a/bmad/code/create_element_slice.f90 +++ b/bmad/code/create_element_slice.f90 @@ -84,6 +84,7 @@ recursive subroutine create_element_slice (sliced_ele, ele_in, l_slice, offset, sliced_ele%slave_status = slice_slave$ sliced_ele%n_slave = 0 sliced_ele%n_slave_field = 0 +sliced_ele%n_lord_ramper = 0 sliced_ele%ix_ele = ix_slice_slave$ ! Indicate sliced ele is not an element in the lattice. sliced_ele%s_start = ele_in%s - in_len + offset sliced_ele%s = sliced_ele%s_start + sliced_ele%value(l$) diff --git a/tao/version/tao_version_mod.f90 b/tao/version/tao_version_mod.f90 index ed30f4aac6..1ba98a574c 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 = "2024/08/24 21:18:45" +character(*), parameter :: tao_version_date = "2024/08/27 23:04:02" end module