summaryrefslogtreecommitdiff
path: root/3828/CH3/EX3.2/Ex3_2.sce
blob: 970fcd659bec08a18b30af2816addb859ccdb2e5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

//Chapter 3 : Polarization

clear;

//Variable declaration
lamda=6000              //wavelength in Armstrong

//Calculations
Ie=3/4
Io=1/4
Ratio=Ie/Io

//Result
mprintf("Ratio of the two intensities Ie:Io is %d or = 3:1",Ratio)