kr7_04_05_task.m

syms s s1 s2 z w_p z_
clc;
s1 = s / w_p
s2 = (1-z^(-1))/(1+z^(-1))
H = 1 / ((s1+1) * (s1*s1 + s1 + 1));
pretty(H)
H_ = 1/((s2/w_p + 1)*(s2^2/w_p^2 + s2/w_p + 1));
% pretty(H_)

H_2 = 1 / ( ((4*z^(-2) - 8 * z^(-1) + 4)/(t^2 * w^2 * (z^(-2) + 2 * z^(-1) + 1)) ) + (2*sqrt(2) * (1 - z^(-1) )) / (t*w*(z^(-1) + 1)) )
%pretty(H_2)

%H_2_1 = 1 / ( ((4*z_^(2) - 8 * z_^(1) + 4)/(t^2 * w^2 * (z_^(2) + 2 * z_^(1) + 1)) ) + (2*sqrt(2) * (1 - z_^(1) )) / (t*w*(z_^(1) + 1)) )
%pretty(simplify(H_2_1))

% 2 sqrt(2) *2.059 - (2 sqrt(2) *2.059)/z^3 - (2 sqrt(2) *2.059)/z^2 + (2 sqrt(2) *2.059)/z
% (4*z^(-2) - 8 * z^(-1) + 4) * (z^-1 + 1)
% 2.059^2 * (z^-2 + 2*z^-1 + 1) * (z^-1 + 1)