diff options
Diffstat (limited to '3710/CH10/EX10.2/Ex10_2.sce')
| -rw-r--r-- | 3710/CH10/EX10.2/Ex10_2.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/3710/CH10/EX10.2/Ex10_2.sce b/3710/CH10/EX10.2/Ex10_2.sce new file mode 100644 index 000000000..0541ff2a5 --- /dev/null +++ b/3710/CH10/EX10.2/Ex10_2.sce @@ -0,0 +1,19 @@ +//Example 10.2, Page Number 498
+//Sensitivity Calculation
+clc;
+a=5*(10**-7) //Thermal expansion Coefficient per Kelvin
+b=6.8*(10**-6) //Thermal Expansion Coefficient per Kelvin
+l=1.55*(10**-6) //Wavelength in meter
+p11=0.126 //Constant Coeffiecient
+p12=0.274 //Constant Coeffiecient
+u=0.17
+n=1.46//cladding refractive index
+
+dl=l*(a+b); // dl is the wavelength sensitivity to temp. changes
+disp(dl,"The Wavelength Sensitivity to temperature changes of the filter structure in nm/K is:");
+
+pe=((n**2)/2)*(((1-u)*p12)-(u*p11)); //pe is the effective photoelastic coefficient
+disp(pe," The Effective Photoelastic Coefficient is:");
+
+dl=l*(1-pe)
+disp(dl," As far as Strain is concerned the Sensitivity in m/ε is:");
|