Ifeffit 合并宏

# merge_scans.iff  — average marked-like groups already in memory
# rename G1..G4 to your group names (Athena uses those internally)

set e_ref = G1.energy
set mu_sum = 0
set n = 0

macro add_group Group
  interp($Group.energy, $Group.mu, e_ref, mu_i)
  set mu_sum = mu_sum + mu_i
  set n = n + 1
end macro

add_group G1
add_group G2
add_group G3
add_group G4

set Merge.energy = e_ref
set Merge.mu = mu_sum / n
newplot Merge.energy, Merge.mu
print "merged", n, "scans into Merge"