Commit 3e6fbb44 authored by Michael Monkenbusch(AB)'s avatar Michael Monkenbusch(AB)
Browse files

bug fix read_data for JNSE array bounds

parent d0b73c92

sources/read_data.f90

+4 −2
Original line number Diff line number Diff line
@@ -684,8 +684,10 @@ contains 
           value_struct(VAL_NO_ERROR, deg2rad(technical%motor(i)%value), 0.0)



      physics%detector    = config%detector

      physics%monitors    = config%monitors

      physics%no_monitors = size(config%monitors)



      i = size(config%monitors)

      physics%monitors(1:i)  = config%monitors(1:i)

      physics%no_monitors    = i



      physics%lambda     = lambda