summaryrefslogtreecommitdiff
path: root/3557/CH4/EX4.6/Ex4_6.sce
diff options
context:
space:
mode:
Diffstat (limited to '3557/CH4/EX4.6/Ex4_6.sce')
-rw-r--r--3557/CH4/EX4.6/Ex4_6.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/3557/CH4/EX4.6/Ex4_6.sce b/3557/CH4/EX4.6/Ex4_6.sce
new file mode 100644
index 000000000..d1e59f89d
--- /dev/null
+++ b/3557/CH4/EX4.6/Ex4_6.sce
@@ -0,0 +1,17 @@
+//Example 4.6//
+a=3.98;//in.^2 // area of region
+b=100;//grain density
+c=300;//grain density
+A100=a*(b/c)^2
+mprintf("A100 = %f in^2",A100)
+//Then the grain density becomes
+d=32;//grains
+N=d/A100
+mprintf("\nN = %f grains/in^2",N)
+i=2;//from the equation
+e=log(N);
+f=log(i);
+j=1;//from the equation
+G=(e/f)+j
+mprintf("\nG = %f \nor \n G=7+",G)
+