blob: ecda2b89c8a2938bd1f6df2f786781fce26fb5d3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
//Example 4 // electric and magnetic field
clc;
clear;
close;
//given data :
r=2;// in m
mu0=4*%pi*10^-7;
epsilon0=8.85*10^-12;
EbyH=sqrt(mu0/epsilon0);
EH=1000/(4*r^2*%pi^2);// in W/m^2
E=sqrt(EH*EbyH);
H=(EH/E);
disp(E,"Intensities of electric,E(V/m) = ")
disp(H,"Magnetic field of radiation,H(Amp-turn/m) = ")
|
