diff options
author | prashantsinalkar | 2018-02-03 11:01:52 +0530 |
---|---|---|
committer | prashantsinalkar | 2018-02-03 11:01:52 +0530 |
commit | 7bc77cb1ed33745c720952c92b3b2747c5cbf2df (patch) | |
tree | 449d555969bfd7befe906877abab098c6e63a0e8 /3871/CH6/EX6.29/Ex6_29.sce | |
parent | d1e070fe2d77c8e7f6ba4b0c57b1b42e26349059 (diff) | |
download | Scilab-TBC-Uploads-7bc77cb1ed33745c720952c92b3b2747c5cbf2df.tar.gz Scilab-TBC-Uploads-7bc77cb1ed33745c720952c92b3b2747c5cbf2df.tar.bz2 Scilab-TBC-Uploads-7bc77cb1ed33745c720952c92b3b2747c5cbf2df.zip |
Diffstat (limited to '3871/CH6/EX6.29/Ex6_29.sce')
-rw-r--r-- | 3871/CH6/EX6.29/Ex6_29.sce | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/3871/CH6/EX6.29/Ex6_29.sce b/3871/CH6/EX6.29/Ex6_29.sce new file mode 100644 index 000000000..ef0c21455 --- /dev/null +++ b/3871/CH6/EX6.29/Ex6_29.sce @@ -0,0 +1,33 @@ +//============================================================================
+//Chapter 6 Example 29
+
+
+clc;
+clear all;
+
+//variable declaration
+Vs = 63+0*%i; //secondary terminal voltage in V
+Zs1 = 2+1*%i; //equivalent mpedance referred to prmary in Ω
+Zb = 100+200*%i; //secondary burden in Ω
+KN =60.5;
+
+
+
+//calculations
+KT = 3810/63; //turn ratio
+Ep = KT*Vs; //primary induced emf in V
+Zp1 = (KT^2)*Zs1; //equivalent impedance
+Zs12 = sqrt(((real(Zp1))^2)+((imag(Zp1))^2));
+Is = Vs/Zb; //secondary current in A
+Is1 = sqrt(((real(Is))^2)+((imag(Is))^2));
+Ip = Is/KT; //primary current in A
+Ip1 = sqrt(((real(Ip))^2)+((imag(Ip))^2));
+Vp = Ep+(Ip*Zp1); //applied voltage to primary in V
+Vp1 = sqrt(((real(Vp))^2)+((imag(Vp))^2));
+beta = (atan((imag(Vp))/real(Vp)))*180/%pi; //phase angle error in °
+e = (((KN*Vs)-Vp)/Vp)*100; //ratio error in percentage
+//beta = (atan((imag(Zp1))/real(Zp1)))*180/%pi;
+
+//result
+mprintf("phase angle error = %3.2f °",beta);
+mprintf("ratio error = %3.1f percentage ",e);
|