initial commit / add all books

11 files changed, 122 insertions, 0 deletions

diff --git a/1049/CH5/EX5.1/ch5_1.sce b/1049/CH5/EX5.1/ch5_1.sce
new file mode 100755
index 000000000..87b1a1f71
--- /dev/null
+++ b/1049/CH5/EX5.1/ch5_1.sce
@@ -0,0 +1,8 @@
+clear;

+clc;

+L=5*10^-3;

+C=20*10^-6;

+V_s=200;

+w_o=sqrt(1/(L*C));

+t_o=%pi/w_o;    printf("conduction time of thyristor=%.5f ms",t_o*1000);

+printf("\nvoltage across thyristor=%.0f V",-V_s);
\ No newline at end of file
diff --git a/1049/CH5/EX5.11/ch5_11.sce b/1049/CH5/EX5.11/ch5_11.sce
new file mode 100755
index 000000000..7fa77ef15
--- /dev/null
+++ b/1049/CH5/EX5.11/ch5_11.sce
@@ -0,0 +1,13 @@
+clear;

+clc;

+L=1;

+R=50;

+V_s=200;

+tau=L/R;

+t=.01;

+i=(V_s/R)*(1-exp(-t/tau));

+Vd=.7;

+t=8*10^-3;

+i1=i-t*Vd;    printf("current through L=%.4f A",i1);

+i_R=0;    //current in R at t=.008s

+printf("\ncurrent through R=%.0f A",i_R);
\ No newline at end of file
diff --git a/1049/CH5/EX5.12/ch5_12.sce b/1049/CH5/EX5.12/ch5_12.sce
new file mode 100755
index 000000000..8cc5769c3
--- /dev/null
+++ b/1049/CH5/EX5.12/ch5_12.sce
@@ -0,0 +1,11 @@
+clc

+clear

+L=1;//H

+R=50;//ohm

+V_s=200;//V

+tau=L/R;

+t=.01;//s

+i=(V_s/R)*(1-exp(-t/tau));    printf("current in R,L=%.3f A",i);

+C=1*10^-6;//F

+V_c=sqrt(L/C)*i;

+printf("\nvoltage across C=%.3f kV",V_c/1000);
\ No newline at end of file
diff --git a/1049/CH5/EX5.2/ch5_2.sce b/1049/CH5/EX5.2/ch5_2.sce
new file mode 100755
index 000000000..9b38eb34d
--- /dev/null
+++ b/1049/CH5/EX5.2/ch5_2.sce
@@ -0,0 +1,13 @@
+clear;

+clc;

+C=20*10^-6;

+L=5*10^-6;

+V_s=230;

+I_p=V_s*sqrt(C/L);

+w_o=sqrt(1/(L*C));

+t_o=%pi/w_o;    printf("conduction time of auxillery thyristor=%.3f us",t_o*10^6);

+I_o=300;

+//a=w_o*(t3-t2)=asind(I_o/(2*V_s));

+a=asind(I_o/(2*V_s));

+V_ab=V_s*cosd(a);    printf("\nvoltage across main thyristor=%.3f V",V_ab);

+t_c=C*V_ab/I_o;    printf("\nckt turn off time=%.3f us",t_c*10^6);
\ No newline at end of file
diff --git a/1049/CH5/EX5.3/ch5_3.sce b/1049/CH5/EX5.3/ch5_3.sce
new file mode 100755
index 000000000..760826ab8
--- /dev/null
+++ b/1049/CH5/EX5.3/ch5_3.sce
@@ -0,0 +1,17 @@
+clear;

+clc;

+V_s=200;

+R1=10;

+R2=100;

+I1=V_s*(1/R1+2/R2);    printf("peak value of current through SCR1=%.0f A",I1);    

+I2=V_s*(2/R1+1/R2);    printf("\npeak value of current through SCR2=%.0f A",I2);

+t_c1=40*10^-6;

+fos=2;    //factor of safety

+C1=t_c1*fos/(R1*log(2));

+C2=t_c1*fos/(R2*log(2));

+if(C1>C2)

+    printf("\nvalue of capacitor=%.4f uF",C1*10^6);

+else

+    printf("\nvalue of capacitor=%.4f uF",C2*10^6);

+end

+    
\ No newline at end of file
diff --git a/1049/CH5/EX5.4/ch5_4.sce b/1049/CH5/EX5.4/ch5_4.sce
new file mode 100755
index 000000000..bb977f1e7
--- /dev/null
+++ b/1049/CH5/EX5.4/ch5_4.sce
@@ -0,0 +1,14 @@
+clear;

+clc;

+V_s=230;

+L=20*10^-6;

+C=40*10^-6;

+I_o=120;

+I_p=V_s*sqrt(C/L);

+printf("current through main thyristor=%.2f A",I_o+I_p);

+printf("\ncurrent through auxillery thyristor=%.0f A",I_o);

+

+t_c=C*V_s/I_o;    printf("\ncircuit turn off time for main thyristor=%.2f us",t_c*10^6);

+w_o=sqrt(1/(L*C));

+t_c1=%pi/(2*w_o);    printf("\ncircuit turn off time for auxillery thyristor=%.2f us",t_c1*10^6);

+   
\ No newline at end of file
diff --git a/1049/CH5/EX5.5/ch5_5.sce b/1049/CH5/EX5.5/ch5_5.sce
new file mode 100755
index 000000000..f744c0392
--- /dev/null
+++ b/1049/CH5/EX5.5/ch5_5.sce
@@ -0,0 +1,7 @@
+clear;

+clc;

+C_j=25*10^-12;

+I_c=5*10^-3;    //charging current

+V_s=200;

+R=50;

+C=(C_j*V_s)/(I_c*R);    printf("Value of C=%.2f uF",C*10^6);

diff --git a/1049/CH5/EX5.6/ch5_6.sce b/1049/CH5/EX5.6/ch5_6.sce
new file mode 100755
index 000000000..4f8bea5c3
--- /dev/null
+++ b/1049/CH5/EX5.6/ch5_6.sce
@@ -0,0 +1,7 @@
+clear;

+clc;

+V_s=200;

+R=5;

+C=10*10^-6;

+//for turn off V_s*(1-2*exp(-t/(R*C)))=0,    so after solving

+t_c=R*C*log(2);    printf("circuit turn off time=%.4f us",t_c*10^6);
\ No newline at end of file
diff --git a/1049/CH5/EX5.7/ch5_7.sce b/1049/CH5/EX5.7/ch5_7.sce
new file mode 100755
index 000000000..3bb02e9c0
--- /dev/null
+++ b/1049/CH5/EX5.7/ch5_7.sce
@@ -0,0 +1,7 @@
+clear;

+clc;

+R=1;

+L=20*10^-6;

+C=40*10^-6;

+w_r=sqrt((1/(L*C))-(R/(2*L))^2);

+t_1=%pi/w_r;    printf("conduction time of thyristor=%.3f us",t_1*10^6);

diff --git a/1049/CH5/EX5.8/ch5_8.sce b/1049/CH5/EX5.8/ch5_8.sce
new file mode 100755
index 000000000..47194b0e9
--- /dev/null
+++ b/1049/CH5/EX5.8/ch5_8.sce
@@ -0,0 +1,12 @@
+clear;

+clc;

+dv=400*10^-6;    //dv=dv_T/dt(V/s)

+V_s=200;

+R=20;

+C=V_s/(R*dv);

+C_j=.025*10^-12;

+C_s=C-C_j;    printf("C_s=%.3f uF",C_s/10^6);

+

+I_T=40;

+R_s=1/((I_T/V_s)-(1/R));    printf("\nR_s=%.3f ohm",R_s);

+//value of R_s in book is wrongly calculated
\ No newline at end of file
diff --git a/1049/CH5/EX5.9/ch5_9.sce b/1049/CH5/EX5.9/ch5_9.sce
new file mode 100755
index 000000000..6b78977c1
--- /dev/null
+++ b/1049/CH5/EX5.9/ch5_9.sce
@@ -0,0 +1,13 @@
+clear;

+clc;

+V_s=200;

+C=20*10^-6;

+L=.2*10^-3;

+i_c=10;

+i=V_s*sqrt(C/L);

+w_o=1/sqrt(L*C);

+t_1=(1/w_o)*asin(i_c/i);    printf("reqd time=%.0f us",t_1*10^6);

+

+t_o=%pi/w_o;

+t_c=t_o-2*t_1;    printf("\nckt turn off time=%.1f us",t_c*10^6);

+//solution in book wrong, as wrong values are selected while filling the formuleas
\ No newline at end of file