summaryrefslogtreecommitdiff
path: root/3638/CH2/EX2.8/Ex2_8.sce
blob: 92bf2906aa773b7d2664a6335c97a1e1371ff055 (plain)
1
2
3
4
5
6
7
8
9
10
11
//Introduction to Fiber Optics by A. Ghatak and K. Thyagarajan, Cambridge, New Delhi, 1999
//Example 2.8
//OS=Windows XP sp3
//Scilab version 5.5.2
clc;
clear;
//given
deltanu=1.5e9;//change in frequency of He-Ne laser in Hz
c=3e8;//speed of light in m/s
lc=c/deltanu;//Corresponding coherence length
mprintf("Coherence length of He-Ne laser=%.1f cm",lc/1e-2);//Dividing by 10^(-2) to convert in cm