summaryrefslogtreecommitdiff
path: root/1946/CH9/EX9.11.a/Ex_9_11_a.sce
blob: 70a71f5a08e8a99416a327f4759c3bc2eeb3922b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
// Example 9.11.a;//Optical gain
clc;
clear;
close;
e=1.6*10^-19;//elecronic charge
h=1.26;//wavelength in micro meter
C=3*10^8;//SPEED of light in meter per second
n=0.60;//efficiency
ht=6.62*10^-34;//plank constt.
Ic=15;//CURRENT IN milli ampere
Po=125;//output power in micro watt
Gc=(ht*C*Ic*10^-3)/(h*10^-6*e*Po*10^-6);//Gain
disp(Gc,"optical gain is")