summaryrefslogtreecommitdiff
path: root/3710/CH10/EX10.2
diff options
context:
space:
mode:
Diffstat (limited to '3710/CH10/EX10.2')
-rw-r--r--3710/CH10/EX10.2/Ex10_2.sce19
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:");