# macro lytle file group 4000
read_data ($1, group=$2, label='steps i0 i1 i2')
set (dspace = 1.92017, stpdeg = $3)
set (r2d = 57.29577951, hc = 12398.61)
set $2.energy = hc / (2 * dspace) / sin($2.steps / (r2d * stpdeg))
set $2.xmut = -log($2.i1/$2.i0)
set $2.xmuf = ($2.i2/$2.i0)
pre_edge $2.energy, $2.xmut
end macro