cosh.m

来自「计算动力学系统的分岔图」· M 代码 · 共 10 行

function x = cosh(x)
% Coshx for adtayl objects.


if ~isreal(x.tc)
  error('X for adtayl objects must not have imaginary part')
end

 x = 1/2*(exp(x)+exp(-x)); % a adtayl object
 x.tc =x.tc;