drawlc3.m

AFD - Advanced Filter Design using MATLABMiroslav D. Lutovac, Dejan V. Tosicversion 1.00 released 15

function drlc3 = drawlc3(x0,y0,dx,ds,F)

% drawlc3.m  Draw singly terminated LC-ladder with zeros at origin
% 3:27  22/2/99
%
%            Album of Analog Filter Realizations
%
%   Authors: Dejan V. Tosic, Miroslav D. Lutovac, 1999.02.21
%                 [e-mail]
%                 [e-mail]
%
%   Copyright (c) 1999 by Tosic & Lutovac
%   $Revision: 1.0 $  $Date: 1999/02/21 02:17:42 $
%
%   References:
%        Miroslav D. Lutovac, Dejan V. Tosic, Brian L. Evans
%           Advanced Filter Design for Signal Processing
%                   Using MATLAB and Mathematica
%

% drawlc3(0,0,0.5,1.25,9);

xm5 = x0-2.5*dx; xm1 = x0-0.5*dx;
xp3 = x0+1.5*dx; xp8 = x0+4*dx;
xp7 = x0+3.5*dx; xp11 = x0+5.5*dx;
y00 = y0; yp3 = y0+1.5*dx; yp4 = y0+2*dx;
 drawtext(xm1, y00, 'Singly terminated LC-ladder',F+2)
 drawin(xm5, yp4, 'Vg', 2, ds, F)
 drawc(xm5, yp4, xm1, 'C2', 0, ds/2, F)
 drawl(xm1, yp4, xp3, 'L2', 0, ds/2, F)
 drawc(xp3, y00, yp4, 'C1', 1, ds/2, F)
 drawl(xp3, yp4, xp7, 'L1', 0, ds/2, F)
 drawr(xp7, y00, yp4, 'Ro', 1, ds/2, F)
 drawjunc(xp3, yp4, 'V2', 2, 1, F)
 drawjunc(xp7, yp4, 'V3', 2, 1, F)
 drawgrnd(xp3, y00, 0, ds/2)
 drawgrnd(xp7, y00, 0, ds/2)
axis('equal')
axis('off')