summaryrefslogtreecommitdiff
path: root/1994/CH7/EX7.29/Example7_29.sce
blob: 3ec0c5259d7b25814bf695994829387bbdacdc3f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
//Chapter-7,Example7_29,pg 7-88
Im=90
Ic=40
delta=28*(%pi/180)//in radians
Is=5
Ns=400
Np=1
n=Ns/Np
Kn=n
R=n+((Im*sin(delta)+Ic*cos(delta))/Is)
Ip=R*Is//actual primary current
err=(Kn-R)/R
err=err*100
printf("percentage ratio error\n")
printf("err=%.2f ",err)