blob: 2cc050683686fa1026407d99e955ad4cda946ede (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
clc
//Chapter8
//Example8.16, page no 349
//Given
L=1e-3//inductance
R=40// Resistance
C=0.1e-6// capacitance
G=1e-6//conductance
w=5000// angular freq
Zo=sqrt(complex(R,(w*L))/complex(G,(w*C)))//Characteristic impedance
//Zr=sqrt(sqrt(R^2+(w*L)^2)/sqrt(G^2+(w*C)^2))
[ZoR,ZoI]=polar(Zo)
mprintf('The characteristic impedance is %f /_%fdeg',ZoR,ZoI*180/%pi)
// Note : There are some calculation errors in the solution presented in the book
|
