summaryrefslogtreecommitdiff
path: root/3764/CH3/EX3.09/Ex3_09.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3764/CH3/EX3.09/Ex3_09.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3764/CH3/EX3.09/Ex3_09.sce')
-rw-r--r--3764/CH3/EX3.09/Ex3_09.sce21
1 files changed, 21 insertions, 0 deletions
diff --git a/3764/CH3/EX3.09/Ex3_09.sce b/3764/CH3/EX3.09/Ex3_09.sce
new file mode 100644
index 000000000..97ad0ba15
--- /dev/null
+++ b/3764/CH3/EX3.09/Ex3_09.sce
@@ -0,0 +1,21 @@
+clc
+//
+
+//Variable declaration
+T=4.60*(10**3) // Torque(N.m)
+L=1.2 // length(m)
+G=77*(10**9) // modulus of rigidity(Pa)
+J=614*(10**-9) // Polar moment of inertia(m**4)
+phy=8.50
+c=25*(10**-3) // radius(m)
+
+//Calculation
+// Case(a)
+phyl=((T*L)/(J*G))*(360/(2*(%pi))) // Lateral twist(degree)
+phyp=phy-phyl // Permanent twist(degree)
+// Case(b)
+Tlmax=((T*c)/(J))/((10**6)) // Residual stresses(MPa)
+
+// Result
+printf("\n Case(a): Permanent twist = %1f degree' ,phyp)
+printf("\n Case(b): Residual stress = %1f MPa ' ,Tlmax)