diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /539/CH20/EX20.1.b/Example_20_1_b.sce | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '539/CH20/EX20.1.b/Example_20_1_b.sce')
| -rwxr-xr-x | 539/CH20/EX20.1.b/Example_20_1_b.sce | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/539/CH20/EX20.1.b/Example_20_1_b.sce b/539/CH20/EX20.1.b/Example_20_1_b.sce new file mode 100755 index 000000000..ccb7d8834 --- /dev/null +++ b/539/CH20/EX20.1.b/Example_20_1_b.sce @@ -0,0 +1,29 @@ +//Example 20.1 Calculation of saturation magnetisation and flux density for Nickel
+
+clear;
+clc;
+
+printf("Example 20.1\n");
+
+b_m=9.27*10^-24; //ampere*m^2 (Bohr Magneton)
+
+Na=6.023*10^23; //atoms/mol (Avogadro's No.)
+
+d=8.9*10^6; //g/m^3 (density)
+
+uo=4*%pi*10^-7; //Permitivity of free space
+
+A=58.71; //g/mol (Atomic weigth of Nickel)
+
+N=d*Na/A; //No. of atoms per cubic meter
+
+// M is saturation magnetisation
+M=0.6*b_m*N; //0.6= Bohr Magneton/atom
+
+
+//B = Saturation Flux Density
+B=uo*M;
+
+printf("\nSaturation Flux Density is : %f Tesla\n",B);
+
+// End
\ No newline at end of file |