summaryrefslogtreecommitdiff
path: root/1586/CH4/EX4.10/EXP4_10.sce
diff options
context:
space:
mode:
Diffstat (limited to '1586/CH4/EX4.10/EXP4_10.sce')
-rw-r--r--1586/CH4/EX4.10/EXP4_10.sce7
1 files changed, 7 insertions, 0 deletions
diff --git a/1586/CH4/EX4.10/EXP4_10.sce b/1586/CH4/EX4.10/EXP4_10.sce
new file mode 100644
index 000000000..d404b1121
--- /dev/null
+++ b/1586/CH4/EX4.10/EXP4_10.sce
@@ -0,0 +1,7 @@
+clc;funcprot(0);//EXAMPLE 4.10
+// Initialisation of Variables
+g=16;.......// No. of grains per square inch in a photomicrograph
+M=250;..........//Magnification in a photomicrograph
+N=(M/g)*100;........//The number of grains per square inch
+n=(log10(100)/log10(2))+1;........//the ASTM grain size number
+disp(n,"the ASTM grain size number:")