diff options
Diffstat (limited to '2183/CH4/EX4.14/Ex_4_14.sce')
| -rwxr-xr-x | 2183/CH4/EX4.14/Ex_4_14.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/2183/CH4/EX4.14/Ex_4_14.sce b/2183/CH4/EX4.14/Ex_4_14.sce new file mode 100755 index 000000000..4064d4389 --- /dev/null +++ b/2183/CH4/EX4.14/Ex_4_14.sce @@ -0,0 +1,11 @@ +// Example 4.14 //birefringence
+clc;
+clear;
+close;
+Lbc1=0.7;//beat length micro meter
+h=1.3;//wavelength in micro meter
+Bf1=((h*10^-6)/(Lbc1*10^-3));// birefringence when beat length = 0.5mm
+Lbc2=80;//beat length meter
+Bf2=((h*10^-6)/(Lbc2));// birefringence when beat length = 60 meter
+disp(Bf1,"birefringence (high birefringent fiber) when beat length = 0.7micro meter")
+disp(Bf2,"birefringence (lower birefringent fiber) when beat length = 80 meter")
|