summaryrefslogtreecommitdiff
path: root/3537/CH2/EX2.6/Ex2_6.sce
blob: 5eedf8154ad89d7639ea585c852529ce17365ac5 (plain)
1
2
3
4
5
6
7
8
9
10
//Example 2_6
clc();
clear;
//To calculate the dispersive power of the granting in the third order spectrum
k=3
e=1/4000                       //units in cm
lemda=5000*10^-8               //units in cm
theta=asin((k*lemda)/e)
dt_dl=k/(e*cos(theta))
printf("Disperssive power of the granting in the third order spectrum is %.0f",dt_dl)