summaryrefslogtreecommitdiff
path: root/3311/CH6/EX6.14/Ex6_14.sce
diff options
context:
space:
mode:
Diffstat (limited to '3311/CH6/EX6.14/Ex6_14.sce')
-rwxr-xr-x3311/CH6/EX6.14/Ex6_14.sce23
1 files changed, 23 insertions, 0 deletions
diff --git a/3311/CH6/EX6.14/Ex6_14.sce b/3311/CH6/EX6.14/Ex6_14.sce
new file mode 100755
index 000000000..a3b94307b
--- /dev/null
+++ b/3311/CH6/EX6.14/Ex6_14.sce
@@ -0,0 +1,23 @@
+// chapter 6
+// example 6.14
+// Calculate thyristor current ratings
+// page-321
+clear;
+clc;
+// given
+E_line=415; // in V (voltage line supply) The value is used in the solution but not mentioned
+R_L=10; // in ohm
+alpha=30; // in degree (firing angle)
+// calculate
+Em=E_line*sqrt(2/3); // calculation of peak value of voltage
+Edc=(3*sqrt(3)/(2*%pi))*Em*cosd(alpha); // calculation of average load voltage
+Idc=Edc/R_L; // calculation of average load current
+I_T_rms=Idc/sqrt(3); // calculation of thyristor rms current
+I_T_dc=Idc/3; // calculation of thyristor average load current
+I_T_peak=Idc; // calculation of thyristor peak current
+PIV=E_line*sqrt(2); // calculation of thyristor peak inverse voltage
+printf("\nThe average load current \t\t Idc=%.1f A",Idc);
+printf("\nThe thyristor average load current is \t I_T_dc=%.1f A",I_T_dc);
+printf("\nThe thyristor rms current is \t\t I_T_rms=%.1f A",I_T_rms);
+printf("\nThe thyristor peak current is \t\t I_T_peak=%.1f A",I_T_peak);
+printf("\nThe thyristor peak inverse voltage is \t PIV=%.1f V",PIV); \ No newline at end of file