diff options
Diffstat (limited to '3506/CH16/EX16.1/Ex_16_1.sce')
| -rw-r--r-- | 3506/CH16/EX16.1/Ex_16_1.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/3506/CH16/EX16.1/Ex_16_1.sce b/3506/CH16/EX16.1/Ex_16_1.sce new file mode 100644 index 000000000..3440fa031 --- /dev/null +++ b/3506/CH16/EX16.1/Ex_16_1.sce @@ -0,0 +1,13 @@ +//Optical Fiber communication by A selvarajan
+//example 16.1
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+lambda=850;//operating wavelength in nm
+Beta2=-1//dispersion regime ps^2/Km
+Gama=2//nonlinearity in /W-Km
+TFWHM=10//fundamental soliton width in ps
+To=TFWHM/1.763//pulse width in ps
+Ppeak=1/(Gama*(To^2))//peak power in W
+mprintf("Peak power required to maintain fundamental soliton=%fmW",Ppeak*10^3)//multiplication by 10^3 is to convert the unit from w to mW
|