¶meters target_tunes(1) = 14.590 target_tunes(2) = 9.630 target_tunes(3) = -0.066 lat_file = '/nfs/cesr/online/machine_data/lattice/cesr/bmad/cta_2085_xr40m_cd_20111210.lat' n_turn = 100000 n_turns_recalc = 500 n_part_track = 100 current = 0.8e-3 ! in amps space_charge_on = .false. obs_point(1) = 'IP_L0$' obs_point(2) = 'DLINE' !------------------------------------------------------- ! noise spectrum - quad k1 - uncomment below this point: ! ele_noise(1)%key_name = 'quadrupole' ! ele_noise(1)%mask = '^Q' ! ele_noise(1)%param_name = 'k1' ! ele_noise(1)%error_type = 'multiplicative' ! ele_noise(1)%dfreq = 60. ! 60Hz test ! ! ele_noise(1)%fft_data(1)%a = 1.e-3 ! ele_noise(1)%fft_data(1)%phi = 0. ! ! ele_noise(1)%fft_data(2)%a = 1.e-4 ! ele_noise(1)%fft_data(2)%phi = 0. ! ! ele_noise(1)%fft_data(3)%a = 1.e-5 ! ele_noise(1)%fft_data(3)%phi = 0. /