ptan.m

% /*! @ptan.m
% *************************************************************************
% <PRE>
% file.name       : ptan.m
% related files   :
% function&ablity : Taylor spread
% author          : gaodengwei
% version         : 1.00
% --------------------------------------------------------------------------------
% remarks         :
% --------------------------------------------------------------------------------
% record of modify :
% date              version     name         content
% 2016/3/14     1.00                         build
% </PRE>
% ********************************************************************************
%
% * right(c)
%
% *************************************************************************
% input :
% output:
% *************************************************************************
function f = ptan(a)
f = 1-a^2/2+a^4/24;%-a^6/720+a^8/40320;