summaryrefslogtreecommitdiff
path: root/3588/CH2/EX2.1/EX2_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3588/CH2/EX2.1/EX2_1.sce')
-rw-r--r--3588/CH2/EX2.1/EX2_1.sce35
1 files changed, 35 insertions, 0 deletions
diff --git a/3588/CH2/EX2.1/EX2_1.sce b/3588/CH2/EX2.1/EX2_1.sce
new file mode 100644
index 000000000..a9358fcb1
--- /dev/null
+++ b/3588/CH2/EX2.1/EX2_1.sce
@@ -0,0 +1,35 @@
+//Clearing Console
+clc
+clear
+
+//Node 1 Displacement
+U1=0
+//Stiffness of Springs
+K1=50
+K2=75
+//Nodal Forces
+F2=75
+F3=75
+//varible decleration
+K=[]
+F=[]
+U=[]
+
+//Constructing Stiffness and Force matrices
+K(1,1)=K1+K2
+K(1,2)=-K2
+K(2,1)=-K2
+K(2,2)=K2
+F(1,1)=F2
+F(2,1)=F3
+
+//Solving for Nodal Displacements U2 and U3
+U=linsolve(K,-F) //K*U=F (equlibrium equation)
+
+//Solving for Nodal force F1
+F1=-50*U(1,1)
+
+//Printing Results
+printf('\nResults\n')
+printf('\nNodal displacements \nU1=%fin \nU2=%fin \nU3=%fin\n',U1,U(1,1),U(2,1))
+printf('\nNodal Force F1=%flb\n',F1)