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 /1964/CH3 | |
| 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 '1964/CH3')
| -rwxr-xr-x | 1964/CH3/EX3.1/ex3_1.sce | 23 | ||||
| -rwxr-xr-x | 1964/CH3/EX3.10/ex3_10.sce | 24 | ||||
| -rwxr-xr-x | 1964/CH3/EX3.2/ex3_2.sce | 21 | ||||
| -rwxr-xr-x | 1964/CH3/EX3.3/ex3_3.sce | 22 | ||||
| -rwxr-xr-x | 1964/CH3/EX3.4/ex3_4.sce | 22 | ||||
| -rwxr-xr-x | 1964/CH3/EX3.5/ex3_5.sce | 22 | ||||
| -rwxr-xr-x | 1964/CH3/EX3.6/ex3_6.sce | 27 | ||||
| -rwxr-xr-x | 1964/CH3/EX3.7/ex3_7.sce | 18 | ||||
| -rwxr-xr-x | 1964/CH3/EX3.8/ex3_8.sce | 25 | ||||
| -rwxr-xr-x | 1964/CH3/EX3.9/ex3_9.sce | 20 |
10 files changed, 224 insertions, 0 deletions
diff --git a/1964/CH3/EX3.1/ex3_1.sce b/1964/CH3/EX3.1/ex3_1.sce new file mode 100755 index 000000000..55873e68a --- /dev/null +++ b/1964/CH3/EX3.1/ex3_1.sce @@ -0,0 +1,23 @@ +//Chapter-3, Example 3.1, Page 109
+//=============================================================================
+clc;
+clear;
+//INPUT DATA
+P=4;//no of poles
+N1=500;//no of turns per pole
+phi=0.02;//magnetic flux in wb/pole
+t=0.02;//time in sec
+rphi=0.002;//residual flux in wb/pole
+
+//CALCULATIONS
+N=P*N1;//total no of turns
+di=P*phi;//total initial flux in wb
+dR=P*rphi;//total residual flux in wb
+dphi=di-dR;//change in flux in wb
+dt=0.02;//time of opening the circuit in sec
+E=N*(dphi/dt);//induced emf in volts
+//OUTPUT
+mprintf("Thus the average voltage that is induced across field terminals is %4.0f volts \n",E);
+mprintf("The direction of this emf is the same as that of the original direction of the exciting current");
+
+//=================================END OF PROGRAM==============================
diff --git a/1964/CH3/EX3.10/ex3_10.sce b/1964/CH3/EX3.10/ex3_10.sce new file mode 100755 index 000000000..a08fb8c31 --- /dev/null +++ b/1964/CH3/EX3.10/ex3_10.sce @@ -0,0 +1,24 @@ +//Chapter-3, Example 3.10, Page 113
+//=============================================================================
+clc
+clear
+//INPUT DATA
+NA=15000;//no of turns in coil A
+IA=6;//current in coil A in Amp(A)
+phiA=0.05*10^-3;//flux in coil A in wb
+NB=12000;//no of turns in coil B
+IB=6;//current in coil B in Amp(A)
+phiB=0.08*10^-3;//flux in coil B in wb
+phiAB=0.55*0.05*10^-3;//mutual flux in wb
+//CALCULATIONS
+LA=phiA*NA/IA;//self inductance of coil A in H
+LB=phiB*NB/IB;//self inductance of coil B in H
+LAB=phiAB*NB/IB;//mutual inductance of coils in H
+K=LAB/sqrt(LA*LB);//coefficient of coupling
+//OUTPUT
+mprintf("Thus the self inductance of coil A is %1.3f H\n",LA);
+mprintf("Thus the self inductance of coil B is %1.2f H \n",LB);
+mprintf("Thus the mutual inductance of coils is %1.3f H \n",LAB);
+mprintf("Thus the coefficient of coupling is %1.3f \n",K)
+
+//=================================END OF PROGRAM==============================
diff --git a/1964/CH3/EX3.2/ex3_2.sce b/1964/CH3/EX3.2/ex3_2.sce new file mode 100755 index 000000000..12f036dd7 --- /dev/null +++ b/1964/CH3/EX3.2/ex3_2.sce @@ -0,0 +1,21 @@ +//Chapter-3, Example 3.2, Page 109
+//=============================================================================
+clc
+clear
+
+//INPUT DATA
+R=150;//Resistance of the coil in ohms
+phi1=0.1;//magnetic flux in milli webers
+N=500;//no of turns
+Rgal=450;//resistance of galvanometer in ohms
+dt=0.1;//time in sec required to move coil from given field(m) to another field (m2)
+phi2=0.3;//magnetic flux of new field in milli webers
+//CALCULATIONS
+dphi=phi2-phi1;//change of flux in milli webers
+E=N*(dphi/dt)*10^-3;//average induced emf in volts(V)
+I=E/(R+Rgal);//average induced current in coil in amperes(A)
+
+//OUTPUT
+mprintf('Average induced emf and current are %1.0f V and %1.4f A',E,I);
+
+//=================================END OF PROGRAM==============================
diff --git a/1964/CH3/EX3.3/ex3_3.sce b/1964/CH3/EX3.3/ex3_3.sce new file mode 100755 index 000000000..d7bb5a4fc --- /dev/null +++ b/1964/CH3/EX3.3/ex3_3.sce @@ -0,0 +1,22 @@ +//Chapter-3, Example 3.3, Page 110
+//=============================================================================
+clc
+clear
+
+//INPUT DATA
+l=0.1;//conductor length (10 cm)=(0.1 m)
+I=60;//current in amperes (A)
+H=1000;//magnetic field strength in ampere/metre (A/m)
+v=1;//conductor speed in metre/second(m/s)
+u0=4*%pi*10^-7;//permeability in free space in henry/m
+//CALCULATIONS
+B=u0*1000;//magnetic flux density in (wb/m^2)
+F=B*I*l;//force in Newtons(N)
+P=F*v;//power in watt
+E=B*l*v;//emf induced in conductor
+//OUTPUT
+mprintf("The force acting on conductor %1.4f N \n",F);
+mprintf("The mechanical power to move this conductor is %1.4f watt \n",P);
+mprintf("The induced emf in conductor is %1.5f V \n",E);
+
+//=================================END OF PROGRAM==============================
diff --git a/1964/CH3/EX3.4/ex3_4.sce b/1964/CH3/EX3.4/ex3_4.sce new file mode 100755 index 000000000..33a962bfc --- /dev/null +++ b/1964/CH3/EX3.4/ex3_4.sce @@ -0,0 +1,22 @@ +//Chapter-3, Example 3.4, Page 110
+//=============================================================================
+clc
+clear
+
+//INPUT DATA
+l=0.3;//mean length of toroidal coil in meters (30cm=0.3m)
+N=480;//no of turns of coil
+a=5*10^-4;//cross sectional area in metres (1 cm^2=10^-4 m^2)
+I=4;//current in amps
+dt=60*10^-3;//time in sec
+u0=4*%pi*10^-7;//permeability in free space in henry/m
+ur=1;//relative permeability for air
+//CALCULATIONS
+L=(u0*ur*a*N*N)/(l);//inductance of coli in henry
+di=I-(-I);//change in current in amps
+E=L*(di/dt);//average induced emf
+//OUTPUT
+mprintf('The inductance of the coil is %1.6f H \n',L)
+mprintf('average induced emf is %1.3f V \n',E)
+
+//=================================END OF PROGRAM==============================
diff --git a/1964/CH3/EX3.5/ex3_5.sce b/1964/CH3/EX3.5/ex3_5.sce new file mode 100755 index 000000000..3a423c557 --- /dev/null +++ b/1964/CH3/EX3.5/ex3_5.sce @@ -0,0 +1,22 @@ +//Chapter-3, Example 3.5, Page 111
+
+//=============================================================================
+clc
+clear
+//INPUT DATA
+L1=0.25;//self inductance of coil in henry(H)
+N1=500;//no of turns of coil 1
+N2=10500;//no of turns of coil 2
+phi2=0.6*L1;//60 % of flux of first coil(m1) is linked with second coil(m2)
+z=100;//rate of change of current(dii/dt) in A/sec
+
+//CALCULATIONS
+x=L1/N1;//flux/ampere in first coil(phi1/I1)
+y=0.6*(x);//flux linking the second coil(phi2/I1)
+M=N2*(y);//mutual inductance between the two coils in H
+E=M*(z);//induced emf in V
+//OUTPUT
+mprintf("Thus the mutual inductance between two coils is %1.2f H \n",M);
+mprintf("The induced emf in second coil when current changes in first coil is %3.0f V \n",E);
+
+//=================================END OF PROGRAM==============================
diff --git a/1964/CH3/EX3.6/ex3_6.sce b/1964/CH3/EX3.6/ex3_6.sce new file mode 100755 index 000000000..0b5e998a6 --- /dev/null +++ b/1964/CH3/EX3.6/ex3_6.sce @@ -0,0 +1,27 @@ +//Chapter-3, Example 3.6, Page 111
+//=============================================================================
+clc
+clear
+//INPUT DATA
+N1=250;//no of turns in a coil
+I1=2;//current in coil in A
+phi1=0.3;//flux in coil in wb
+dt=2//time in millisec
+Em2=63.75//induced voltage in V
+K=0.75
+//CALCULATIONS
+L1=N1*(phi1/I1);//self inductance of first coil in H
+M=Em2*(dt/I1);//mutual inductance of two coils in H
+L2=((Em2/K)^2)/(L1);//self inductance of second coil in H
+phi2=K*phi1;//flux in second coil in wb
+N2=(Em2*dt)/phi2;//no of turns in second coil
+//OUTPUT
+mprintf("Thus the self inductance of first coil is %2.1f mH \n",L1);
+mprintf("mutual inductance of two coils %2.2f mH \n",M);
+mprintf("self inductance of second coil %4.0f mH \n",L2);
+mprintf("no of turns in second coil %3.0f turns \n",N2);
+//note:the answer given for N2 in textbook is wrong .please check the calculations
+
+//=================================END OF PROGRAM==============================
+
+
diff --git a/1964/CH3/EX3.7/ex3_7.sce b/1964/CH3/EX3.7/ex3_7.sce new file mode 100755 index 000000000..7454d4dcb --- /dev/null +++ b/1964/CH3/EX3.7/ex3_7.sce @@ -0,0 +1,18 @@ +//Chapter-3, Example 3.7, Page 112
+//=============================================================================
+clc
+clear
+//INPUT DATA
+l=1;//length of wire in m
+v=50;//velocity in m/sec
+B=1;//magnetic flux density in wb/m^2
+theta1=90;//the angle of conductor in degrees to the field in case 1
+theta2=30;//the angle of conductor in degrees to the field in case 2
+//CALCULATIONS
+E1=B*l*v*sin (theta1*%pi/180);//emf induced in conductor in case 1(1degree =3.14/180 radians)
+E2=B*l*v*sin ((360+theta2)*%pi/180);//emf induced in conductor in case 2(1degree =3.14/180 radians)
+//OUTPUT
+mprintf("Thus the emf induced in case 1 is %2.0f volts \n",E1);
+mprintf("Thus the emf induced in case 2 is %2.0f volts \n",E2);
+//note:convert angle in degrees to radians and compute it.
+//=================================END OF PROGRAM==============================
diff --git a/1964/CH3/EX3.8/ex3_8.sce b/1964/CH3/EX3.8/ex3_8.sce new file mode 100755 index 000000000..b189e507d --- /dev/null +++ b/1964/CH3/EX3.8/ex3_8.sce @@ -0,0 +1,25 @@ +//Chapter-3, Example 3.8, Page 112
+//=============================================================================
+clc
+clear
+//INPUT DATA
+N=1000;//no of turns in a coil
+a=10*10^-4;//crossectional area in m^2
+i1=4.2;//current in A in case 1
+i2=9.2;//current in A in case 2
+B1=1;//flux density in wb/m^2 when current is i1
+B2=1.42;//flux density in wb/m^2 when current is
+dt=0.05;//time in sec where current reduces from 9.2A to 4.2A
+//CALCULATIONS
+db=(B2-B1)//difference in flux densities
+di=(i2-i1);//difference in currents
+di1=(i1-i2);//difference in currents
+L=N*a*(db)/di;//average inductance between the limits in H
+E=-(L*di1/dt);//emf induced
+//OUTPUT
+mprintf("Thus the average inductance between the limits is %1.3f H \n",L);
+mprintf("emf induced is %1.1f volts\n",E);
+
+//=================================END OF PROGRAM==============================
+
+
diff --git a/1964/CH3/EX3.9/ex3_9.sce b/1964/CH3/EX3.9/ex3_9.sce new file mode 100755 index 000000000..359a4ff13 --- /dev/null +++ b/1964/CH3/EX3.9/ex3_9.sce @@ -0,0 +1,20 @@ +//Chapter-3, Example 3.9, Page 113
+//=============================================================================
+clc
+clear
+//INPUT DATA
+N1=1600;//no of turns of solenoid
+l=0.5;//length of wire of solenoid in m
+N2=600;//no of turns of second coil
+a=18*10^-4;//area of second coil in m^2
+u0=4*%pi*10^-7;//permeability in free space
+z=300;//rate of change of current(di1/dt) in A/sec
+//CALCULATIONS
+B=(u0*N1)/(l);//flux density in solenoid
+M=(B*a*N2);//mutual inductance in mH
+E=M*(z);//voltage induced
+//OUTPUT
+mprintf("Thus the mutual inductance is %f H \n",M);
+mprintf("Thus the voltage induced is %f V \n",E);
+//note:answer given for voltage in text book is wrong.please check the calculations
+//=================================END OF PROGRAM==============================
|