function VTB2_4(z,rmin,rmax)

%VTB2_4 Displacement transmissibility ratio and force transmissibility
% ratio of a single degree of freedom damped system.
% VTB2_4(zeta,rmin,rmax) plots the displacement transmissibility 
% and force transmissibility of a single degree of freedom damped 
% system (with damping ratio zeta) between the frequency ratios 
% rmin and rmax.



r=rmin:(rmax-rmin)/1000:rmax;

DT=sqrt((1+(2*z*r).^2)./((1-r.^2).^2+(2*z*r).^2));%(2.41)

FT=(r.^2).*DT;%(2.47)

semilogy(r,DT)

xlabel('Frequency Ratio')

ylabel('Displacement Transmissibility Ratio')

title('Displacement Transmissibility Ratio versus Frequency Ratio')

text(0,0,'Press Return To Continue','sc')

pause

semilogy(r,FT)

xlabel('Frequency Ratio')

ylabel('Force Transmissibility Ratio')

title('Force Transmissibility Ratio versus Frequency Ratio')

text(0,0,'Press Return To Continue','sc')