summaryrefslogtreecommitdiff
path: root/3835/CH4/EX4.37/Ex4_37.sce
blob: 7e6be9bacd06b8989e9458f444854e5a48e75ff9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clear
//
//norton's theorem
//values derived and calculated from figure
v=complex(230,0)
xl=complex(8,-6)
isc=v/xl
IN=isc
rl=complex(0,5)
zn=(rl*xl)/(rl+xl)
zload=complex(4,3)
I=(IN*zn)/(zn+zload)
printf("\n I")