summaryrefslogtreecommitdiff
path: root/2858/CH1/EX1.4/Ex1_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '2858/CH1/EX1.4/Ex1_4.sce')
-rwxr-xr-x2858/CH1/EX1.4/Ex1_4.sce10
1 files changed, 10 insertions, 0 deletions
diff --git a/2858/CH1/EX1.4/Ex1_4.sce b/2858/CH1/EX1.4/Ex1_4.sce
new file mode 100755
index 000000000..83b18a65c
--- /dev/null
+++ b/2858/CH1/EX1.4/Ex1_4.sce
@@ -0,0 +1,10 @@
+//example 1.4
+clc; funcprot(0);
+F200=30;
+PI=8;
+GI=0.01*(F200-15)*(PI-10);
+if GI<0 then
+ GI=0;
+ disp("the soil is A-2-4(0)")
+end
+