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