summaryrefslogtreecommitdiff
path: root/3886/CH8/EX8.7/8_7.sce
diff options
context:
space:
mode:
Diffstat (limited to '3886/CH8/EX8.7/8_7.sce')
-rw-r--r--3886/CH8/EX8.7/8_7.sce8
1 files changed, 8 insertions, 0 deletions
diff --git a/3886/CH8/EX8.7/8_7.sce b/3886/CH8/EX8.7/8_7.sce
new file mode 100644
index 000000000..3050647db
--- /dev/null
+++ b/3886/CH8/EX8.7/8_7.sce
@@ -0,0 +1,8 @@
+//Determine reaction RA
+//refer fig. 8.11
+//give virtual displacement at A
+//Applying virtual work principle
+//(RA-32+8+0+4)*delta(y)=0
+RA=32-8-4 //kN
+printf("Reaction at A is RA=%.2f kN",RA)
+