function N = N( x )
%N Summary of this function goes here
%   Detailed explanation goes here
a1=0.319381530;
a2=-0.356563782;
a3=1.781477937;
a4=-1.821255978;
a5=1.330274429;
if(x>=0)
    N=1-NTemp(x)*(a1*Y(x)+a2*Y(x)^2+a3*Y(x)^3+a4*Y(x)^4+a5*Y(x)^5);
else
    N=NTemp(-x)*(a1*Y(-x)+a2*Y(-x)^2+a3*Y(-x)^3+a4*Y(-x)^4+a5*Y(-x)^5);
end
end

