blob: 125659261d507c8ccf46d2fb6289632d1f7f4782 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
// Example 6.1
// Calculation of the gain
// Page no 249
clc;
clear;
close;
//Given data
n=1.5; // Refractive ondex of air
lambda=1550*10^-9; // Wavelength
c=3*10^8; // Velocity of light
p=5.73*10^-17; // Power spectral density
h=6.63*10^-34 // Planck constant
// Gain
f=c/lambda;
G=(p/(2*n*h*f))+1;
//Displaying results in the command window
printf("\n Gain G = %0.0f ",G);
|