var cl_R exp_minusb = exp(-b); // (exp (- b))
return complex(exp_minusb*trig_a.cos, // (* (exp (- b)) (cos a))
exp_minusb*trig_a.sin); // (* (exp (- b)) (sin a))
}
}
var cl_R exp_minusb = exp(-b); // (exp (- b))
return complex(exp_minusb*trig_a.cos, // (* (exp (- b)) (cos a))
exp_minusb*trig_a.sin); // (* (exp (- b)) (sin a))
}
}