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/CH12/EX12.12 | |
| parent | d1e070fe2d77c8e7f6ba4b0c57b1b42e26349059 (diff) | |
| download | Scilab-TBC-Uploads-master.tar.gz Scilab-TBC-Uploads-master.tar.bz2 Scilab-TBC-Uploads-master.zip | |
Diffstat (limited to '3871/CH12/EX12.12')
| -rw-r--r-- | 3871/CH12/EX12.12/Ex12_12.sce | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/3871/CH12/EX12.12/Ex12_12.sce b/3871/CH12/EX12.12/Ex12_12.sce new file mode 100644 index 000000000..bf50e6913 --- /dev/null +++ b/3871/CH12/EX12.12/Ex12_12.sce @@ -0,0 +1,28 @@ +//=====================================================================================
+//Chapter 12 example 12
+
+clc;
+clear all;
+
+//variable declaration
+R2 = 834; //resistance of arm in Ω
+R3 = 100; //resistance of arm in Ω
+R4 = 64.9; //resistance of arm in Ω
+R = 0.4; //resistance in Ω
+C4 = 0.1*10^-6; //capacitance in F
+C2 = 0.124*10^-6; //capacitance in F
+f = 2000; //frequency in Hz
+
+//calculations
+L1 = R2*R3*C4; //inductance in H
+R1 = (R3*C4/C2); // resistance in Ω
+Z = R1+(2*%pi*f*L1)*%i; //effective impedance
+Z1 = sqrt(((real(Z))^2)+(((imag(Z))^2)));
+angle = (atan((imag(Z))/real(Z)))*180/%pi;
+
+//result
+mprintf("L1 = %3.2e",L1);
+mprintf("\nR1 = %3.2f",R1);
+mprintf("\neffective impedance of test specimen =%3.2f Ω angle %3.2f °",Z1,angle);
+
+
|