diff options
Diffstat (limited to '1826/CH19/EX19.12/ex19_12.sce')
| -rwxr-xr-x | 1826/CH19/EX19.12/ex19_12.sce | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/1826/CH19/EX19.12/ex19_12.sce b/1826/CH19/EX19.12/ex19_12.sce new file mode 100755 index 000000000..364f5aab5 --- /dev/null +++ b/1826/CH19/EX19.12/ex19_12.sce @@ -0,0 +1,9 @@ +// Example 19.12, page no-549
+clear
+clc
+H=1000 //A/m
+sus=-0.3*10^-5
+mu=4*%pi*10^-7
+M=sus*H
+B=mu*(M+H)
+printf("The magnetic flux density inside the material is %.3f T or Wb.m^-2",B*10^3)
|