summaryrefslogtreecommitdiff
path: root/1061/CH5/EX5.31/Ex5_31.sce
blob: 6a90028b8a76fe14c6dabf1c636663e34a47a64e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Ex:5.31
clc;
clear;
close;
y=1.30*10^-6;// operating wavelength in m
dn1=10^-6;
dn2=10^-5;
db1=(dn1*2*3.14)/y;// in per m
db2=(dn2*2*3.14)/y;// in per m
Lp1=(2*3.14)/(db1);// beat length in m
Lp2=(2*3.14)/(db2);// beat length in m
printf("The max core radius =%f um", db1);
printf("\n The max core radius =%f um", db2);
printf("\n The beat length =%f m", Lp1);
printf("\n The beat length =%f cm", Lp2*100);
printf("\n Hence, range of beat length; 13cm-1.3m");