diff options
Diffstat (limited to '3768/CH8/EX8.6/Ex8_6.sce')
| -rw-r--r-- | 3768/CH8/EX8.6/Ex8_6.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/3768/CH8/EX8.6/Ex8_6.sce b/3768/CH8/EX8.6/Ex8_6.sce new file mode 100644 index 000000000..eca43b8ab --- /dev/null +++ b/3768/CH8/EX8.6/Ex8_6.sce @@ -0,0 +1,16 @@ +//Example number 8.6, Page number 172 + +clc;clear; +close; + +//Variable declaration +I=3000; //magnetisation(amp/m) +mew0=4*%pi*10**-7; +B=0.005; //flux density(weber/m**2) +//Calculation +H=(B/mew0)-I; //magnetizing force(amp/m) +mewr=(I/H)+1; //relative permeability +//Result +printf("magnetizing force is %.3f Amp/m",H) +printf("\n relative permeability is %.3f",mewr) +//answer in the book varies due to rounding off errors |