Files
sf-op/script/Undulators/K_AR_scale.py
gobbo_a 8beeb7dbc7
2023-08-17 15:16:51 +02:00

26 lines
726 B
Python

dEph = caget("SARUN:USER-DELTA")
Eph1 = caget("SARUN:FELPHOTENE")
Eph2 = Eph1 + dEph
#do_elog = True
do_elog = False
undlist = ("SARUN03","SARUN04","SARUN05","SARUN06","SARUN07","SARUN08","SARUN09",
"SARUN10","SARUN11","SARUN12","SARUN13","SARUN14","SARUN15")
K1, K2 = {}, {}
for und in undlist:
K = caget(und + "-UIND030:K_SET")
K1[und] = K
K2[und] = ((Eph1 / Eph2 * (K**2 + 2) - 2))**0.5
print K1,K2
for und in undlist: caputq(und + "-UIND030:K_SET", K2[und])
#Elog entry
if do_elog:
title = "Wavelength change"
log_msg = "Old photon energy: %0.3f" % Eph1 + " kev\n"
log_msg = log_msg + "New photon energy: %0.3f" % Eph2 + " keV\n"
elog(title, log_msg)