diff options
Diffstat (limited to '3415/CH6/EX6.2')
| -rw-r--r-- | 3415/CH6/EX6.2/Ex6_2.JPG | bin | 0 -> 50388 bytes | |||
| -rw-r--r-- | 3415/CH6/EX6.2/Ex6_2.sce | 14 |
2 files changed, 14 insertions, 0 deletions
diff --git a/3415/CH6/EX6.2/Ex6_2.JPG b/3415/CH6/EX6.2/Ex6_2.JPG Binary files differnew file mode 100644 index 000000000..3891d83e9 --- /dev/null +++ b/3415/CH6/EX6.2/Ex6_2.JPG diff --git a/3415/CH6/EX6.2/Ex6_2.sce b/3415/CH6/EX6.2/Ex6_2.sce new file mode 100644 index 000000000..793e2200b --- /dev/null +++ b/3415/CH6/EX6.2/Ex6_2.sce @@ -0,0 +1,14 @@ +//fiber optic communications by joseph c. palais
+//example 6.2
+//OS=Windows XP sp3
+//Scilab version 5.4.1
+clc;
+clear all;
+//given
+n=3.51; //for GaAsP refractive index
+Lambda=1.55;//wavelength in um
+//to find
+grating_period1=Lambda/(2*n);//grating period in um for firstorder diffraction
+grating_period2=2*grating_period1;//grating period in um for second order diffraction
+mprintf("Grating period for First order diffraction=%fum",grating_period1);
+mprintf("\nGrating period for Second order diffraction=%fum",grating_period2);
|
