psin.m

% /*! @psin.m
% *************************************************************************
% <PRE>
% file.name       : psin.m
% related files   :
% function&ablity : Taylor expansion
% 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 = psin(a)
f = a-a^3/6+a^5/120-a^7/5040;