diff options
Diffstat (limited to '3710/CH3/EX3.6/Ex3_6.sce')
| -rw-r--r-- | 3710/CH3/EX3.6/Ex3_6.sce | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/3710/CH3/EX3.6/Ex3_6.sce b/3710/CH3/EX3.6/Ex3_6.sce new file mode 100644 index 000000000..653f5a06f --- /dev/null +++ b/3710/CH3/EX3.6/Ex3_6.sce @@ -0,0 +1,10 @@ +//Example 3.6, Page Number 124
+//Coherence Length
+clc;
+nw=1.5019 //Refraction index at 0.8 micrometer
+n2w=1.4802 //Refraction index at 0.4 micrometer
+l=0.8*(10**-6) //Vaccum Wavelength at the fundamental frequency in m
+
+lc=l/(4*(nw-n2w)) //lc is the coherence length in meters
+
+mprintf("The Coherence Length is %.2e m",lc);
|