1 files changed, 27 insertions, 0 deletions
diff --git a/1691/CH6/EX6.8/Exmp6_8.sce b/1691/CH6/EX6.8/Exmp6_8.sce
new file mode 100755
index 000000000..76c807628
--- /dev/null
+++ b/1691/CH6/EX6.8/Exmp6_8.sce
@@ -0,0 +1,27 @@
+//Example 6.8
+clc
+disp("R_L = 12 ohm,  n = N2/N1 = 1/3 = 0.333, eta_trans = 78.5%")
+rl=12/(0.333^2)
+format(4)
+disp(rl,"Therefore,  R''_L = R_L / n^2 =")
+pac=(0.5*20^2)/108
+format(7)
+disp("(i) For P_max, V_m = V_CC")
+disp(pac,"Threfore,  (P_ac)_max(in W) = 1/2 * V_CC^2/R''_L =")
+disp("But  eta_trans = 78.5%")
+pl=0.785*1.8518
+disp(pl,"Therefore,  P_L(in W) = eta_trans * (P_ac)_max =")
+vm=(2*20)/%pi
+format(8)
+disp(vm,"(ii) Condition for (P_d)_max is V_m(in V) = 2*V_CC/pi =")
+pd=(2*20^2)/(108*%pi^2)
+format(7)
+disp(pd,"Therefore,  (P_d)_max(in W) = 2*V_CC^2 / pi^2*R''_L =")
+pdm=0.7505/2
+disp(pdm,"Therefore,  (P_d)_max(in W) per transistor =")
+disp("(iii) (P_ac)_max = V_rms * I_rms = V_m/sqrt(2) * I_m/sqrt(2) = V_m*I_m / 2  and  V_m = V_CC")
+disp("Therefore,  1.8518 = 20*I_m / 2")
+im=(2*1.8518)/20
+disp(im,"Therefore,  I_m(in A) = (I_c)_max =")
+ibm=(0.1851/25)*10^3
+disp(ibm,"and  (i_b)_max(in mA) = (i_c))max / h_fe =")