1 files changed, 27 insertions, 0 deletions
diff --git a/752/CH1/EX1.8.1/1_8_1.sce b/752/CH1/EX1.8.1/1_8_1.sce
new file mode 100755
index 000000000..557bffb39
--- /dev/null
+++ b/752/CH1/EX1.8.1/1_8_1.sce
@@ -0,0 +1,27 @@
+clc;
+// page no 26
+// prob no 1_8_1
+//High frequency transformer with identical primary and secondary circuits
+Lp=150*10^-6;
+Ls=150*10^-6;
+Cp=470*10^-12;
+Cs=470*10^-12;
+//Lp=Ls=150 uH,Cp=Cs=470 pF
+Q=85//Q-factor for each ckt is 85
+c=0.01//Coeff of coupling is 0.01
+Rl=5000//Load resistance Rl=5000 ohm
+r=75000//Constant current source with internal resistance r=75 kohm
+//Determination of common resonant frequency
+wo=1/((Lp*Cp)^(1/2));
+//disp('Mrad/sec',wo/(10^6),+'The value of common resonant freq is');
+p=3.77*10^6;
+Z2=Rl/(1+(p*%i*Cs*Rl));
+Z1=r/(1+(p*%i*Cp*r));
+// At resonance Zs=Zp=Z
+Z=wo*Ls*(1/Q +%i);
+Zm=%i*p*c*Lp;
+// Determination of denominator
+Dr=((Z+Z1)*(Z+Z2))-(Zm^2)
+// Hence transfer impedance is given as
+Zr= (Z1*Z2*Zm)/Dr;
+disp('ohm',Zr,'The transfer impedance is');
+\ No newline at end of file