Курсовая работа: Разработка специализированного процессора для исполнения элементарных функций

x_new=x_new+arr(i)*2^(-i)

end

x_bin=x_cel+x_new

endfunction

//========================================

function [arth_i]=arth(x)

arth_i = 1/2*log((1+x)/(1-x));

endfunction

//== function arcth ====

//function [arcthZ] = arcth(Z,N)

Q0 = 0;

x0 = 1;

Z=2.25;

y0 = Z;

N=40;

Q(1)=Q0+arth(2^(-1));

r(1)=sign(1-y0);

x(1)=x0-r(1)*y0*2^(-1);

y(1)=y0-r(1)*x0*2^(-1);

for n=1:N

for k=2:n

i=1+int((k-1)/2);

r(k)=sign(1-y(k-1));

ARTH =arth(2^(-i));

Q(k)= Q(k-1)+r(k)*ARTH;

x(k)= x(k-1)-r(k)*y(k-1)*2^(-i);

y(k)= y(k-1)-r(k)*x(k-1)*2^(-i);

end

arthZ(n)= Q(n)