blob: 2e3655c4a3e4bfaf7014507bef042a9ecabb41da (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
// Example 10.1
// Calculation of the non linear coeffifient.
// Page no 429
clc;
clear;
close;
//Given data
n2=2.5*10^-20; // Kerr coefficient
lambda=1550*10^-9; // Wavelength
A=80*10^-12; // Effective area
// Non linear coeffifient
g=(n2*2*%pi)/(lambda*A);
g=g*10^3;
//Displaying results in the command window
printf("\n Nonlinear coefficient = %0.3f W^-1m^-1 ",g);
|