summaryrefslogtreecommitdiff
path: root/3281/CH1/EX1.6/ex1_6.sce
blob: e3c3004c80c312b0525dcdbcd083a25fe8bfd324 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
//Page Number:
//Example 1.6
clc;
//Given
c=3D+8; //m/s
le=25;//m
zl=40+(%i*30);//ohm
f=10D+6;//hz
cap=40D-12;//F
l=300D-9;//H/m

//Input impedance
z0=sqrt(l/cap);//ohm
zl1=zl/z0;
lam=c/f;//m
bet=(2*%pi*le)/lam;//rad
zin=((zl1*cos(bet))+(%i*sin(bet)))/(cos(bet)+(%i*zl1*sin(bet)));//ohm
disp('ohm',zin,'Input impedance:');

//Reflection coefficient
t=(zl1-1)/(zl1+1);
disp(t,'Reflection coefficient:');