1 files changed, 11 insertions, 0 deletions
diff --git a/1085/CH10/EX10.1/ex10_1.sce b/1085/CH10/EX10.1/ex10_1.sce
new file mode 100755
index 000000000..9593d29b1
--- /dev/null
+++ b/1085/CH10/EX10.1/ex10_1.sce
@@ -0,0 +1,11 @@
+//Exam:10.1
+clc;
+clear;
+close;
+N=8;//ASTM grain size number
+n=2^(N-1);//Number of grains per inch square at a magnification
+N_1=n*100*100;//Number of grains per inch square without magnification
+N_2=N_1/(25.4)^2;//Number of grains per mm square without magnification
+A_a=1/(N_2);//Average area of each grain(in mm^2)
+D=(A_a)^(1/2);//Average grain diameter(in mm)
+disp(D,'Average grain diameter(in mm)=')
+\ No newline at end of file