diff options
Diffstat (limited to '1938/CH3/EX3.4/3_4.sce')
| -rwxr-xr-x | 1938/CH3/EX3.4/3_4.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/1938/CH3/EX3.4/3_4.sce b/1938/CH3/EX3.4/3_4.sce new file mode 100755 index 000000000..5f13b312b --- /dev/null +++ b/1938/CH3/EX3.4/3_4.sce @@ -0,0 +1,16 @@ +clc,clear
+printf('Example 3.4\n\n')
+
+W1=9.1 //Tension on tight side
+W2=0.8 //Tension on slack side
+I=10 //Total_current
+V=110 //Supply voltage
+R=7.5/100 //Radius of p-ulley in metres
+N=1320 //speed in r.p.m
+T_sh=(W1-W2)*9.81*R //9.81 is the accelration due to gravity
+omega=(2*%pi*N/60)
+P_out=T_sh*omega
+P_in=V*I
+
+efficiency=100*P_out/P_in
+printf('Full load Efficiency is %.2f percent',efficiency)
|