summaryrefslogtreecommitdiff
path: root/605/CH3/EX3.1/3_1.sce
blob: 6efad35b87522e7082b8b9a659abce84018369ac (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
//resistance of line (ohm/m)
R=0.015
//operating frequency(Hz)
n=1.6*10^9
//angular frequency
w=2*%pi*n
//inductance of line(H/m)
L=0.002*10^(-6)
//conductance of line(S/m)
G=0.1*10^(-3)
//capacitance of line(F/m)
C=0.012*10^(-12)
printf("\nR=0.015ohm/m\tn=1.6GHz\tL=0.002uH/m\tG=0.1mS/m\tC=0.012pF/m\n")
//formulas and result
printf("\nimpedance Z=R+iwL=")

Y=complex(G,w*C)    //admittance per unit length
Z=complex(R,w*L)     //impedance per unit length
disp(Z)
printf("ohm/m\nadmittance Y=G+iwC=")
disp(Y)
printf("S/m\nZo=square root(Z/Y)=")
disp(sqrt(Z/Y))
printf("ohm")