function clist = itu_cables(clist);
%% ===========================================================================
%itu_cables(clist) - Sets up the cable models for ETSI
%
% Parameter:    clist          Structure describing the cables
% Returns:      clist          Structure describing the cables
%
% Example(s):
%   ex.clist   = itu_cables(ex.clist);             Add to existing clist
%   cableparam = getList(ex.clist,'ITU_PE032');    Get ETSI PE 0.32 cable
%
% Reference:
%   ITU G.996.1 (Draft)
%% ===========================================================================

%% ===========================================================================
% Copyright (C):                                        
%       2000 by Forschungszentrum Telekommunikation Wien, Austria;
%                                                         All rights reserved.
% Project       : FTW xDSL simulation tool
% Author(s)     : Tomas Nordstrom (Tomas.Nordstrom@FTW.at)
%
% CVS:       $Id: itu_cables.m,v 1.1 2000/11/10 10:26:41 tono Exp $
% Change History
%      2000-09-09 (ToNo) Created to support G.996.1
%      2000-09-14 (ToNo) Changed 1100 into 1105 to cover the whole ADSL range
%% ===========================================================================

cable=[];
cable.name='ITU_PE032';
cable.model='RLC';
cable.param.ftmpl=[0 2.5 10 20 30 40 50 100 150 200 250 300 350 400 450 500 550 600 650 700 750 800 850 900 950 1000 1050 1105 ].*1e3; % in Hz
cable.param.Rtmpl= 1e-3.*[409 409.009 409.14 409.557 410.251 411.216 412.447 422.302 437.337 456.086 477.229 499.757 522.967 546.395 569.748 592.843 615.576 637.885 659.743 681.138 702.072 722.556 742.601 762.224 781.442 800.272 818.731 836.837 ];     % in Ohm/m 
cable.param.Ltmpl= 1e-9.*[607.639 607.639 607.639 607.639 607.639 607.639 607.639 607.631 607.57 607.327 606.639 605.074 602.046 596.934 589.337 579.376 567.822 555.867 544.657 534.942 526.991 520.732 515.919 512.264 509.503 507.415 505.831 504.623];     % in H/m 
cable.param.Ctmpl= 50e-12.*ones(size(cable.param.ftmpl)) ;    % in F/m 
clist=insertList(clist,cable);

cable=[];
cable.name='ITU_PE04';
cable.model='RLC';
cable.param.ftmpl=[0 2.5 10 20 30 40 50 100 150 200 250 300 350 400 450 500 550 600 650 700 750 800 850 900 950 1000 1050 1105 ].*1e3; % in Hz
cable.param.Rtmpl= 1e-3.*[280 280.007 280.11 280.44 280.988 281.748 282.718 290.433 302.07 316.393 332.348 349.167 366.345 383.562 400.626 417.427 433.904 450.027 465.785 481.18 496.218 510.912 525.274 539.32 553.064 566.521 579.705 592.628 ];     % in Ohm/m 
cable.param.Ltmpl= 1e-9.*[587.132 587.075 586.738 586.099 585.322 584.443 583.483 577.878 571.525 564.889 558.233 551.714 545.431 539.437 533.759 528.409 523.385 518.677 514.272 510.153 506.304 502.707 499.343 496.197 493.252 490.494 487.908 485.481 ];     % in H/m 
cable.param.Ctmpl= 50e-12.*ones(size(cable.param.ftmpl));    % in F/m 
clist=insertList(clist,cable);

cable=[];
cable.name='ITU_PE05';
cable.model='RLC';
cable.param.ftmpl=[0 2.5 10 20 30 40 50 100 150 200 250 300 350 400 450 500 550 600 650 700 750 800 850 900 950 1000 1050 1105 ].*1e3; % in Hz
cable.param.Rtmpl= 1e-3.*[179 179.015 179.244 179.97 181.161 182.79 184.822 199.608 218.721 239.132 259.461 279.173 298.103 316.23 333.591 350.243 366.246 381.657 396.528 410.907 424.835 438.348 451.48 464.258 476.71 488.857 500.72 512.317 ];     % in Ohm/m 
cable.param.Ltmpl= 1e-9.*[673.574 673.466 672.923 671.98 670.896 669.716 668.468 661.677 654.622 647.735 641.208 635.119 629.489 624.309 619.557 615.202 611.211 607.552 604.192 601.104 598.261 595.639 593.217 590.975 588.896 586.966 585.169 583.495];     % in H/m 
cable.param.Ctmpl= 50e-12.*ones(size(cable.param.ftmpl));    % in F/m 
clist=insertList(clist,cable);

cable=[];
cable.name='ITU_PE063';
cable.model='RLC';
cable.param.ftmpl=[0 2.5 10 20 30 40 50 100 150 200 250 300 350 400 450 500 550 600 650 700 750 800 850 900 950 1000 1050 1105 ].*1e3; % in Hz
cable.param.Rtmpl= 1e-3.*[113 113.028 113.442 114.737 116.803 119.523 122.768 143.115 164.938 185.689 204.996 222.961 239.764 255.575 270.533 284.753 298.33 311.339 323.844 335.897 347.542 358.819 369.758 380.388 390.734 400.816 410.654 420.264];     % in Ohm/m 
cable.param.Ltmpl= 1e-9.*[699.258 697.943 693.361 687.008 680.714 674.593 668.69 642.718 622.05 605.496 592.048 580.96 571.691 563.845 557.129 551.323 546.26 541.809 537.868 534.358 531.212 528.378 525.813 523.48 521.352 519.402 517.609 515.956 ];     % in H/m 
cable.param.Ctmpl= 50e-12.*ones(size(cable.param.ftmpl));    % in F/m 
clist=insertList(clist,cable);

cable=[];
cable.name='ITU_PE09';
cable.model='RLC';
cable.param.ftmpl=[0 2.5 10 20 30 40 50 100 150 200 250 300 350 400 450 500 550 600 650 700 750 800 850 900 950 1000 1050 1105 ].*1e3; % in Hz
cable.param.Rtmpl= 1e-3.*[55 55.088 56.361 59.941 64.777 70.127 75.586 100.769 121.866 140.075 156.273 170.987 184.556 197.208 209.104 220.365 231.081 241.326 251.155 260.615 269.745 278.577 287.138 295.452 303.538 311.416 319.099 326.602];     % in Ohm/m 
cable.param.Ltmpl= 1e-9.*[750.796 745.504 731.961 716.775 703.875 692.707 682.914 647.496 625.14 609.652 598.256 589.504 582.563 576.919 572.237 568.287 564.91 561.988 559.435 557.183 555.183 553.394 551.784 550.327 549.002 547.793 546.683 545.663];     % in H/m 
cable.param.Ctmpl= 50e-12.*ones(size(cable.param.ftmpl));    % in F/m 
clist=insertList(clist,cable);