summaryrefslogtreecommitdiff
path: root/671/CH4/EX4.42/4_42.sce
blob: 6a0371b54e7f96a5a7bc394caf6f9bf7e2bdee9b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
w=400
R=5
L=25E-3
C=1.25E-3
Xl=w*L*%i
Xc=1/(w*C*%i)

Z=R+Xl+Xc
Y=1/Z
C=-imag(Y)/w
Yn=real(Y)
Rn=1/Y

disp(C)