fn cexp_decay(amp: f64, decay: f64, freq: f64, t: f64) -> (f64, f64)
amp · exp(−(decay + i·freq)·t) as (re, im).
amp · exp(−(decay + i·freq)·t)
(re, im)