blob: fc4f5a2f5968e576b60cfd48eee89c97599f22d3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
clc;
clear all;
e0=8.854e-12; //permittivity of vacume
N=5e28; //no of atoms present per m^3 N
xe=2e-40; //polarisability
//P=N*xe*Ei and Ei=E+(P/(3*e0)) so..
//Ei=E+(N*xe*Ei/(3*e0)) so...
//Ei/E=1/(1-(N*xe/(3*e0))) so..lets take rt=Ei/E
m=(N*xe)/(3*e0)
rt=1/(1-m);//ratio of internal field to applied field
disp('',rt,'ratio of internal field to applied field is:')
|
