drawj.m

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

function dr = drawj(a,b,c,d,p)

% drawj.m  Draw junction
% 1:42  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
%

if p == 0
 x = [a, c, c];
 y = [b, b, d];
 line(x,y)
elseif p == 1
 x = [a, a, c];
 y = [b, d, d];
 line(x,y)
elseif p == 2
 x = [a, c, c];
 y = [b, b, d];
 line(x,y)
else
 x = [a, a, c];
 y = [b, d, d];
 line(x,y)
end