summaryrefslogtreecommitdiff
path: root/3745/CH1/EX1.58/Ex1_58.sce
diff options
context:
space:
mode:
Diffstat (limited to '3745/CH1/EX1.58/Ex1_58.sce')
-rw-r--r--3745/CH1/EX1.58/Ex1_58.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/3745/CH1/EX1.58/Ex1_58.sce b/3745/CH1/EX1.58/Ex1_58.sce
new file mode 100644
index 000000000..65a3e43de
--- /dev/null
+++ b/3745/CH1/EX1.58/Ex1_58.sce
@@ -0,0 +1,22 @@
+// Ex 58 Page 401
+
+clc;clear;close;
+// Given
+zo=2+%i*3;//ohm
+zi=0.5+%i*5;//ohm
+Ri=real(zi) ;//ohm
+Ro=real(zo) ;//ohm
+
+//at standstill
+s=1;//% at standstill
+Zo=sqrt(real(zo)**2+imag(zo)**2);//ohm
+Zi=sqrt(real(zi)**2+imag(zi)**2);//ohm
+ToBYTi=Ro/Ri*(Zi/Zo)**2;//torque ratio
+printf("at slip=0, To:Ti = %d:1",ToBYTi)
+
+//at s=0.5
+s=0.05;//%
+Zo=sqrt(real(zo)**2/s**2+imag(zo)**2);//ohm
+Zi=sqrt(real(zi)**2/s**2+imag(zi)**2);//ohm
+ToBYTi=Ro/Ri*(Zi/Zo)**2;//torque ratio
+printf("\n at s=0.05, To:Ti = %.f:10",ToBYTi*10)