summaryrefslogtreecommitdiff
path: root/3886/CH7/EX7.8/7_8.sce
diff options
context:
space:
mode:
Diffstat (limited to '3886/CH7/EX7.8/7_8.sce')
-rw-r--r--3886/CH7/EX7.8/7_8.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/3886/CH7/EX7.8/7_8.sce b/3886/CH7/EX7.8/7_8.sce
new file mode 100644
index 000000000..c5c42e147
--- /dev/null
+++ b/3886/CH7/EX7.8/7_8.sce
@@ -0,0 +1,13 @@
+//Maximum power transmitted
+m=0.9
+v=20
+Tc=m*v^2 //N
+f=1.5
+d=36
+T=(f*%pi*d^2)/(4) //N
+T2=T-Tc //N
+mu=0.3
+theta=220*%pi/180 //radians
+T1=T2/(%e^mu*theta*(1/sind(30))) //N
+P=(T2-T1)*v/1000 //kW
+printf("maximum power P=%.3f kW ",P)