diff options
| author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
|---|---|---|
| committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
| commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
| tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3740/CH10/EX10.2/Ex10_2.sce | |
| parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
| download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip | |
initial commit / add all books
Diffstat (limited to '3740/CH10/EX10.2/Ex10_2.sce')
| -rw-r--r-- | 3740/CH10/EX10.2/Ex10_2.sce | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/3740/CH10/EX10.2/Ex10_2.sce b/3740/CH10/EX10.2/Ex10_2.sce new file mode 100644 index 000000000..993c640da --- /dev/null +++ b/3740/CH10/EX10.2/Ex10_2.sce @@ -0,0 +1,24 @@ +//Optoelectronics - An Introduction, 2nd Edition by J. Wilson and J.F.B. Hawkes
+//Example 10.2
+//OS=Windows XP sp3
+//Scilab version 5.5.2
+clc;
+clear;
+
+//given
+Alpha=5e-7;//Coefficient of expansion of pure silica in K^(-1)
+Beta=6.8e-6;//Value for pure silica in K^(-1)
+LambdaB=1.55e-6;//Wavelength in m
+n1=1.46;//Dimensionless Refractive index of Silica
+P11=0.126;//Value of 1st Pockels coefficient
+P12=0.274;//Value of 2nd Pockels coefficient
+Mu=0.17;//Poisson's ratio
+
+DeltaLambdaB=LambdaB*(Alpha+Beta);//Wavelength sensitivity to temperature changes of the fiber in m K^(-1)
+mprintf("\n DeltaLambdaB = %.4f nm K^-1",DeltaLambdaB/1e-9);//Dividing by 10^(-9) to convert to nm K^(-1)
+
+Pe=(n1^2)/2*((1-Mu)*P12-Mu*P11);//Corresponding effective photoelastic coefficient
+mprintf("\n Pe = %.3f",Pe);//The answers vary due to round off error
+
+DeltaLambdaB=LambdaB*(1-Pe);//Wavelength sensitivity as far as sensitivity is concerned in m Epsilon^(-1)
+mprintf("\n DeltaLambdaB = %.1e m Epsilon^-1",DeltaLambdaB);
|