diff options
Diffstat (limited to '3840/CH7/EX7.2/Ex7_2.sce')
| -rw-r--r-- | 3840/CH7/EX7.2/Ex7_2.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/3840/CH7/EX7.2/Ex7_2.sce b/3840/CH7/EX7.2/Ex7_2.sce new file mode 100644 index 000000000..d31640179 --- /dev/null +++ b/3840/CH7/EX7.2/Ex7_2.sce @@ -0,0 +1,15 @@ +clear +// +// +// + +//Variable declaration +chi=-0.25*10**-5 //magnetic susceptibility +H=1000 //magnetic field intensity(amp/m) +mew0=4*%pi*10**-7 + +//Calculation +M=chi*H //magnetisation(A/m) +B=mew0*(H+M) //magnetic flux density(wb/m**2) + +//Result |