summaryrefslogtreecommitdiff
path: root/3764/CH7/EX7.7/Ex7_7.sce
diff options
context:
space:
mode:
Diffstat (limited to '3764/CH7/EX7.7/Ex7_7.sce')
-rw-r--r--3764/CH7/EX7.7/Ex7_7.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/3764/CH7/EX7.7/Ex7_7.sce b/3764/CH7/EX7.7/Ex7_7.sce
new file mode 100644
index 000000000..df2d92748
--- /dev/null
+++ b/3764/CH7/EX7.7/Ex7_7.sce
@@ -0,0 +1,18 @@
+clc
+//
+//
+//Variable declaration
+Ea=400*((10**-6)) // Principal strain(in./in)
+Eb=-50*((10**-6)) // Principal strain(in./in)
+v=0.30 // Poisson's ratio
+n=-1
+
+//Calculation
+//Case(a) Maximum In-Plane Shearing Strain
+Ymaxinplane=Ea-Eb // Maximum in-plane shearing strain(rad)
+//Case(b) Maximum Shearing Strain
+Ec=n*(v/(1.0-v))*(Ea+Eb) // Strain(in./in) // Maximum shearing strain(rad)
+
+// Result
+printf("\n Case(a) Maximum in plane shearing strain = %0.3f rad' ,Ymaxinplane)
+printf("\n Case(b) Maximum shearing strain = %0.3f u' ,Ec)