diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /728/CH9 | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '728/CH9')
39 files changed, 460 insertions, 0 deletions
diff --git a/728/CH9/EX9.1/Ex9_1.sce b/728/CH9/EX9.1/Ex9_1.sce new file mode 100755 index 000000000..ede2a92c1 --- /dev/null +++ b/728/CH9/EX9.1/Ex9_1.sce @@ -0,0 +1,9 @@ +//Caption:Calculate operating frequency of IMPATT diode
+//Exa:9.1
+clc;
+clear;
+close;
+v_d=10^7*10^-2;//drift velocity(in m/s)
+L=2*10^-6;//drift length(in m)
+f=v_d/(2*L);//in Hz
+disp(f/10^9,'Operating Frequency (in GHz) =');
\ No newline at end of file diff --git a/728/CH9/EX9.1/Ex9_1.txt b/728/CH9/EX9.1/Ex9_1.txt new file mode 100755 index 000000000..ede2a92c1 --- /dev/null +++ b/728/CH9/EX9.1/Ex9_1.txt @@ -0,0 +1,9 @@ +//Caption:Calculate operating frequency of IMPATT diode
+//Exa:9.1
+clc;
+clear;
+close;
+v_d=10^7*10^-2;//drift velocity(in m/s)
+L=2*10^-6;//drift length(in m)
+f=v_d/(2*L);//in Hz
+disp(f/10^9,'Operating Frequency (in GHz) =');
\ No newline at end of file diff --git a/728/CH9/EX9.1/Ex9_1_ans.txt b/728/CH9/EX9.1/Ex9_1_ans.txt new file mode 100755 index 000000000..20ac8c613 --- /dev/null +++ b/728/CH9/EX9.1/Ex9_1_ans.txt @@ -0,0 +1,5 @@ +
+ Operating Frequency (in GHz) =
+
+ 25.
+
\ No newline at end of file diff --git a/728/CH9/EX9.10/Ex9_10.sce b/728/CH9/EX9.10/Ex9_10.sce new file mode 100755 index 000000000..29f96e369 --- /dev/null +++ b/728/CH9/EX9.10/Ex9_10.sce @@ -0,0 +1,11 @@ +//Caption:Calculate (i)-drift time of carrier ,(ii)-operating frequency of diode
+//Exa:9.10
+clc;
+clear;
+close;
+L=2*10^-6;//drift length (in m)
+v_d=10^5;//in cm/s
+drift_time=L/v_d;
+f=1/(2*drift_time);
+disp(drift_time,'Drift time (in sec) =');
+disp(f*10^-9,'Operating Frequency (in GHz)=');
\ No newline at end of file diff --git a/728/CH9/EX9.10/Ex9_10.txt b/728/CH9/EX9.10/Ex9_10.txt new file mode 100755 index 000000000..29f96e369 --- /dev/null +++ b/728/CH9/EX9.10/Ex9_10.txt @@ -0,0 +1,11 @@ +//Caption:Calculate (i)-drift time of carrier ,(ii)-operating frequency of diode
+//Exa:9.10
+clc;
+clear;
+close;
+L=2*10^-6;//drift length (in m)
+v_d=10^5;//in cm/s
+drift_time=L/v_d;
+f=1/(2*drift_time);
+disp(drift_time,'Drift time (in sec) =');
+disp(f*10^-9,'Operating Frequency (in GHz)=');
\ No newline at end of file diff --git a/728/CH9/EX9.10/Ex9_10_ans.txt b/728/CH9/EX9.10/Ex9_10_ans.txt new file mode 100755 index 000000000..6704d01cd --- /dev/null +++ b/728/CH9/EX9.10/Ex9_10_ans.txt @@ -0,0 +1,9 @@ +
+ Drift time (in sec) =
+
+ 2.000D-11
+
+ Operating Frequency (in GHz)=
+
+ 25.
+
\ No newline at end of file diff --git a/728/CH9/EX9.11/Ex9_11.sce b/728/CH9/EX9.11/Ex9_11.sce new file mode 100755 index 000000000..690020d67 --- /dev/null +++ b/728/CH9/EX9.11/Ex9_11.sce @@ -0,0 +1,14 @@ +//Caption:Calculate (i)-breakdown voltage ,(ii)-breakdown electric field.
+//Exa:9.11
+clc;
+clear;
+close;
+E_r=11.8;
+E_o=8.85*10^-12;
+N=3*10^21;//in per cubic meter
+L=6.2*10^-6;//in meter
+q=1.6*10^-19;//in coulombs
+V_bd=q*N*L^2/(E_o*E_r);
+E_bd=V_bd/L;
+disp(V_bd,'Breakdown voltage (in volts) =');
+disp(E_bd,'Breakdown electric field (in V/m) =');
\ No newline at end of file diff --git a/728/CH9/EX9.11/Ex9_11.txt b/728/CH9/EX9.11/Ex9_11.txt new file mode 100755 index 000000000..690020d67 --- /dev/null +++ b/728/CH9/EX9.11/Ex9_11.txt @@ -0,0 +1,14 @@ +//Caption:Calculate (i)-breakdown voltage ,(ii)-breakdown electric field.
+//Exa:9.11
+clc;
+clear;
+close;
+E_r=11.8;
+E_o=8.85*10^-12;
+N=3*10^21;//in per cubic meter
+L=6.2*10^-6;//in meter
+q=1.6*10^-19;//in coulombs
+V_bd=q*N*L^2/(E_o*E_r);
+E_bd=V_bd/L;
+disp(V_bd,'Breakdown voltage (in volts) =');
+disp(E_bd,'Breakdown electric field (in V/m) =');
\ No newline at end of file diff --git a/728/CH9/EX9.11/Ex9_11_ans.txt b/728/CH9/EX9.11/Ex9_11_ans.txt new file mode 100755 index 000000000..4fe1ffb5a --- /dev/null +++ b/728/CH9/EX9.11/Ex9_11_ans.txt @@ -0,0 +1,8 @@ + Breakdown voltage (in volts) =
+
+ 176.68486
+
+ Breakdown electric field (in V/m) =
+
+ 28497558.
+
\ No newline at end of file diff --git a/728/CH9/EX9.12/Ex9_12.sce b/728/CH9/EX9.12/Ex9_12.sce new file mode 100755 index 000000000..4c97fc7e5 --- /dev/null +++ b/728/CH9/EX9.12/Ex9_12.sce @@ -0,0 +1,18 @@ + //Caption:Calculate (i)-maximum power gain in dBs ,(ii)-noise figure F in dBs, (iii)-bandwidth for r=0.2
+//Exa:9.12
+clc;
+clear;
+close;
+ratio=8;
+r=0.2;
+r_Q=8;
+T_d=300;//in Kelvin
+T_o=300;//in Kelvin
+X=8;
+G=(ratio)*X/(1+sqrt(1+X))^2;
+G_in_dB=(10*log(G))/log(10);//gain
+disp(G_in_dB,'Maximum Gain (in dB)=');
+F=[10*log(1+(2*T_d/T_o)*[(1/(r_Q))+(1/(r_Q)^2)])]/log(10);//noise figure
+disp(F,'Noise figure (in dB) =');
+B_W=2*r*sqrt(ratio);//bandwidth
+disp(B_W,'bandwidth =');
\ No newline at end of file diff --git a/728/CH9/EX9.12/Ex9_12.txt b/728/CH9/EX9.12/Ex9_12.txt new file mode 100755 index 000000000..4c97fc7e5 --- /dev/null +++ b/728/CH9/EX9.12/Ex9_12.txt @@ -0,0 +1,18 @@ + //Caption:Calculate (i)-maximum power gain in dBs ,(ii)-noise figure F in dBs, (iii)-bandwidth for r=0.2
+//Exa:9.12
+clc;
+clear;
+close;
+ratio=8;
+r=0.2;
+r_Q=8;
+T_d=300;//in Kelvin
+T_o=300;//in Kelvin
+X=8;
+G=(ratio)*X/(1+sqrt(1+X))^2;
+G_in_dB=(10*log(G))/log(10);//gain
+disp(G_in_dB,'Maximum Gain (in dB)=');
+F=[10*log(1+(2*T_d/T_o)*[(1/(r_Q))+(1/(r_Q)^2)])]/log(10);//noise figure
+disp(F,'Noise figure (in dB) =');
+B_W=2*r*sqrt(ratio);//bandwidth
+disp(B_W,'bandwidth =');
\ No newline at end of file diff --git a/728/CH9/EX9.12/Ex9_12_ans.txt b/728/CH9/EX9.12/Ex9_12_ans.txt new file mode 100755 index 000000000..9aac91011 --- /dev/null +++ b/728/CH9/EX9.12/Ex9_12_ans.txt @@ -0,0 +1,11 @@ +Maximum Gain (in dB)=
+
+ 6.0205999
+
+ Noise figure (in dB) =
+
+ 1.0763388
+
+ bandwidth =
+
+ 1.1313708
\ No newline at end of file diff --git a/728/CH9/EX9.13/Ex9_13.sce b/728/CH9/EX9.13/Ex9_13.sce new file mode 100755 index 000000000..b7d8dca6d --- /dev/null +++ b/728/CH9/EX9.13/Ex9_13.sce @@ -0,0 +1,32 @@ +//Caption:Calculate (i)-equivalent noise resistance, (ii)-gain, (iii)-noise figure, (iv)-bandwidth
+//Exa:9.13
+clc;
+clear;
+close;
+f_s=2*10^9;//in Hz
+f_p=12*10^9;//in Hz
+f_i=10*10^9;//in Hz
+f_d=5*10^9;//in Hz
+R_i=1*10^3;//in ohm
+R_g=1*10^3;//in ohm
+R_T_s=1*10^3;//in ohm
+R_T_i=1*10^3;//in ohm
+T_d=300;//in Kelvin
+T_o=300;//in Kelvin
+w_s=2*%pi*f_s;
+w_i=2*%pi*f_i;
+r=0.35;
+r_Q=10;
+r_d=300;//in ohm
+C=0.01*10^-12;//in Farad
+R=r^2/(w_s*w_i*C^2*R_T_i);
+a=R/R_T_s;
+g=((4*f_i*R_g*R_i*a)/(f_s*R_T_s*R_T_i*(1-a)^2));//gain
+Gain=[10*log(g)]/log(10);//gain in dB
+f={1+((2*T_d)/T_o)*[(1/r_Q)+(1/r_Q^2)]};//noise figure
+F=[10*log(f)]/log(10);//noise figure in dB
+B_W=(r/2)*sqrt(f_d/(f_s*Gain));//bandwidth
+disp(a,'Equivalent noise resistance (in ohm) =');
+disp(Gain,'Gain (in dB) =');
+disp(F,'Noise figure (in dB) =');
+disp(B_W,'Bandwidth =');
\ No newline at end of file diff --git a/728/CH9/EX9.13/Ex9_13.txt b/728/CH9/EX9.13/Ex9_13.txt new file mode 100755 index 000000000..b7d8dca6d --- /dev/null +++ b/728/CH9/EX9.13/Ex9_13.txt @@ -0,0 +1,32 @@ +//Caption:Calculate (i)-equivalent noise resistance, (ii)-gain, (iii)-noise figure, (iv)-bandwidth
+//Exa:9.13
+clc;
+clear;
+close;
+f_s=2*10^9;//in Hz
+f_p=12*10^9;//in Hz
+f_i=10*10^9;//in Hz
+f_d=5*10^9;//in Hz
+R_i=1*10^3;//in ohm
+R_g=1*10^3;//in ohm
+R_T_s=1*10^3;//in ohm
+R_T_i=1*10^3;//in ohm
+T_d=300;//in Kelvin
+T_o=300;//in Kelvin
+w_s=2*%pi*f_s;
+w_i=2*%pi*f_i;
+r=0.35;
+r_Q=10;
+r_d=300;//in ohm
+C=0.01*10^-12;//in Farad
+R=r^2/(w_s*w_i*C^2*R_T_i);
+a=R/R_T_s;
+g=((4*f_i*R_g*R_i*a)/(f_s*R_T_s*R_T_i*(1-a)^2));//gain
+Gain=[10*log(g)]/log(10);//gain in dB
+f={1+((2*T_d)/T_o)*[(1/r_Q)+(1/r_Q^2)]};//noise figure
+F=[10*log(f)]/log(10);//noise figure in dB
+B_W=(r/2)*sqrt(f_d/(f_s*Gain));//bandwidth
+disp(a,'Equivalent noise resistance (in ohm) =');
+disp(Gain,'Gain (in dB) =');
+disp(F,'Noise figure (in dB) =');
+disp(B_W,'Bandwidth =');
\ No newline at end of file diff --git a/728/CH9/EX9.13/Ex9_13_ans.txt b/728/CH9/EX9.13/Ex9_13_ans.txt new file mode 100755 index 000000000..fb2d03536 --- /dev/null +++ b/728/CH9/EX9.13/Ex9_13_ans.txt @@ -0,0 +1,16 @@ +
+ Equivalent noise resistance (in ohm) =
+
+ 1.5514806
+
+ Gain (in dB) =
+
+ 20.087158
+
+ Noise figure (in dB) =
+
+ 0.8635983
+
+ Bandwidth =
+
+ 0.0617375
\ No newline at end of file diff --git a/728/CH9/EX9.2/Ex9_2.sce b/728/CH9/EX9.2/Ex9_2.sce new file mode 100755 index 000000000..dda2350c7 --- /dev/null +++ b/728/CH9/EX9.2/Ex9_2.sce @@ -0,0 +1,10 @@ +//Caption:Determine threshold electric field
+//Exa:9_2
+clc;
+clear;
+close;
+f=10*10^9;//in Hz
+L=75*10^-6;//Device length (in m)
+V=25;//Voltage pulse amplified (in volts)
+E_th=V/L;
+disp(E_th,'Threshold Electric field (in kV/cm) =');
\ No newline at end of file diff --git a/728/CH9/EX9.2/Ex9_2.txt b/728/CH9/EX9.2/Ex9_2.txt new file mode 100755 index 000000000..dda2350c7 --- /dev/null +++ b/728/CH9/EX9.2/Ex9_2.txt @@ -0,0 +1,10 @@ +//Caption:Determine threshold electric field
+//Exa:9_2
+clc;
+clear;
+close;
+f=10*10^9;//in Hz
+L=75*10^-6;//Device length (in m)
+V=25;//Voltage pulse amplified (in volts)
+E_th=V/L;
+disp(E_th,'Threshold Electric field (in kV/cm) =');
\ No newline at end of file diff --git a/728/CH9/EX9.2/Ex9_2_ans.txt b/728/CH9/EX9.2/Ex9_2_ans.txt new file mode 100755 index 000000000..ef873ecf1 --- /dev/null +++ b/728/CH9/EX9.2/Ex9_2_ans.txt @@ -0,0 +1,4 @@ +Threshold Electric field (in kV/cm) =
+
+ 333333.33
+
\ No newline at end of file diff --git a/728/CH9/EX9.3/Ex9_3.sce b/728/CH9/EX9.3/Ex9_3.sce new file mode 100755 index 000000000..89c25e195 --- /dev/null +++ b/728/CH9/EX9.3/Ex9_3.sce @@ -0,0 +1,13 @@ +//Caption:Calculate (i)-power gain in dB ,(ii)-power gain if it is USB converter.
+//Exa:9.3
+clc;
+clear;
+close;
+f_s=2*10^9;//in Hz
+f_p=12*10^9;//in Hz
+R_i=16;
+R_s=1000;
+A_p=10*log((f_p-f_s)/f_s);
+A_p_usb=10*log((f_p+f_s)/f_s);
+disp(log(10),'Power gain (in dB) =');
+disp(A_p_usb,'Power gain as USB converter (in dB) =');
\ No newline at end of file diff --git a/728/CH9/EX9.3/Ex9_3.txt b/728/CH9/EX9.3/Ex9_3.txt new file mode 100755 index 000000000..89c25e195 --- /dev/null +++ b/728/CH9/EX9.3/Ex9_3.txt @@ -0,0 +1,13 @@ +//Caption:Calculate (i)-power gain in dB ,(ii)-power gain if it is USB converter.
+//Exa:9.3
+clc;
+clear;
+close;
+f_s=2*10^9;//in Hz
+f_p=12*10^9;//in Hz
+R_i=16;
+R_s=1000;
+A_p=10*log((f_p-f_s)/f_s);
+A_p_usb=10*log((f_p+f_s)/f_s);
+disp(log(10),'Power gain (in dB) =');
+disp(A_p_usb,'Power gain as USB converter (in dB) =');
\ No newline at end of file diff --git a/728/CH9/EX9.3/Ex9_3_ans.txt b/728/CH9/EX9.3/Ex9_3_ans.txt new file mode 100755 index 000000000..42e9bba62 --- /dev/null +++ b/728/CH9/EX9.3/Ex9_3_ans.txt @@ -0,0 +1,8 @@ + Power gain (in dB) =
+
+ 2.3025851
+
+ Power gain as USB converter (in dB) =
+
+ 19.459101
+
\ No newline at end of file diff --git a/728/CH9/EX9.4/Ex9_4.sce b/728/CH9/EX9.4/Ex9_4.sce new file mode 100755 index 000000000..70fa56276 --- /dev/null +++ b/728/CH9/EX9.4/Ex9_4.sce @@ -0,0 +1,17 @@ +//Caption:Calculate (i)-critical voltage ,(ii)-breakdown voltage, (iii)-breakdown electric field
+//Exa:9.4
+clc;
+clear;
+close;
+E_s=12.5;
+E_o=8.85*10^-12;
+E=E_o*E_s;
+N=3.2*10^22;//per cubic meter
+L=8*10^-6;//in m
+q=1.6*10^-19;//in coulombs
+V_c=q*N*L^2/(2*E);
+V_bd=2*V_c;
+E_bd=V_bd/L;
+disp(V_c/10^3,'Critical voltage(in kV) =');
+disp(V_bd/10^3,'Breakdown Voltage (in kV) =');
+disp(E_bd,'Breakdown Electric field (in V/cm) =');
\ No newline at end of file diff --git a/728/CH9/EX9.4/Ex9_4.txt b/728/CH9/EX9.4/Ex9_4.txt new file mode 100755 index 000000000..70fa56276 --- /dev/null +++ b/728/CH9/EX9.4/Ex9_4.txt @@ -0,0 +1,17 @@ +//Caption:Calculate (i)-critical voltage ,(ii)-breakdown voltage, (iii)-breakdown electric field
+//Exa:9.4
+clc;
+clear;
+close;
+E_s=12.5;
+E_o=8.85*10^-12;
+E=E_o*E_s;
+N=3.2*10^22;//per cubic meter
+L=8*10^-6;//in m
+q=1.6*10^-19;//in coulombs
+V_c=q*N*L^2/(2*E);
+V_bd=2*V_c;
+E_bd=V_bd/L;
+disp(V_c/10^3,'Critical voltage(in kV) =');
+disp(V_bd/10^3,'Breakdown Voltage (in kV) =');
+disp(E_bd,'Breakdown Electric field (in V/cm) =');
\ No newline at end of file diff --git a/728/CH9/EX9.4/Ex9_4_ans.txt b/728/CH9/EX9.4/Ex9_4_ans.txt new file mode 100755 index 000000000..5fab198df --- /dev/null +++ b/728/CH9/EX9.4/Ex9_4_ans.txt @@ -0,0 +1,11 @@ + Critical voltage(in kV) =
+
+ 1.4810395
+
+ Breakdown Voltage (in kV) =
+
+ 2.9620791
+
+ Breakdown Electric field (in V/cm) =
+
+ 3.703D+08
\ No newline at end of file diff --git a/728/CH9/EX9.5/Ex9_5.sce b/728/CH9/EX9.5/Ex9_5.sce new file mode 100755 index 000000000..5616bbe89 --- /dev/null +++ b/728/CH9/EX9.5/Ex9_5.sce @@ -0,0 +1,10 @@ +//Caption:Calculate (i)-power gain in dB ,(ii)-power gain if it is USB converter.
+//Exa:9.5
+clc;
+clear;
+close;
+N_a=2.5*10^16;//per cubic cm
+J=33;//in kA/cm^2
+q=1.6*10^-19;
+V_z=J/(q*N_a);//Avalanche zone velocity (in cm/s)
+disp(V_z,'Avalanche zone velocity (in cm/s) =');
\ No newline at end of file diff --git a/728/CH9/EX9.5/Ex9_5.txt b/728/CH9/EX9.5/Ex9_5.txt new file mode 100755 index 000000000..edc4504f9 --- /dev/null +++ b/728/CH9/EX9.5/Ex9_5.txt @@ -0,0 +1,10 @@ +//Caption:Calculate (i)-power gain in dB ,(ii)-power gain if it is USB converter.
+//Exa:9.5
+clc;
+clear;
+close;
+N_a-2.5*10^16;//per cubic cm
+J=33;//in kA/cm^2
+q=1.6*10^-19;
+V_z=J/(q*N_a);//Avalanche zone velocity (in cm/s)
+disp(V_z,'Avalanche zone velocity (in cm/s) =');
\ No newline at end of file diff --git a/728/CH9/EX9.5/Ex9_5_ans.txt b/728/CH9/EX9.5/Ex9_5_ans.txt new file mode 100755 index 000000000..713d9cc1b --- /dev/null +++ b/728/CH9/EX9.5/Ex9_5_ans.txt @@ -0,0 +1,4 @@ + Avalanche zone velocity (in cm/s) =
+
+ 8250.
+
\ No newline at end of file diff --git a/728/CH9/EX9.6/Ex9_6.sce b/728/CH9/EX9.6/Ex9_6.sce new file mode 100755 index 000000000..c4d4b69e7 --- /dev/null +++ b/728/CH9/EX9.6/Ex9_6.sce @@ -0,0 +1,9 @@ +//Caption:Calculate the power gain in dB
+//Exa:9.6
+clc;
+clear;
+close;
+R_neg=25;//in ohm
+R_load=50;//in ohm
+G={[- abs(R_neg)-R_load]/[- abs(R_neg)+R_load]}^2;
+disp(G,'Power gain =');
\ No newline at end of file diff --git a/728/CH9/EX9.6/Ex9_6.txt b/728/CH9/EX9.6/Ex9_6.txt new file mode 100755 index 000000000..c4d4b69e7 --- /dev/null +++ b/728/CH9/EX9.6/Ex9_6.txt @@ -0,0 +1,9 @@ +//Caption:Calculate the power gain in dB
+//Exa:9.6
+clc;
+clear;
+close;
+R_neg=25;//in ohm
+R_load=50;//in ohm
+G={[- abs(R_neg)-R_load]/[- abs(R_neg)+R_load]}^2;
+disp(G,'Power gain =');
\ No newline at end of file diff --git a/728/CH9/EX9.6/Ex9_6_ans.txt b/728/CH9/EX9.6/Ex9_6_ans.txt new file mode 100755 index 000000000..8609bb195 --- /dev/null +++ b/728/CH9/EX9.6/Ex9_6_ans.txt @@ -0,0 +1,5 @@ +
+ Power gain =
+
+ 9.
+
\ No newline at end of file diff --git a/728/CH9/EX9.7/Ex9_7.sce b/728/CH9/EX9.7/Ex9_7.sce new file mode 100755 index 000000000..d7209aec6 --- /dev/null +++ b/728/CH9/EX9.7/Ex9_7.sce @@ -0,0 +1,9 @@ +//Caption:Calculate the minimum voltage needed to GUNN effect
+//Exa:9.7
+clc;
+clear;
+close;
+volt_grad=3.3*10^3;//voltage gradient
+L=5*10^-4;//in drift length
+V_min=volt_grad*L;//in volts
+disp(V_min,'Minimum voltage needed (in Volts) =');
\ No newline at end of file diff --git a/728/CH9/EX9.7/Ex9_7.txt b/728/CH9/EX9.7/Ex9_7.txt new file mode 100755 index 000000000..d7209aec6 --- /dev/null +++ b/728/CH9/EX9.7/Ex9_7.txt @@ -0,0 +1,9 @@ +//Caption:Calculate the minimum voltage needed to GUNN effect
+//Exa:9.7
+clc;
+clear;
+close;
+volt_grad=3.3*10^3;//voltage gradient
+L=5*10^-4;//in drift length
+V_min=volt_grad*L;//in volts
+disp(V_min,'Minimum voltage needed (in Volts) =');
\ No newline at end of file diff --git a/728/CH9/EX9.7/Ex9_7_ans.txt b/728/CH9/EX9.7/Ex9_7_ans.txt new file mode 100755 index 000000000..6cff07d63 --- /dev/null +++ b/728/CH9/EX9.7/Ex9_7_ans.txt @@ -0,0 +1,4 @@ + Minimum voltage needed (in Volts) =
+
+ 1.65
+
\ No newline at end of file diff --git a/728/CH9/EX9.8/EX9_8.txt b/728/CH9/EX9.8/EX9_8.txt new file mode 100755 index 000000000..9fa5dfdf2 --- /dev/null +++ b/728/CH9/EX9.8/EX9_8.txt @@ -0,0 +1,12 @@ +//Caption:Calculate the rational frequency & critical velocity of diode.
+//Exa:9.8
+clc;
+clear;
+close;
+v_d=2*10^7;//in cm/s
+L=20*10^-4;//in cm
+f=v_d/L;
+disp(f*10^-9,'Natural frequency (in GHz) =');
+critical_field=3.3*10^3;
+V=L*critical_field;
+disp(V,'Critical voltage (in volts) =');
\ No newline at end of file diff --git a/728/CH9/EX9.8/Ex9_8.sce b/728/CH9/EX9.8/Ex9_8.sce new file mode 100755 index 000000000..9fa5dfdf2 --- /dev/null +++ b/728/CH9/EX9.8/Ex9_8.sce @@ -0,0 +1,12 @@ +//Caption:Calculate the rational frequency & critical velocity of diode.
+//Exa:9.8
+clc;
+clear;
+close;
+v_d=2*10^7;//in cm/s
+L=20*10^-4;//in cm
+f=v_d/L;
+disp(f*10^-9,'Natural frequency (in GHz) =');
+critical_field=3.3*10^3;
+V=L*critical_field;
+disp(V,'Critical voltage (in volts) =');
\ No newline at end of file diff --git a/728/CH9/EX9.8/Ex9_8_ans.txt b/728/CH9/EX9.8/Ex9_8_ans.txt new file mode 100755 index 000000000..cd57710e1 --- /dev/null +++ b/728/CH9/EX9.8/Ex9_8_ans.txt @@ -0,0 +1,9 @@ +
+ Natural frequency (in GHz) =
+
+ 10.
+
+ Critical voltage (in volts) =
+
+ 6.6
+
\ No newline at end of file diff --git a/728/CH9/EX9.9/Ex9_9.sce b/728/CH9/EX9.9/Ex9_9.sce new file mode 100755 index 000000000..bb4f13e16 --- /dev/null +++ b/728/CH9/EX9.9/Ex9_9.sce @@ -0,0 +1,15 @@ +//Caption:Calculate the resonant frequency & efficiency.
+//Exa:9.9
+clc;
+clear;
+close;
+L_p=0.5*10^-9;//in H
+C_j=0.5*10^-12;//in F
+V_bd=100;//breakdown voltage (in volts)
+I_bias=100*10^-3;//bias current(in A)
+I_rf_peak=0.8;
+R_l=2;
+f=1/(2*%pi*sqrt(L_p*C_j));
+eff={(0.5*I_rf_peak^2*R_l)/(V_bd*I_bias)}*100;
+disp(f*10^-9,'Resonant frequency (in GHz) =');
+disp(eff,'Efficiency (in percentage) =');
\ No newline at end of file diff --git a/728/CH9/EX9.9/Ex9_9.txt b/728/CH9/EX9.9/Ex9_9.txt new file mode 100755 index 000000000..bb4f13e16 --- /dev/null +++ b/728/CH9/EX9.9/Ex9_9.txt @@ -0,0 +1,15 @@ +//Caption:Calculate the resonant frequency & efficiency.
+//Exa:9.9
+clc;
+clear;
+close;
+L_p=0.5*10^-9;//in H
+C_j=0.5*10^-12;//in F
+V_bd=100;//breakdown voltage (in volts)
+I_bias=100*10^-3;//bias current(in A)
+I_rf_peak=0.8;
+R_l=2;
+f=1/(2*%pi*sqrt(L_p*C_j));
+eff={(0.5*I_rf_peak^2*R_l)/(V_bd*I_bias)}*100;
+disp(f*10^-9,'Resonant frequency (in GHz) =');
+disp(eff,'Efficiency (in percentage) =');
\ No newline at end of file diff --git a/728/CH9/EX9.9/Ex9_9_ans.txt b/728/CH9/EX9.9/Ex9_9_ans.txt new file mode 100755 index 000000000..7bafbc460 --- /dev/null +++ b/728/CH9/EX9.9/Ex9_9_ans.txt @@ -0,0 +1,8 @@ + Resonant frequency (in GHz) =
+
+ 10.065842
+
+ Efficiency (in percentage) =
+
+ 6.4
+
\ No newline at end of file |