summaryrefslogtreecommitdiff
path: root/2297/CH6/EX6.11/Ex6_11.sce
diff options
context:
space:
mode:
Diffstat (limited to '2297/CH6/EX6.11/Ex6_11.sce')
-rwxr-xr-x2297/CH6/EX6.11/Ex6_11.sce25
1 files changed, 25 insertions, 0 deletions
diff --git a/2297/CH6/EX6.11/Ex6_11.sce b/2297/CH6/EX6.11/Ex6_11.sce
new file mode 100755
index 000000000..df6858248
--- /dev/null
+++ b/2297/CH6/EX6.11/Ex6_11.sce
@@ -0,0 +1,25 @@
+//Example 6.11// current per phase and power factor
+clc;
+clear;
+close;
+format('v',6)
+v1=100;//emf in volts
+vi=v1/sqrt(3);//induced emf in volts
+r1=1;//rotor resistance ohms per phase
+r2=4;//rotor reactance ohms per phase
+r=sqrt(r1^2+r2^2);//rotor impedence per phase
+rcp=(vi/r);//rotor current per phase
+pf=(1/r);//power factor
+disp("part (a)")
+disp(rcp,"rotor current per phase is,(A)=")
+disp(pf,"power factor is,=")
+r3=3;//ohms
+r4=r1+r3;//rotor resistance ohms per phase
+r2=4;//rotor reactance ohms per phase
+r=sqrt(r4^2+r2^2);//rotor impedence per phase
+rcp=(vi/r);//rotor current per phase
+pf=(r4/r);//power factor
+disp("part (b)")
+disp(rcp,"rotor current per phase is,(A)=")
+disp(pf,"power factor is,=")
+