summaryrefslogtreecommitdiff
path: root/2438/CH4/EX4.6/Ex4_6.sce
blob: 574105d3cfed8e85be02a9643df79c0585e2de3c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
//==============================================================================
// chapter 4 example 6

clc;
clear;


//input data
 er0  = 5.6;      //static dielectric cnstant of NaCl 
 n   = 1.5;          //optical index of refraction
 

//calculation
 er = er0-n^2;
 d  = (er/er0*100);
 
//result 
 mprintf('percentage contribution from ionic polaristion=%3.2f percent\n',d);

//===============================================================================