1 files changed, 15 insertions, 0 deletions
diff --git a/1655/CH4/EX4.14.1/Example_4_14_1.sce b/1655/CH4/EX4.14.1/Example_4_14_1.sce
new file mode 100755
index 000000000..9725ad432
--- /dev/null
+++ b/1655/CH4/EX4.14.1/Example_4_14_1.sce
@@ -0,0 +1,15 @@
+// Example 4.14.1  page 4.31
+
+clc;
+clear;
+
+lamda=1550d-9;
+lamda0=1.3d-6;
+s0=0.095;
+
+Dt=lamda*s0/4*(1-(lamda0/lamda)^4);     //computing material dispersion
+Dt=Dt*10^9;
+printf("\nMaterial dispersion at 1550 nm is %.1f ps/nm/km",Dt);
+printf("\n\nNOTE - Slight deviation in the answer because of printig mistake\nIn problem they have given lamda0 as 1300 nanometer \nbut while solving they have taken it as 1330 nanometer");
+
+//answer in the book 15.6 ps/nm/km, deviaton due to printing mistake.