blob: 2ab19833942d8cc8abfc034d4ff1946ae6a4f5fb (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
clc;
f=300; //frequency in Hz
r=1; //distance in metre
i=2; //current in Ampere
area=0.1; //area in metre square
mo=4*(%pi)*10^-7; //constant
H=i/(2*(%pi)*r); //calcualting H field rms
disp(H,"H field intensity (rms) in A/m = "); //displaying H field
Hp=H*sqrt(2); //peak H
disp(Hp,"H field intensity (peak) in A/m = "); //displaying result
Bp=(Hp*mo); //calculating B peak in Tesla
disp(Bp,"Flux peak in Tesla = "); //displaying B
vp=2*(%pi)*f*Bp; //calculating v peak
disp(vp,"Peak voltage in volt = "); //displaying result
|