summaryrefslogtreecommitdiff
path: root/374/CH8
diff options
context:
space:
mode:
Diffstat (limited to '374/CH8')
-rw-r--r--374/CH8/EX8.1/81.sci21
-rw-r--r--374/CH8/EX8.2/82.sci11
-rw-r--r--374/CH8/EX8.3/83.sci18
-rw-r--r--374/CH8/EX8.4.a/84a.sci14
-rw-r--r--374/CH8/EX8.4/84.sci20
5 files changed, 84 insertions, 0 deletions
diff --git a/374/CH8/EX8.1/81.sci b/374/CH8/EX8.1/81.sci
new file mode 100644
index 000000000..64eea11e0
--- /dev/null
+++ b/374/CH8/EX8.1/81.sci
@@ -0,0 +1,21 @@
+//chapter 8 example 1//
+clc
+clear
+//photo current of the dode=Ip,quantam efficiency=n,wavelength=l,plancks constant=h,speed of light=c,power at given wave length=Po,total shot noise=i2,thermal noise in the load resistor=i2th,dark current=Id,post detection bandwidth of the receiver=B//
+n=0.50;//quantam efficiency//
+e=1.6*(10^-19);//charge of the electron//
+l=0.85*(10^-6);//in mts//
+h=6.63*(10^-34);//plancks constant//
+c=3*(10^8);
+Po=250*(10^-9);
+Ip=((n*e*Po*l)/(h*c))*(10^9);
+printf("\n a) photo current in the dode=%f nA\n",Ip)
+Id=4;//in nano amperes//
+B=8*(10^6);
+i2=sqrt((2*e*B*(Ip+Id))*(10^11));
+printf("\n b) total shot noise=%f*(10^-10) A\n",i2)
+Kb=1.38*(10^-23);
+T=300;
+Rl=6000;
+ith=sqrt(((4*Kb*T*B)/Rl)*(10^18));
+printf("\n c) thermal noise generated=%f*(10^-9) A\n",ith) \ No newline at end of file
diff --git a/374/CH8/EX8.2/82.sci b/374/CH8/EX8.2/82.sci
new file mode 100644
index 000000000..226036a18
--- /dev/null
+++ b/374/CH8/EX8.2/82.sci
@@ -0,0 +1,11 @@
+//chapter 8 example //
+clc
+clear
+//capacitance of photodoide=Cd,load resistance=Rl,maximum bandwidth=B,bandwidth when system is connected to amplifier=B1//
+B=10*(10^6);//in Hz//
+Cd=5*(10^-12);//in farads//
+Rl=1/(2*%pi*B*Cd);
+printf("\n load resistance=%f \n",Rl)
+Cd1=(5+5)*(10^-12);
+B1=1/(2*%pi*Rl*Cd1);
+printf("\n Bandwidth after amplifier is connected=%f Hz\n",B1)
diff --git a/374/CH8/EX8.3/83.sci b/374/CH8/EX8.3/83.sci
new file mode 100644
index 000000000..fa06d5003
--- /dev/null
+++ b/374/CH8/EX8.3/83.sci
@@ -0,0 +1,18 @@
+//chapter 8 example 3//
+clc
+clear
+//capacitance=Cd,band width=B,temperature=T,current=I,load resistance=Rl,signal to noise ratio=S/N=R,optimum value of multiplication factor=Mopt//
+Cd=6*(10^-12);//in farads//
+B=40*(10^6);//in Hz//
+Rl=1/(2*%pi*Cd*B);//load rsistance//
+printf("\n a) load resistance=%f ohms\n",Rl)
+Kb=1.38*(10^-23);
+T=300;//in kelvin//
+e=1.6*(10^-19);//charge of the electron//
+x=0.3;
+Rl=666;//in ohms//
+Ip=2*(10^-7);
+Mopt=((4*Kb*T)/(e*x*Rl*Ip))^(1/2.3);
+printf("\n b) optimum value of multiplication factor=%f \n",Mopt)
+R=((Mopt*Ip)^2)/((2*e*B*Ip*(Mopt^2.3))+(4*Kb*T*B/Rl))*(0.01089);
+printf("\n c) signal to noise ratio=%f \n",R)
diff --git a/374/CH8/EX8.4.a/84a.sci b/374/CH8/EX8.4.a/84a.sci
new file mode 100644
index 000000000..83c59edbb
--- /dev/null
+++ b/374/CH8/EX8.4.a/84a.sci
@@ -0,0 +1,14 @@
+//chapter 8 example 4a//
+clc
+clear
+//bit error=BER,temperature=T,load resistance=R,noise bandwidth=B,ratio=R,minimum power required=Pmin//
+R1=19.6;//in db//
+R2=10^(R1/20);
+R=50;
+K=1.38*(10^-23);
+T=400;//in kelvin//
+B=(10^7);//in Hz//
+is=R2*(sqrt((4*K*T*B)/R))*(10^9);
+R3=0.4;
+Pmin=(is/R3)*(10^-3);
+printf("\n minimum power required to maintain bit error=%f micro watts\n",Pmin)
diff --git a/374/CH8/EX8.4/84.sci b/374/CH8/EX8.4/84.sci
new file mode 100644
index 000000000..3e6205f9d
--- /dev/null
+++ b/374/CH8/EX8.4/84.sci
@@ -0,0 +1,20 @@
+//chapter 8 example 4//
+clc
+clear
+//effective input resistance =Ra,maximum band width=B,total capacitance=Ct,mean thermal energy noise current=ith,open loop gain =A,total effective load resistance=Rtl//
+Ra=5*(10^6);//in ohms//
+Rb=5*(10^6);//in ohms//
+Rtl=(Ra*Rb)/(Ra+Rb);//total effective load resistance//
+Ct=5*(10^-12);//in farads//
+B=1/(2*%pi*Rtl*Ct);
+printf("\n a) maximum bandwidth=%f Hz\n",B)
+T=300;//in kelvin//
+Kb=1.38*(10^-23);
+ith=((4*Kb*T)/Rtl)*(10^27);
+printf("\n b) mean thermal energy noise current per unit band width=%f *(10^-27) A2Hz-1\n",ith)
+A=400;//open loop gain//
+Rf=(10^5);//in ohms//
+B1=A/(2*%pi*Rf*Ct);
+printf("\n C) a) maximum bandwidth without eualization for the transimpedance configuration=%f Hz\n",B1)
+ith=((4*Kb*T)/Rf)*(10^25);
+printf("\n C) b) mean square thermal noise current=%f*(10^-25) Hz\n",ith) \ No newline at end of file