1 files changed, 15 insertions, 0 deletions
diff --git a/2732/CH2/EX2.10/Ex2_10.sce b/2732/CH2/EX2.10/Ex2_10.sce
new file mode 100755
index 000000000..cd4721315
--- /dev/null
+++ b/2732/CH2/EX2.10/Ex2_10.sce
@@ -0,0 +1,15 @@
+clc
+// initialization of variables
+clear
+tau_xx= -1 // kgf/cm^2
+tau_yy= 0 // kgf/cm^2
+tau_xy= 7 // kgf/cm^2
+// calculations 
+sigma_1=(tau_xx+tau_yy)/2+sqrt((1/2*(tau_xx-tau_yy))^2+tau_xy^2)
+sigma_2=(tau_xx+tau_yy)/2-sqrt((1/2*(tau_xx-tau_yy))^2+tau_xy^2)
+x=sigma_1 // positive one is tension
+if(sigma_2>sigma_1)
+    x=sigma_2
+end
+// Results
+printf('The diagonal tension is %.3f kgf/cm^2',x)