summaryrefslogtreecommitdiff
path: root/3831/CH17/EX17.8/Ex17_8.sce
diff options
context:
space:
mode:
Diffstat (limited to '3831/CH17/EX17.8/Ex17_8.sce')
-rw-r--r--3831/CH17/EX17.8/Ex17_8.sce8
1 files changed, 8 insertions, 0 deletions
diff --git a/3831/CH17/EX17.8/Ex17_8.sce b/3831/CH17/EX17.8/Ex17_8.sce
new file mode 100644
index 000000000..589492dd3
--- /dev/null
+++ b/3831/CH17/EX17.8/Ex17_8.sce
@@ -0,0 +1,8 @@
+// Example 17_8
+clc;funcprot(0);
+// Given data
+d=5.00*10^-3;// The base diameter of the tree in m
+
+// Calculation
+h_critical=68.0*(d^(2/3));// The critical buckling height of a small tree in m
+printf("\nThe critical buckling height of a small tree,h_critical=%1.2f m",h_critical);