Cat3channel.m

a=1.537e-6;
b=4.55e-12;
f=[1:513]/513*100e6;
l=100;
j=sqrt(-1);
H=exp(-((1+j)*a*sqrt(pi.*f)+b*2*pi*f)*l).*10^(-1.2/20);
figure(1)
plot(f(1:128),20*log10(abs(H(1:128))))
H(1024:-1:514)=real(H(2:512))-j*imag(H(2:512));
ht=real(ifft(H));
figure(2)
plot([1:100]/200e6,ht(1:100));
NEXT=19.3-16.6*log10(f/16e6);
FEXT=20.9-20*log10(f/16e6);
figure(3)
plot(f(1:128),-NEXT(1:128),f(1:128),-FEXT(1:128))
grid
xlabel('Frequency (Hz)')
ylabel('Crosstalk Losses (dB)')