diff options
Diffstat (limited to '3763/CH7/EX7.3/Ex7_3.sce')
| -rw-r--r-- | 3763/CH7/EX7.3/Ex7_3.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/3763/CH7/EX7.3/Ex7_3.sce b/3763/CH7/EX7.3/Ex7_3.sce new file mode 100644 index 000000000..8da0edd1a --- /dev/null +++ b/3763/CH7/EX7.3/Ex7_3.sce @@ -0,0 +1,17 @@ +clear +// +// +// + +//Variable declaration +chi=0.5*10**-5 //magnetic susceptibility +H=10**6 //field strength(ampere/m) +mew0=4*%pi*10**-7 + +//Calculation +I=chi*H //intensity of magnetisation(ampere/m) +B=mew0*(I+H) //flux density in material(weber/m**2) + +//Result +printf("\n intensity of magnetisation is %0.3f ampere/m",I) +printf("\n flux density in material is %0.3f weber/m**2",B) |