diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /1544/CH5 | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '1544/CH5')
30 files changed, 481 insertions, 0 deletions
diff --git a/1544/CH5/EX5.1/Ch05Ex1.sce b/1544/CH5/EX5.1/Ch05Ex1.sce new file mode 100755 index 000000000..4e0419f27 --- /dev/null +++ b/1544/CH5/EX5.1/Ch05Ex1.sce @@ -0,0 +1,10 @@ +// Scilab code Ex5.1: Pg 145 (2008)
+clc; clear;
+N = 100; // Number of turns
+delta_phi = 10e-03; // Flux linked with coil, Wb
+delta_t = 2e-03; // Time during which flux changes, s
+e =((-N)*delta_phi)/delta_t; // Average induced emf, V
+printf("\nThe average emf induced in the coi = %3d V", e);
+
+// Result
+// The average emf induced in the coi = -500 V
diff --git a/1544/CH5/EX5.10/Ch05Ex10.sce b/1544/CH5/EX5.10/Ch05Ex10.sce new file mode 100755 index 000000000..d0e1aeb1d --- /dev/null +++ b/1544/CH5/EX5.10/Ch05Ex10.sce @@ -0,0 +1,14 @@ +// Scilab code Ex5.10: Pg 155 (2008)
+clc; clear;
+N = 80; // Number of turns
+l = 0.02; // Length of coil, m
+r = 0.012; // Radius of coil, m
+I = 45e-06; // Current in coil, A
+T = 1.4e-06; // Torque exerted on coil, Nm
+A = l*r; // Cross-sectional area of coil, m^2
+// Since T = 2*B*I*l*r, solving for B
+B = T/(2*A*N*I); // Flux density, T
+printf("\nThe flux density produced by the pole pieces = %4.2f T", B);
+
+// Result
+// The flux density produced by the pole pieces = 0.81 T
diff --git a/1544/CH5/EX5.11/Ch05Ex11.sce b/1544/CH5/EX5.11/Ch05Ex11.sce new file mode 100755 index 000000000..de488e075 --- /dev/null +++ b/1544/CH5/EX5.11/Ch05Ex11.sce @@ -0,0 +1,10 @@ +// Scilab code Ex5.11: Pg 158 (2008)
+clc; clear;
+d = 0.035; // Distance between two parallel conductors, m
+I_1 = 50; // Electric current in first coil, A
+I_2 = 40; // Electric current in second coil, A
+F = ((2e-07)*I_1*I_2)/d; // Force exerted by conductors, N
+printf("\nThe force exerted between the conductors = %4.1f mN", F/1e-03);
+
+// Result
+// The force exerted between the conductors = 11.4 mN
diff --git a/1544/CH5/EX5.12/Ch05Ex12.sce b/1544/CH5/EX5.12/Ch05Ex12.sce new file mode 100755 index 000000000..a1f18599c --- /dev/null +++ b/1544/CH5/EX5.12/Ch05Ex12.sce @@ -0,0 +1,14 @@ +// Scilab code Ex5.12: Pg 158 (2008)
+clc; clear;
+d = 2; // Distance between two parallel conductors, m
+I_1 = 1000; // Electric current in first coil, A
+I_2 = 300; // Electric current in second coil, A
+mew_o = 4*(%pi)*1e-07; // Permeability for free space
+B = (mew_o*I_1)/d; // Flux density due to first coil, T
+F = ((2e-07)*I_1*I_2)/d; // Force exerted by conductors, N
+printf("\nThe flux density at a distance of %1d m from the centre of a conductor carrying a current of %4d A = %5.3f mT", d, I_1, B/1e-03);
+printf("\nForce exerted by conductors = %2d mN", F/1e-03);
+
+// Result
+// The flux density at a distance of 2 m from the centre of a conductor carrying a current of 1000 A = 0.628 mT
+// Force exerted by conductors = 30 mN
diff --git a/1544/CH5/EX5.13/Ch05Ex13.sce b/1544/CH5/EX5.13/Ch05Ex13.sce new file mode 100755 index 000000000..1b2698c76 --- /dev/null +++ b/1544/CH5/EX5.13/Ch05Ex13.sce @@ -0,0 +1,14 @@ +// Scilab code Ex5.13: Pg 163 (2008)
+clc; clear;
+R_c = 40; // Resistance of coil, ohm
+I_fsd = 5e-04; // Full-scale deflection current, A
+I = 3; // Current reading, A
+V_c = I_fsd*R_c; // Potential difference, V
+// Since I = I_s + I_fsd, solving for I_s
+I_s = I-I_fsd; // Shunt current, A
+// From Ohm's law, V_c = I_s*R_s, solving for R_s
+R_s = V_c/I_s; // Shunt resistance, ohm
+printf("\nThe value of required shunt resistance = %4.2f milli-ohm", R_s/1e-03);
+
+// Result
+// The value of required shunt resistance = 6.67 milli-ohm
diff --git a/1544/CH5/EX5.14/Ch05Ex14.sce b/1544/CH5/EX5.14/Ch05Ex14.sce new file mode 100755 index 000000000..efca23da3 --- /dev/null +++ b/1544/CH5/EX5.14/Ch05Ex14.sce @@ -0,0 +1,15 @@ +// Scilab code Ex5.14: Pg 163-164 (2008)
+clc; clear;
+R_c = 40; // Resistance of coil, ohm
+I_fsd = 5e-04; // Full-scale deflection current, A
+I_fsd = 5e-04; // Full-scale deflection current, A
+V = 10; // Voltage reading range, V
+V_c = 0.02; // Potential difference across coil resistance, V
+// From Ohm's law, V = I_fsd*R, solving for R
+R = V/I_fsd; // Total resistance, ohm
+// Since R = R_m + R_c, solving R_m
+R_m = R - R_c; // Multiplier resistance, ohm
+printf("\nThe required value of multiplier resistance = %5.2f kilo-ohms", R_m*1e-03);
+
+// Result
+// The required value of multiplier resistance = 19.96 kilo-ohms
diff --git a/1544/CH5/EX5.15/Ch05Ex15.sce b/1544/CH5/EX5.15/Ch05Ex15.sce new file mode 100755 index 000000000..db954f825 --- /dev/null +++ b/1544/CH5/EX5.15/Ch05Ex15.sce @@ -0,0 +1,24 @@ +// Scilab code Ex5.15: Pg 164-165 (2008)
+clc; clear;
+R_c = 1500; // Coil resistance, ohm
+I_fsd = 75e-06; // Full-scale deflection current, A
+I = 5; // Current range, A
+V = 10; // Voltage range, V
+// Part (a)
+// Using Ohm's law,
+V_c = I_fsd*R_c; // Potential difference across coil resistance, V
+// Since I = I_s + I_fsd, solving for I_s
+I_s = I-I_fsd; // Shunt current, A
+// From Ohm's law, V_c = I_s*R_s, solving for R_s
+R_s = V_c/I_s; // Shunt resistance, ohm
+// Part (b)
+// Since = V = V_m + V_c, solving for V_m
+V_m = V - V_c; // Potential difference across multiplier resistance, V
+// From Ohm's law, V_m = I_fsd*R_m, solving for R_m
+R_m = V_m/I_fsd // Multiplier resistance, ohm
+printf("\nThe required value of shunt resistance = %4.1f mega-ohm", R_s/1e-03);
+printf("\nThe required value of multiplier resistance = %4.1f mega-ohm", R_m*1e-03);
+
+// Result
+// The required value of shunt resistance = 22.5 mega-ohm
+// The required value of multiplier resistance = 131.83 mega-ohm
diff --git a/1544/CH5/EX5.16/Ch05Ex16.sce b/1544/CH5/EX5.16/Ch05Ex16.sce new file mode 100755 index 000000000..d7e79ed3b --- /dev/null +++ b/1544/CH5/EX5.16/Ch05Ex16.sce @@ -0,0 +1,21 @@ +// Scilab code Ex5.16: Pg 166 (2008)
+clc; clear;
+R_1 = 30; // Resistance, ohm
+R_2 = 70; // Resistance, ohm
+R_in = 200; // Internal resistance of meter, ohm
+V = 12; // Supply voltage, V
+// Using voltage divider rule, we have
+V_2t = (R_2 /(R_1 + R_2))*V // True value of p.d across resistance R_2, V
+// Since the rsistances R_2 and R-in are parallel, so their equivalent resistance is given their parallel combination
+R_BC = (R_2 * R_in)/(R_2 + R_in); // Resistance, ohms
+// Using the potential divider technique,
+V_2i = (R_BC / ( R_BC + R_1 ))*V // Indicated value of p.d across by voltmetre, volts
+err = (( V_2i-V_2t ) / V_2t)*100 // Percentage error in the reading
+printf("\nThe p.d. indicated by the meter = %3.1f V", V_2i);
+printf("\nThe percentage error in the reading = %4.2f percent", err);
+
+
+// Result
+// The p.d. indicated by the meter = 7.6 V
+// The percentage error in the reading = -9.50 percent
+
diff --git a/1544/CH5/EX5.17/Ch05Ex17.sce b/1544/CH5/EX5.17/Ch05Ex17.sce new file mode 100755 index 000000000..2495c390d --- /dev/null +++ b/1544/CH5/EX5.17/Ch05Ex17.sce @@ -0,0 +1,30 @@ +// Scilab code Ex5.17: Pg 168-169 (2008)
+clc; clear;
+R_in = 200; // Internal resistance of meter, kilo-ohms
+V = 10; // Supply voltage, volts
+R_1 = 10; // Resistance, kilo-ohms
+R_2 = 47; // Resistance, kilo-ohms
+V_1 = R_1/(R_1+R_2)*V // P.d across resistance R_1, V
+V_2 = R_2/(R_1+R_2)*V // P.d across resistance R_2, V
+// Part (a)
+R_AB = (R_1 * R_in)/(R_1 + R_in); // Resistance, kilo-ohms
+V_AB = (R_AB / ( R_AB + R_2 ))*V // True value of p.d across by voltmetre, V
+R_BC = (R_2 * R_in)/(R_2 + R_in); // Resistance, kilo-ohms
+V_BC = (R_BC / ( R_BC + R_1 ))*V // Indicated value of p.d across by voltmetre, V
+// Part (b)
+// Error for V_1 measurement
+error_AB = (V_AB - V_1)/V_1*100 // Percentage error in the reading
+//Error for V_2 measurement
+error_BC = (V_BC-V_2)/V_2*100 // Percentage error in the reading
+printf("\nThe p.d. indicated by the meter across first resistor = %4.2f V", V_AB);
+printf("\nThe p.d. indicated by the meter across second resistor = %4.2f V", V_BC);
+printf("\nPercentage error for V_1 measurement = %4.2f percent", error_AB);
+printf("\nPercentage error for V_2 measurement = %4.2f percent", error_BC);
+
+// Result
+// The p.d. indicated by the meter across first resistor = 1.68 V
+// The p.d. indicated by the meter across second resistor = 7.92 V
+// Percentage error for V_1 measurement = -3.96 percent
+// Percentage error for V_2 measurement = -3.96 percent
+
+
diff --git a/1544/CH5/EX5.18/Ch05Ex18.sce b/1544/CH5/EX5.18/Ch05Ex18.sce new file mode 100755 index 000000000..322f6ca67 --- /dev/null +++ b/1544/CH5/EX5.18/Ch05Ex18.sce @@ -0,0 +1,10 @@ +// Scilab code Ex5.18: Pg 176 (2008)
+clc; clear;
+L = 0.25; // Self-inductance, H
+delta_I = 250e-03; // Change in current, A
+delta_t = 25e-03; // Time, s
+e = ((-L)*delta_I)/(delta_t); // Induced emf, V
+printf("\nThe value of emf induced = %3.1f V", e);
+
+// Result
+// The value of emf induced = 2.5 V
diff --git a/1544/CH5/EX5.19/Ch05Ex19.sce b/1544/CH5/EX5.19/Ch05Ex19.sce new file mode 100755 index 000000000..8ad1a1c57 --- /dev/null +++ b/1544/CH5/EX5.19/Ch05Ex19.sce @@ -0,0 +1,11 @@ +// Scilab code Ex5.19: Pg 176 (2008)
+clc; clear;
+e = 30; // Induced emf, V
+// For simplicity, let rate of change of current i.e delta_I/delta_t = k
+k = 200; // Rate of change of current, ampere-second
+// Since e = ((-L)*delta_I)/(delta_t), solving for L
+L = e/k; // Self-inductance, H
+printf("\nThe inductance of the circuit = %4.2f H", L);
+
+// Result
+// The inductance of the circuit = 0.15 H
diff --git a/1544/CH5/EX5.2/Ch05Ex2.sce b/1544/CH5/EX5.2/Ch05Ex2.sce new file mode 100755 index 000000000..3032ab498 --- /dev/null +++ b/1544/CH5/EX5.2/Ch05Ex2.sce @@ -0,0 +1,19 @@ +// Scilab code Ex5.2: Pg 146 (2008)
+clc; clear;
+N = 250; // Number of turns
+delta_phi1 = 20e-03; // Flux linked with coil, Wb
+delta_phi2 = -16e-03; // Flux linked with coil, Wb
+delta_t1 = 0.05; // Time, s
+delta_t2 = 0.01; // Time, s
+e_1 =((-N)*delta_phi1)/delta_t1; // Average induced emf, V
+e_2 =((-N)*delta_phi2)/delta_t2; // Average induced emf, V
+printf("\nChange in flux in first case = %4.2f weber", delta_phi1);
+printf("\nEmf induced in first case = %3d volts",e_1);
+printf("\nChange in flux in second case = %4.2f weber", delta_phi2);
+printf("\nEmf induced in second case = %3d volts", e_2);
+
+// Result
+// Change in flux in first case = 0.02 Wb
+// Emf induced in first case = -100 V
+// Change in flux in second case = -0.02 Wb
+// Emf induced in second case = 400 V
diff --git a/1544/CH5/EX5.20/Ch05Ex20.sce b/1544/CH5/EX5.20/Ch05Ex20.sce new file mode 100755 index 000000000..400f77abf --- /dev/null +++ b/1544/CH5/EX5.20/Ch05Ex20.sce @@ -0,0 +1,10 @@ +// Scilab code Ex5.20: Pg 176 (2008)
+clc; clear;
+L = 50e-03; // Self-inductance, H
+e = 8; // Induced emf, V
+// Since e = ((-L)*delta_I)/(delta_t), solving for delta_I/delta_t,and for simplicity letting the rate of change of current i.e delta_I/delta_t = k
+k = e/L; // Rate of change of current, As
+printf("\nThe rate of change of current = %3d A/s",k);
+
+// Result
+// The rate of change of current = 160 A/s
diff --git a/1544/CH5/EX5.21/Ch05Ex21.sce b/1544/CH5/EX5.21/Ch05Ex21.sce new file mode 100755 index 000000000..291d350eb --- /dev/null +++ b/1544/CH5/EX5.21/Ch05Ex21.sce @@ -0,0 +1,17 @@ +// Scilab code Ex5.21: Pg 178 (2008)
+clc; clear;
+N = 150; // Number of turns in a coil
+I = 10; // Electric current flowing through coil, A
+phi = 0.10; // Flux, Wb
+delta_t = 0.1; // Time, s
+// Part (a)
+L = (N * phi)/I // Self-inductance, H
+delta_I = 20; // Change in current, A
+// Part (b)
+e = abs((-L*delta_I)/(delta_t)); // Induced emf, V
+printf("\nThe inductance of the coi = %3.1f H", L);
+printf("\nThe emf induced in the coil = %2d V", e);
+
+// Result
+// The inductance of the coi = 1.5 H
+// The emf induced in the coil = 300 V
diff --git a/1544/CH5/EX5.22/Ch05Ex22.sce b/1544/CH5/EX5.22/Ch05Ex22.sce new file mode 100755 index 000000000..23a77ba9c --- /dev/null +++ b/1544/CH5/EX5.22/Ch05Ex22.sce @@ -0,0 +1,14 @@ +// Scilab code Ex5.22: Pg 178 (2008)
+clc; clear;
+I_1 = 8; // Electric current, A
+I_2 = 2; // Electric current, A
+N = 3000; // Number of turns in a coil
+phi_1 = 4e-03; // Flux, Wb
+delta_t = 0.1; // Reversal time of current, s
+L = (N * phi_1)/I_1; // Self-inductance, H
+delta_I = I_1 - I_2; // Change in current, A
+e = ((L)*delta_I)/(delta_t); // Induced emf, V
+printf("\nThe emf induced in the coil = %2d volts", e);
+
+// Result
+// The emf induced in the coil = 90 V
diff --git a/1544/CH5/EX5.23/Ch05Ex23.sce b/1544/CH5/EX5.23/Ch05Ex23.sce new file mode 100755 index 000000000..ca690d4d8 --- /dev/null +++ b/1544/CH5/EX5.23/Ch05Ex23.sce @@ -0,0 +1,27 @@ +// Scilab code Ex5.23: Pg 179-180 (2008)
+clc; clear;
+N_1 = 600; // Number of turns in a coil in first case
+N_2 = 900; // Number of turns in a coil in secnd case
+N_3 = 900; // Number of turns in a coil in third case
+l = 45e-03; // Effective length of coil, m
+A = 4e-04; // Cross-sectional area of coil, m^2
+mew_o = 4*(%pi)*1e-07; // Pemeability for free space
+mew_r1 = 1; // Relative permeability in first case
+mew_r2 = 1; // Relative permeability in second case
+// Part (a)
+mew_r3 = 75; // Relative permeability in third case
+L_1 = (mew_o*mew_r1*(N_1^2)*A)/l; // Self-inductance of coil in first case, H
+// Part (b)
+// Since self-inductance of a coil is directly proportional to the number of turns in a coil, therefore, we have L_2/L_1 = (N_2^2)/(N_1^2), solving for L_2
+L_2 = (L_1*(N_2^2))/(N_1^2); // Self-inductance of coil in second case, H
+// Part (c)
+// Since mew_r3 = 75*mew_r2, keeping all other quantities same we have
+L_3 = mew_r3*L_2; // Self-inductance of coil in third case, H
+printf("\nSelf-inductance of coil in first case = %4.2f mH",L_1/1e-03);
+printf("\nSelf-inductance of coil in second case = %5.3f mH", L_2/1e-03);
+printf("\nSelf-inductance of coil in third case = %5.3f H", L_3);
+
+// Result
+// Self-inductance of coil in first case = 4.02 mH
+// Self-inductance of coil in second case = 9.048 mH
+// Self-inductance of coil in third case = 0.679 H
diff --git a/1544/CH5/EX5.24/Ch05Ex24.sce b/1544/CH5/EX5.24/Ch05Ex24.sce new file mode 100755 index 000000000..c71498b3c --- /dev/null +++ b/1544/CH5/EX5.24/Ch05Ex24.sce @@ -0,0 +1,17 @@ +// Scilab code Ex5.24: SPg 182 (2008)
+clc; clear;
+N_A = 2000; // Number of turns in a coil A
+N_B = 1500; // Number of turns in a coil B
+I_A = 0.5; // Electric current in coil A, A
+phi_A = 60e-06; // Flux linked with coil A, Wb
+// Part (a)
+L_A = (N_A*phi_A)/I_A; // Self-inductance of coil A
+phi_B = 0.83*(60e-06); // Flux linked with coil B, Wb
+// Part (b)
+M = (N_B*phi_B)/I_A; // Mutual inductance of the two coils, H
+printf("\nSelf-inductance of coil A = %4.2f H", L_A)
+printf("\nMutual inductance of the two coils = %5.3f H", M)
+
+// Result
+// Self-inductance of coil A = 0.24 H
+// Mutual inductance of the two coils = 0.149 H
diff --git a/1544/CH5/EX5.25/Ch05Ex25.sce b/1544/CH5/EX5.25/Ch05Ex25.sce new file mode 100755 index 000000000..008551ea4 --- /dev/null +++ b/1544/CH5/EX5.25/Ch05Ex25.sce @@ -0,0 +1,12 @@ +// Scilab code Ex5.25: Pg 183 (2008)
+clc; clear;
+N = 400; // Number of turns in a coil
+l = 0.25; // Effective length of coil, m
+A = 4.5e-04; // Cross-sectional area, m^2
+mew_r = 180; // Relative permeability
+mew_o = 4*(%pi)*1e-07; // Pemeability for free space
+L = (mew_o*mew_r*(N^2)*A)/l // Self-inductance of coil, H
+printf("\nThe self inductance of the coil = %2d milli-henry", L/1e-03);
+
+// Result
+// The self inductance of the coil = 65 mH
diff --git a/1544/CH5/EX5.26/Ch05Ex26.sce b/1544/CH5/EX5.26/Ch05Ex26.sce new file mode 100755 index 000000000..3742dd95c --- /dev/null +++ b/1544/CH5/EX5.26/Ch05Ex26.sce @@ -0,0 +1,27 @@ +// Scilab code Ex5.26: Pg 183 (2008)
+clc; clear;
+L_1 = 65e-03; // Self-inductance of first coil, H
+delta_I = 1.5; // Change in current, A
+delta_t = 3e-03; // Time, s
+k = 0.95; // 95 percent of flux produced
+N_1 = 400; // Number of turns in a coil A
+N_2 = 650; // Number of turns in a coil B
+// Part (a)
+// Since self-inductance of a coil is directly proportional to the number of turns in a coil, therefore, we have L_2/L_1 = (N_2^2)/(N_1^2), solving for L_2
+L_2 = (L_1*(N_2^2))/(N_1^2) // Self-inductance of second coil , H
+// Part (b)
+M = k*sqrt(L_1*L_2); // Mutual inductance of two coils, H
+// Part (c)
+e_1 = ((L_1)*delta_I)/(delta_t); // Induced emf in first coil, V
+// Part (d)
+e_2 = (M*delta_I)/delta_t; // Induced emf in second coil, V
+printf("\nThe self-inductance of coil 2 = %3d mH", L_2/1e-03)
+printf("\nThe value of mutual inductance = %3d mH", M/1e-03)
+printf("\nThe self-induced emf in coil 1 = %4.1f V", e_1)
+printf("\nThe mutually induced emf in coil 2 = %2d V", e_2)
+
+// Result
+// The self-inductance of coil 2 = 171 mH
+// The value of mutual inductance = 100 mH
+// The self-induced emf in coil 1 = 32.5 V
+// The mutually induced emf in coil 2 = 50 V
diff --git a/1544/CH5/EX5.27/Ch05Ex27.sce b/1544/CH5/EX5.27/Ch05Ex27.sce new file mode 100755 index 000000000..6064c6746 --- /dev/null +++ b/1544/CH5/EX5.27/Ch05Ex27.sce @@ -0,0 +1,9 @@ +// Scilab code Ex5.27: Pg 185 (2008)
+clc; clear;
+L = 50e-03; // Self-inductance of coil, H
+I = 0.75; // Electric current in coil, A
+W = (L*(I^2))/2 // Energy stored, J
+printf("\nEnergy stored in the inductor = %4.1f mJ", W/1e-03)
+
+// Result
+// Energy stored in the inductor = 14.1 mJ
diff --git a/1544/CH5/EX5.28/Ch05Ex28.sce b/1544/CH5/EX5.28/Ch05Ex28.sce new file mode 100755 index 000000000..111698cd4 --- /dev/null +++ b/1544/CH5/EX5.28/Ch05Ex28.sce @@ -0,0 +1,24 @@ +// Scilab code Ex5.28: Pg 185-186 (2008)
+clc; clear;
+L_1 = 25e-03; // Self-inductance of first coil, H
+L_2 = 40e-03; // Self-inductance of second coil, H
+I = 0.25; // Electric current in coils, A
+k =0.8; // Coupling coefficient
+// Part (a)
+W_1 = (L_1*(I^2))/2; // Energy stored in first coil, J
+W_2 = (L_2*(I^2))/2; // Energy stored in second coil, J
+M = k*sqrt(L_1*L_2); // Mutual inductance of coils
+// Part (b)
+W_M = M*(I)*(I); // Energy stored due to mutual inductance of coils, J
+W_sa = W_1 + W_2 + W_M; // Energy stored by two inductors when connected in series aiding, J
+W_so = W_1 + W_2 - W_M; // Energy stored by two inductors when connected in series opposition, J
+printf("\nEnergy stored in first coil = %4.2f mJ", W_1/1e-03)
+printf("\nEnergy stored in second coil = %4.2f mJ", W_2/1e-03)
+printf("\nEnergy stored by two inductors when connected in series aiding = %3.1f mJ", W_sa/1e-03)
+printf("\nEnergy stored by two inductors when connected in series opposition = %4.2f mJ", W_so/1e-03)
+
+// Result
+// Energy stored in first coil = 0.78 mJ
+// Energy stored in second coil = 1.25 mJ
+// Energy stored by two inductors when connected in series aiding = 3.6 mJ
+// Energy stored by two inductors when connected in series opposition = 0.45 mJ
diff --git a/1544/CH5/EX5.29/Ch05Ex29.sce b/1544/CH5/EX5.29/Ch05Ex29.sce new file mode 100755 index 000000000..56b839718 --- /dev/null +++ b/1544/CH5/EX5.29/Ch05Ex29.sce @@ -0,0 +1,17 @@ +// Scilab code Ex5.29: Pg 189 (2008)
+clc; clear;
+V_2 = 60; // Output voltage, V
+V_1 = 240; // Input voltage, V
+N_2 = 500; // Secondary turns
+// Part (a)
+// For simplicity let V_1/V_2 = N_1/N_2 = k
+k = V_1/V_2 // Turns ratio
+// Part (b)
+// Since V_1/V_2 = N_1/N_2, solving for N_1
+N_1 = k*N_2; // Primary turns
+printf("\nThe required turns ratio = %1d:1", k)
+printf("\nThe number of primary turns = %4d", N_1)
+
+// Result
+// The required turns ratio = 4:1
+// The number of primary turns = 2000
diff --git a/1544/CH5/EX5.3/Ch05Ex3.sce b/1544/CH5/EX5.3/Ch05Ex3.sce new file mode 100755 index 000000000..e3162a2d7 --- /dev/null +++ b/1544/CH5/EX5.3/Ch05Ex3.sce @@ -0,0 +1,11 @@ +// Scilab code Ex5.3: Pg 147 (2008)
+clc; clear;
+e = 100; // Induced emf, V
+// For simplification let (delta_phi)/(delta_t) = k
+k = 0.1; // Rate of chage of flux linked with coil, Wb/s
+// Since e =((-N)*delta_phi)/delta_t, soling for N
+N = (e)/k; // Number of turns
+printf("\nThe number of turns on the coil = %4d", N);
+
+// Result
+// The number of turns on the coil = 1000
diff --git a/1544/CH5/EX5.30/Ch05Ex30.sce b/1544/CH5/EX5.30/Ch05Ex30.sce new file mode 100755 index 000000000..b444ecdce --- /dev/null +++ b/1544/CH5/EX5.30/Ch05Ex30.sce @@ -0,0 +1,23 @@ +// Scilab code Ex5.28: Pg 189 (2008)
+clc; clear;
+R_L = 15; // Load resistor, ohms
+V_2 = 240; // Terminal p.d at secondary, V
+V_1 = 600; // Supply voltage, V
+// Part (a)
+// Since V_1/V_2 = N_1/N_2 = k
+k = V_1/V_2; // Turns ratio
+// Part (b)
+I_2 = V_2/R_L; // Current drawn by the load, A
+P_2 = V_2*I_2; // Power drawn by the load, W
+// Part (c)
+I_1 = P_2/V_1 // Current drawn from the supply, A
+printf("\nThe transformer turns ratio = %3.1f:1", k);
+printf("\nThe current drawn by the load = %2d A",I_2);
+printf("\nThe power drawn by the load = %4.2f W", P_2*1e-03);
+printf("\nThe current drawn from the supply = %3.1f A", I_1);
+
+// Result
+// The transformer turns ratio = 2.5:1
+// The current drawn by the load = 16 A
+// The power drawn by the load = 3.48 W
+// The current drawn from the supply = 6.4 A
diff --git a/1544/CH5/EX5.4/Ch05Ex4.sce b/1544/CH5/EX5.4/Ch05Ex4.sce new file mode 100755 index 000000000..06a9017ed --- /dev/null +++ b/1544/CH5/EX5.4/Ch05Ex4.sce @@ -0,0 +1,14 @@ +// Scilab code Ex5.4: Pg 149 (2008)
+clc; clear;
+v = 5; // Velocity, m^2
+theta =(%pi/3); // Angle, degrees
+phi = 1.6e-03; // Flux, Wb
+l = 0.1; // Length of pole face, m
+d = 0.4; // Breadth of pole face, m
+A = l*d; // Cross-sectional area of pole face, m^2
+B = phi/ A; // Flux density, T
+e =( B*l*v)*sin(theta); // Induced emf, V
+printf("\nThe emf induced = %5.4f V", e);
+
+// Result
+// The emf induced = 0.0173 V
diff --git a/1544/CH5/EX5.5/Ch05Ex5.sce b/1544/CH5/EX5.5/Ch05Ex5.sce new file mode 100755 index 000000000..088707d18 --- /dev/null +++ b/1544/CH5/EX5.5/Ch05Ex5.sce @@ -0,0 +1,12 @@ +// Scilab code Ex5.5: Pg 149 (2008)
+clc; clear;
+l = 0.15; // Effective length of conductor, m
+v = 8; // Velocity, m^2
+theta = (%pi/180)*55; // Angle, degrees
+e = 25; // Induced emf, V
+// Since e = B*l*v*sin(theta), solving for B
+B = e/(l*v*sin(theta)); // Flux density, T
+printf("\nThe density of the field = %5.3f tesla", B);
+
+// Result
+// The density of the field = 25.433 T
diff --git a/1544/CH5/EX5.6/Ch05Ex6.sce b/1544/CH5/EX5.6/Ch05Ex6.sce new file mode 100755 index 000000000..0bcad0953 --- /dev/null +++ b/1544/CH5/EX5.6/Ch05Ex6.sce @@ -0,0 +1,11 @@ +// Scilab code Ex5.6: Pg 149 (2008)
+clc; clear;
+l = 2.2; // Effective length of conductor, m
+B =38e-06; // Flux density, T
+theta = (%pi/2); // Angle, degrees
+v = 800/36; // Velocity, m^2
+e = B*l*v*sin(theta); // Induced emf, V
+printf("\The emf induced in the axle = %4.2f mV", e/1e-03);
+
+// Result
+// The emf induced in the axle = 1.86 mV
diff --git a/1544/CH5/EX5.7/Ch05Ex7.sce b/1544/CH5/EX5.7/Ch05Ex7.sce new file mode 100755 index 000000000..152488a78 --- /dev/null +++ b/1544/CH5/EX5.7/Ch05Ex7.sce @@ -0,0 +1,12 @@ +// Scilab code Ex5.7:Pg 152 (2008)
+clc; clear;
+l = 0.22; // Effective length of conductor, m
+B = 0.35; // Flux density, T
+I = 3; // Current, A
+theta = (%pi/2); // Angle, degrees
+// Since the force exerted on the conductor placed in magnetic field is directly proportional to the flux density , the value of current flowing through the conductor, and the length of conductor lying inside the field, therefore
+F = B*I*l*sin(theta); // Force, N
+printf("\nThe force exerted on the conductor = %5.3f N", F);
+
+// Result
+// The force exerted on the conductor = 0.231 N
diff --git a/1544/CH5/EX5.8/Ch05Ex8.sce b/1544/CH5/EX5.8/Ch05Ex8.sce new file mode 100755 index 000000000..874dbda79 --- /dev/null +++ b/1544/CH5/EX5.8/Ch05Ex8.sce @@ -0,0 +1,19 @@ +// Scilab code Ex5.8: Current carrying conductor in magnetic field: Pg 153 (2008)
+clc; clear;
+phi = 2.5e-03; // Flux, Wb
+l = 0.05; // Effective length of pole, m
+d = 0.03; // Effective width of pole, m
+F = 1.25; // Force exerted on conductor, N
+A = l*d; // Cross-sectional area of pole face, m^2
+B = phi/A; // Flux density, T
+theta = (%pi/2); // Angle, degrees
+// Since F = B*I*l*sin(theta), solving for I
+I = F/(B*l*sin(theta)); // Current in conductor, A
+theta_2 = (%pi/4); // New angle, degrees
+F_2 = B*I*l*sin(theta_2); // Force exerted on conductor, N
+printf("\nThe value of the current = %2g A", I);
+printf("\nThe force exerted on conductor when placed at 45 degrees to the field = %5.3f newton", F_2);
+
+// Result
+// The value of the current = 14 A
+// The force exerted on conductor when placed at 45 degrees to the field = 0.884 N
diff --git a/1544/CH5/EX5.9/Ch05Ex9.sce b/1544/CH5/EX5.9/Ch05Ex9.sce new file mode 100755 index 000000000..9e0d6073b --- /dev/null +++ b/1544/CH5/EX5.9/Ch05Ex9.sce @@ -0,0 +1,13 @@ +// Scilab code Ex5.9: Pg 154 (2008)
+clc; clear;
+l = 0.015; // Length of coil, m
+d = 0.006; // Width of coil, m
+B = 1.2; // Flux density, T
+I = 1e-02; // Current, a
+r = d/2; // Radius of rotation, m
+// Since torque is given by the product of force and distance, therefore, we have
+T = 2*B*I*l*r; // Torque, Nm
+ printf("\nThe torque exerted on the coil = %4.2f micro-Nm", T/1e-06);
+
+// Result
+// The torque exerted on the coil = 1.08 micro-Nm
|