summaryrefslogtreecommitdiff
path: root/1094/CH2/EX2.3.1/EX2_3_1.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /1094/CH2/EX2.3.1/EX2_3_1.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '1094/CH2/EX2.3.1/EX2_3_1.sce')
-rw-r--r--1094/CH2/EX2.3.1/EX2_3_1.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/1094/CH2/EX2.3.1/EX2_3_1.sce b/1094/CH2/EX2.3.1/EX2_3_1.sce
new file mode 100644
index 000000000..0c95af852
--- /dev/null
+++ b/1094/CH2/EX2.3.1/EX2_3_1.sce
@@ -0,0 +1,17 @@
+//Exa:2.3.1
+clc;
+clear;
+close;
+V_AB=100*sqrt(3) //phase voltage of AB(in volts)
+V_AN=100*(cosd(-30)+%i*sind(-30)) //line voltage of A(in volts)
+V_BC=100*sqrt(3)*(cosd(-120)+%i*sind(-120)) //phase voltage of BC(in volts)
+V_CN=100*(cosd(90)+%i*sind(90)) //line voltage of C(in volts)
+Z_ph=10+%i*10 //impedence per phase(in ohms)
+I_A=V_AN/Z_ph
+I_C=V_CN/Z_ph
+W_A=V_AB*abs(I_A)*cosd(atand(imag(I_A)/real(I_A)))
+disp(W_A,'W_A(in W)=')
+W_C=abs(V_BC)*abs(I_C)*cosd((atand(imag(I_C)/real(I_C)))-atand(imag(V_BC)/real(V_BC)))
+disp(W_C,'W_B(in W)=')
+P=W_A+W_C
+disp(P,'total power(in W)=') \ No newline at end of file