blob: d31640179972219adb252bcdc02626eba5ee5dc8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
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
|