1 files changed, 36 insertions, 0 deletions
diff --git a/2183/CH8/EX8.1/Ex_8_1.sce b/2183/CH8/EX8.1/Ex_8_1.sce
new file mode 100755
index 000000000..69481a0e5
--- /dev/null
+++ b/2183/CH8/EX8.1/Ex_8_1.sce
@@ -0,0 +1,36 @@
+
+// Example 8.1 //compare shot noise and thermal current
+clc;
+clear;
+close;
+T=293;//Temperature in Kelvin
+K=1.38*10^-23;//boltzman constt
+C=3*10^8;//Speed of light in meter per second
+e=1.6*10^-19;//elecronic charge
+ht=6.62*10^-34;//plank constt.
+Id=3;//dark current in nano ampere
+n=0.60;//efficiency
+Rl=4;//load resistance in kilo-ohms
+h=0.9;//wavelength in micro meter
+Po=200;// ouput power in nano Watt
+B=5;// bandwidth in mega hertz
+Ip= ((n*h*10^-6*Po*10^-9*e)/(ht*C))*10^9;//Photo current in Ampere
+its=(2*e*B*10^6*(Id+Ip)*10^-9);//total shot noise
+itsr=sqrt(its);//RMS shot noise
+disp(itsr,"RMS shot noise current in Ampere is")
+T=293;//Temperature in Kelvin
+K=1.38*10^-23;//boltzman constt
+C=3*10^8;//Speed of light in meter per second
+e=1.6*10^-19;//elecronic charge
+ht=6.62*10^-34;//plank constt.
+Id=3;//dark current in nano ampere
+n=0.60;//efficiency
+Rl=4;//load resistance in killo ohms
+h=0.9;//wavelength in micro meter
+Po=200;// ouput power in nano wat
+B=5;// bandwidth in mega hertz
+it=(((4*K*T*B*10^6)/(Rl*10^3)));//thermal noise
+itr=sqrt(it);//rms thermal noise
+disp(itr,"RMS thermal noise current in Ampere is")
+
+