summaryrefslogtreecommitdiff
path: root/1739/CH7/EX7.5/Exa7_5.sce
blob: af71efa5aec3a8b033b4fb284f301553a4206ef6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Exa 7.5
clc;
clear;
close;
//Given data :
format('v',4)
To=150;//in kelvin
T1=20;//in degree C
T1=T1+273;//in kelvin
T2=70;//in degree C
T2=T2+273;//in kelvin
//Formula ; Jth=exp(T/To)
Jth20=exp(T1/To);
Jth70=exp(T2/To)
ratio=Jth70/Jth20;//unitless
disp(ratio,"Ratio of current densities for AlGaAs injection laser : ");