undlist = ("SATUN06","SATUN07","SATUN08","SATUN09","SATUN10","SATUN11","SATUN12","SATUN13",
           "SATUN15","SATUN16","SATUN17","SATUN18","SATUN19","SATUN20","SATUN21","SATUN22")

for und in undlist:
  K = caget(und + "-UIND030:K_SET")
  K_taper = caget(und + "-UIND030:K_TAPER_SET")
  K = K + K_taper
  caputq(und + "-UIND030:K_SET", K)
  caputq(und + "-UIND030:K_TAPER_SET", 0.0)
set_return("Success")