summaryrefslogtreecommitdiff
path: root/3784/CH7/EX7.7/Ex7_7.sce
blob: b769c65588f2d10e6e01d045134f7271f68479e4 (plain)
1
2
3
4
5
6
7
8
9
clc
I2=poly(0,'I2')//Defining I2
R2=poly(0,'R2')//Defining R2
R=poly(0,'R')//Defining R
ra=(R2-0.3*R2)/0.3//Equation drawn by neglecting stator impedance
Id=I2*sqrt(3/2)//From Copper Losses
R=2*ra

disp(R,'value of resistance = ')