summaryrefslogtreecommitdiff
path: root/3775/CH3
diff options
context:
space:
mode:
Diffstat (limited to '3775/CH3')
-rw-r--r--3775/CH3/EX3.1/Ex3_1.sce20
-rw-r--r--3775/CH3/EX3.10/Ex3_10.sce15
-rw-r--r--3775/CH3/EX3.11/Ex3_11.sce30
-rw-r--r--3775/CH3/EX3.12/Ex3_12.sce16
-rw-r--r--3775/CH3/EX3.13/Ex3_13.sce29
-rw-r--r--3775/CH3/EX3.14/Ex3_14.sce22
-rw-r--r--3775/CH3/EX3.15/Ex3_15.sce17
-rw-r--r--3775/CH3/EX3.16/Ex3_16.sce24
-rw-r--r--3775/CH3/EX3.17/Ex3_17.sce23
-rw-r--r--3775/CH3/EX3.2/Ex3_2.sce17
-rw-r--r--3775/CH3/EX3.3/Ex3_3.sce41
-rw-r--r--3775/CH3/EX3.4/Ex3_4.sce23
-rw-r--r--3775/CH3/EX3.5/Ex3_5.sce22
-rw-r--r--3775/CH3/EX3.6/Ex3_6.sce16
-rw-r--r--3775/CH3/EX3.7/Ex3_7.sce21
-rw-r--r--3775/CH3/EX3.8/Ex3_8.sce19
-rw-r--r--3775/CH3/EX3.9/Ex3_9.sce16
17 files changed, 371 insertions, 0 deletions
diff --git a/3775/CH3/EX3.1/Ex3_1.sce b/3775/CH3/EX3.1/Ex3_1.sce
new file mode 100644
index 000000000..a019e6bf9
--- /dev/null
+++ b/3775/CH3/EX3.1/Ex3_1.sce
@@ -0,0 +1,20 @@
+//Ex 3.1 page 117
+
+clc;
+clear;
+close;
+
+R=100;// ohm
+Vs=230;// V
+f=50;// Hz
+alpha=45;// degree
+
+Vo=Vs*sqrt(2)/2/%pi*(1+cosd(alpha));// V
+Io=Vo/R;// A
+printf('Average current = %.4f A',Io)
+Vor=Vs/sqrt(2)*sqrt(1/180*((180-alpha)+sind(2*alpha)/2));// V
+Ior=Vor/R;// A
+P=Ior**2*R;// W
+printf('\n Power delivered = %.2f W',P)
+
+//Ans in the textbook is not accurate.
diff --git a/3775/CH3/EX3.10/Ex3_10.sce b/3775/CH3/EX3.10/Ex3_10.sce
new file mode 100644
index 000000000..ee08c1c16
--- /dev/null
+++ b/3775/CH3/EX3.10/Ex3_10.sce
@@ -0,0 +1,15 @@
+//Ex 3.10 page 124
+
+clc;
+clear;
+close;
+
+R=2;// ohm
+Vs=230;// V
+f=50;// Hz
+alpha = 120;// degree
+Ia=10;// A
+
+Vo=2*sqrt(2)*Vs*cos(alpha*%pi/180)/%pi
+V=Ia*R-Vo;// V
+printf('emf on load side = %.2f V', V)
diff --git a/3775/CH3/EX3.11/Ex3_11.sce b/3775/CH3/EX3.11/Ex3_11.sce
new file mode 100644
index 000000000..84a4ec0d9
--- /dev/null
+++ b/3775/CH3/EX3.11/Ex3_11.sce
@@ -0,0 +1,30 @@
+//Ex 3.11 page 125
+
+clc;
+clear;
+close;
+
+Vs=230;// V
+Io=5;// A
+alpha = 45;// degree
+printf('part(i)')
+Vo=2*sqrt(2)*Vs/%pi*cos(alpha*%pi/180);// V
+printf('\n dc output voltage = %.1f V',Vo)
+Pi=Vo*Io;// W
+printf('\n Active power = %.1f W',Pi)
+Qi=2*sqrt(2)*Vs/%pi*sin(alpha*%pi/180)*Io;// VAR
+printf('\n Reactive power = %.1f VAR',Qi)
+printf('\n\n part(ii)')
+R=Vo/Io;// ohm
+Vo=sqrt(2)*Vs/%pi*(1+cos(alpha*%pi/180));// V
+printf('\n dc output voltage = %.1f V',Vo)
+Io=Vo/R;// A
+Pi=Vo*Io;// W
+printf('\n Active power = %.1f W',Pi)
+Qi=sqrt(2)*Vs/%pi*sin(alpha*%pi/180)*Io;// VAR
+printf('\n Reactive power = %.0f VAR',Qi)
+printf('\n\n part(iii)')
+Vo=sqrt(2)*Vs/%pi/2*(1+cos(alpha*%pi/180));//
+printf('\n Average load voltage = %.0f V',Vo)
+Io=Vo/R;// A
+printf('\n Average load current = %.2f A',Io)
diff --git a/3775/CH3/EX3.12/Ex3_12.sce b/3775/CH3/EX3.12/Ex3_12.sce
new file mode 100644
index 000000000..5b4acf18a
--- /dev/null
+++ b/3775/CH3/EX3.12/Ex3_12.sce
@@ -0,0 +1,16 @@
+//Ex 3.12 page 126
+
+clc;
+clear;
+close;
+
+R=20;// ohm
+Vs=400;// V
+f=50;// Hz
+alpha = 30;// degree
+
+Vm=Vs*sqrt(2);// V
+Vo=3*Vm/%pi*cos(alpha*%pi/180);// V
+Io=Vo/R;// A
+printf('\n Average load voltage = %.3f V',Vo)
+printf('\n Average load current = %.3f A',Io)
diff --git a/3775/CH3/EX3.13/Ex3_13.sce b/3775/CH3/EX3.13/Ex3_13.sce
new file mode 100644
index 000000000..0e8ffe356
--- /dev/null
+++ b/3775/CH3/EX3.13/Ex3_13.sce
@@ -0,0 +1,29 @@
+//Ex 3.13 page 126
+
+clc;
+clear;
+close;
+
+n=3;// no. of phase
+Vs=400;// V
+f=50;// Hz
+Io=100;// A
+alpha = 60;// degree
+
+Vm=Vs*sqrt(2);// V
+Vo=n*Vm/%pi*cos(alpha*%pi/180);// V
+Po=Vo*Io;// W
+printf(' (i)')
+printf('\n Output voltage = %.0f V',Vo)
+printf('\n Output power = %.0f W',Po)
+printf('\n\n (ii)')
+Iav=Io*2*%pi/3/2/%pi;// A
+printf('\n average current through thyristor = %.2f A', Iav)
+Ior=sqrt(Io**2*2*%pi/3/2/%pi);// A
+printf('\n rms current through thyristor = %.2f A', Ior)
+Ip=Io;//A
+printf('\n peak current through thyristor = %.2f A', Ip)
+printf('\n\n (iii)')
+PIV=sqrt(2)*Vs;//V
+printf('\n PIV of thyristor = %.1f V',PIV)
+// Ans in the book is not accurate.
diff --git a/3775/CH3/EX3.14/Ex3_14.sce b/3775/CH3/EX3.14/Ex3_14.sce
new file mode 100644
index 000000000..5083948a6
--- /dev/null
+++ b/3775/CH3/EX3.14/Ex3_14.sce
@@ -0,0 +1,22 @@
+//Ex 3.14 page 127
+
+clc;
+clear;
+close;
+
+n=3;// no. of phase
+R=60;// ohm
+Vs=400;// V
+alpha = 30;// degree
+
+Vm=Vs*sqrt(2);// V
+Vo=3*Vm/%pi*cos(alpha*%pi/180);// V
+Io=Vo/R;// A
+Is=Io*sqrt(2/3);// A
+P=Io**2*R;// W
+pf=P/sqrt(3)/Vs/Is;// power factor
+
+printf('\n Average load voltage = %.3f V',Vo)
+printf('\n Average load current = %.1f A',Io)
+printf('\n input power factor = %.4f',pf)
+// Note : Ans in the textbook is wrong as in calculation for pf Io is used in place of Is
diff --git a/3775/CH3/EX3.15/Ex3_15.sce b/3775/CH3/EX3.15/Ex3_15.sce
new file mode 100644
index 000000000..67dfdc114
--- /dev/null
+++ b/3775/CH3/EX3.15/Ex3_15.sce
@@ -0,0 +1,17 @@
+//Ex 3.15 page 127
+
+clc;
+clear;
+close;
+
+n=3;// no. of phase
+R=50;// ohm
+Vs=400;// V
+f=50;// Hz
+alpha = 45;// degree
+
+Vm=Vs*sqrt(2);// V
+Vo=3*Vm/2/%pi*(1+cos(alpha*%pi/180));// V
+Io=Vo/R;// A
+printf('\n Average load voltage = %.2f V',Vo)
+printf('\n Average load current = %.2f A',Io)
diff --git a/3775/CH3/EX3.16/Ex3_16.sce b/3775/CH3/EX3.16/Ex3_16.sce
new file mode 100644
index 000000000..c90eeaf75
--- /dev/null
+++ b/3775/CH3/EX3.16/Ex3_16.sce
@@ -0,0 +1,24 @@
+//Ex 3.16 page 128
+
+clc;
+clear;
+close;
+
+n=3;// no. of phase
+Vs=400;// V
+f=50;// Hz
+Ls=5/1000;// H
+Io=20;// A
+Ri=1;// ohm
+Vdc=400;// V
+
+Vo=Vdc+Io*Ri;// V
+// Vo=3*Vm/%pi*cos(alpha*%pi/180)-3*2*%pi*f*Ls/%pi*Io
+Vm=sqrt(2)*Vs;// V
+alpha=acos((Vo+3*2*%pi*f*Ls/%pi*Io)/(3*Vm/%pi))*180/%pi;// degree
+
+// Vo=3*Vm/%pi*cos((alpha+mu)*%pi/180)-3*2*%pi*f*Ls/%pi*Io
+mu=acos((Vo-3*2*%pi*f*Ls/%pi*Io)/(3*Vm/%pi))*180/%pi-alpha;// degree
+printf('\n Firing angle = %.2f degree',alpha)
+printf('\n Overlap angle = %.2f degree',mu)
+// ans in the textbook is not accurate.
diff --git a/3775/CH3/EX3.17/Ex3_17.sce b/3775/CH3/EX3.17/Ex3_17.sce
new file mode 100644
index 000000000..8986a5e79
--- /dev/null
+++ b/3775/CH3/EX3.17/Ex3_17.sce
@@ -0,0 +1,23 @@
+//Ex 3.17 page 128
+
+clc;
+clear;
+close;
+
+
+n=3;// no. of phase
+Vs=400;// V
+f=50;// Hz
+alpha = %pi/4;// radian
+Io=10;// A
+Vo=360;// V
+
+// Vo=n*Vs*sqrt(2)/%pi/sqrt(2)-3*2*%pi*f*Ls*Io/%pi
+Ls=(n*Vs*sqrt(2)/%pi/sqrt(2)-Vo)/(3*2*%pi*f)/(Io/%pi)*1000;// mH
+R=Vo/Io;// ohm
+printf(' Load resistance = %.f ohm',R)
+printf('\n Source inductance = %.1f mH',Ls)
+// Vo = n*Vs*sqrt(2)/%pi*cos(alpha+mu)+3*2*%pi*f*Ls*Io/%pi
+mu=acos((Vo-3*2*%pi*f*Ls/1000*Io/%pi)/(n*Vs*sqrt(2)/%pi))-alpha;// radian
+mu=mu*180/%pi;// degree
+printf('\n Overlap angle = %.d degree',mu)
diff --git a/3775/CH3/EX3.2/Ex3_2.sce b/3775/CH3/EX3.2/Ex3_2.sce
new file mode 100644
index 000000000..c276b4c9f
--- /dev/null
+++ b/3775/CH3/EX3.2/Ex3_2.sce
@@ -0,0 +1,17 @@
+//Ex 3.2 page 118
+
+clc;
+clear;
+close;
+
+R=10;// ohm
+E=165;// V
+//vt=330*sin(314*t)
+Vm=330;// V
+f=314/2/%pi;// Hz
+alpha1=asin(E/Vm);// radian
+alpha2=%pi-alpha1;// radian
+Io=1/2/%pi/R*(2*Vm*cos(alpha1)-E*(alpha2-alpha1));// A
+P=E*Io;// W
+
+printf('Power supplied to battery = %d W',P)
diff --git a/3775/CH3/EX3.3/Ex3_3.sce b/3775/CH3/EX3.3/Ex3_3.sce
new file mode 100644
index 000000000..82ba6d895
--- /dev/null
+++ b/3775/CH3/EX3.3/Ex3_3.sce
@@ -0,0 +1,41 @@
+//Ex 3.3 page 119
+
+clc;
+clear;
+close;
+
+//v2t = 325*sin(w*t)
+R=20;// ohm
+alfa=45;// degree
+vm=325;// V
+V=230;// V
+printf('part (a)\n')
+Vo=vm/2/%pi*(1+cosd(alfa)) ;// V
+Io=Vo/R;// A
+printf(' dc voltage Vo = %.1f V',Vo)
+printf('\n & Current Io = %.3f A',Io)
+printf('\n\n part (b)\n')
+Vor=vm/2/sqrt(%pi)*sqrt((%pi-%pi/180*alfa)+1/2*sind(2*alfa));// V
+Ior=Vor/R;// A
+printf(' rms voltage Vor = %.3f V',Vor)
+printf('\n & Current Ior = %.3f A',Ior)
+printf('\n\n part (c)')
+Pdc=Vo*Io;// W
+Pac=Vor*Ior;// W
+eta=Pdc/Pac;// rectification efficiency
+printf("\n dc Power = %.2f W", Pdc)
+printf("\n ac Power = %.2f W", Pac)
+printf("\n Rectification efficiency = %.4f", eta)
+printf('\n\n part (d)')
+FF=Vor/Vo;// form factor
+RF=sqrt(FF**2-1)
+printf('\n Form factor = %.3f ',FF)
+printf('\n Ripple factor = %.3f ',RF)
+printf('\n\n part (e)')
+VA=V*Ior;// VA
+TUF=Pdc/V/Ior;// Transformer Utilization factor
+printf("\n VA rating = %.1f VA", VA)
+printf("\n Transformer Utilization factor = %.4f", TUF)
+printf('\n\n part (f)')
+Vp=vm;// V
+printf("\n Peak inverse voltage = %d V",Vp)
diff --git a/3775/CH3/EX3.4/Ex3_4.sce b/3775/CH3/EX3.4/Ex3_4.sce
new file mode 100644
index 000000000..e057de355
--- /dev/null
+++ b/3775/CH3/EX3.4/Ex3_4.sce
@@ -0,0 +1,23 @@
+//Ex 3.4 page 120
+
+clc;
+clear;
+close;
+
+R=10;// ohm
+E=165;// V
+//vt=330*sin(314*t)
+Vm=330;// V
+Vs=233;// V
+f=314/2/%pi;// Hz
+theta1=asin(E/Vm);// radian
+//alpha2=%pi-alpha1;// radian
+Io=1/2/%pi/R*(2*Vm*cos(theta1)-E*(%pi-2*theta1));// A
+printf('(a) Average value of current = %.2f A',Io)
+P=E*Io;// W
+printf('\n (b) Power supplied to battery = %d W',P)
+Ior=sqrt(1/2/%pi/R**2*((%pi-2*theta1)*(Vs**2+E**2)+Vm**2*sin(2*theta1)-4*Vm*E*cos(theta1)));// A
+Pr=Ior**2*R;// W
+printf('\n (c) Power dissipated in the resistor = %.2f W',Pr)
+pf=(Pr+P)/Vs/Ior;// power factor
+printf('\n (d) Power factor = %.4f',pf)
diff --git a/3775/CH3/EX3.5/Ex3_5.sce b/3775/CH3/EX3.5/Ex3_5.sce
new file mode 100644
index 000000000..754f6a2c0
--- /dev/null
+++ b/3775/CH3/EX3.5/Ex3_5.sce
@@ -0,0 +1,22 @@
+//Ex 3.5 page 122
+
+clc;
+clear;
+close;
+
+R=20;// ohm
+V=230;// V
+f=50;// Hz
+alpha=30;// degree
+Vm=V*sqrt(2);//V
+Vo=Vm/%pi*(1+cos(alpha*%pi/180));// V
+printf('Average load voltage = %.1f V',Vo)
+Io=Vo/R;// A
+printf('\n Average load current = %.2f A', Io)
+Vor=V/sqrt(%pi)*sqrt((%pi-alpha*%pi/180)+sin(2*alpha*%pi/180)/2);// V
+Ior=Vor/R;// A
+printf('\n rms load current = %.2f A', Ior)
+Iav=Io/2;//A
+printf('\n Average thyristor current = %.2f A', Iav)
+Irms=Ior/sqrt(2);// A
+printf('\n rms thyristor current = %.3f A', Irms)
diff --git a/3775/CH3/EX3.6/Ex3_6.sce b/3775/CH3/EX3.6/Ex3_6.sce
new file mode 100644
index 000000000..ed56e8cbd
--- /dev/null
+++ b/3775/CH3/EX3.6/Ex3_6.sce
@@ -0,0 +1,16 @@
+//Ex 3.6 page 122
+
+clc;
+clear;
+close;
+
+R=10;// ohm
+L=100/1000;// H
+E=100;// V
+Vs=230;// V
+f=50;// Hz
+alpha = 45;// degree
+Vm=Vs*sqrt(2);// V
+Vo=2*Vm/%pi*cos(alpha*%pi/180);// V
+Io=(Vo-E)/R;// A
+printf('Average load current = %.3f A',Io)
diff --git a/3775/CH3/EX3.7/Ex3_7.sce b/3775/CH3/EX3.7/Ex3_7.sce
new file mode 100644
index 000000000..09f9bcb2d
--- /dev/null
+++ b/3775/CH3/EX3.7/Ex3_7.sce
@@ -0,0 +1,21 @@
+//Ex 3.7 page 123
+
+clc;
+clear;
+close;
+
+R=2;// ohm
+L=0.3;// H
+E=100;// V
+Vs=230;// V
+f=50;// Hz
+alpha = 30;// degree
+Vm=Vs*sqrt(2);// V
+Vo=2*Vm/%pi*cos(alpha*%pi/180);// V
+printf(' Average load voltage = %.2f V', Vo)
+Io=(Vo)/R;// A
+printf('\n Average load current = %.2f A', Io)
+Is=Io;// A
+Is1=4*Io/%pi/sqrt(2);// A
+PF=Vo*Io/Vs/Is;// power factor
+printf('\n Power factor = %.4f',PF)
diff --git a/3775/CH3/EX3.8/Ex3_8.sce b/3775/CH3/EX3.8/Ex3_8.sce
new file mode 100644
index 000000000..fea42e53b
--- /dev/null
+++ b/3775/CH3/EX3.8/Ex3_8.sce
@@ -0,0 +1,19 @@
+//Ex 3.8 page 123
+
+clc;
+clear;
+close;
+
+R=5;// ohm
+L=1;// H
+E=10;// V
+Vs=230;// V
+f=50;// Hz
+alpha = 45;// degree
+Vm=Vs*sqrt(2);// V
+Vo=Vm/%pi*(1+cos(alpha*%pi/180));// V
+printf(' Average load voltage = %.2f V', Vo)
+Io=(Vo-E)/R;// A
+printf('\n Average load current = %.2f A', Io)
+PF=(Io**2*R+E*Io)/Vs/Io;// power factor
+printf('\n Power factor = %.4f',PF)
diff --git a/3775/CH3/EX3.9/Ex3_9.sce b/3775/CH3/EX3.9/Ex3_9.sce
new file mode 100644
index 000000000..52c125ab1
--- /dev/null
+++ b/3775/CH3/EX3.9/Ex3_9.sce
@@ -0,0 +1,16 @@
+//Ex 3.9 page 124
+
+clc;
+clear;
+close;
+
+R=50;// ohm
+Vs=230;// V
+f=50;// Hz
+alpha = 30;// degree
+Vm=Vs*sqrt(2);// V
+Vo=2*Vm/%pi*cos(alpha*%pi/180);// V
+printf(' (i) Average voltage across 50 ohm resistor = %.2f V', Vo)
+Io=(Vo)/R;// A
+Ior=Io/sqrt(2);// A
+printf('\n (ii) rms current = %.4f A', Ior)
generated by cgit (git 2.34.1) at 2024-12-19 12:41:04 +0000