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/EX3.10/ex3_10.sce | |
| 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/EX3.10/ex3_10.sce')
| -rwxr-xr-x | 1964/CH3/EX3.10/ex3_10.sce | 24 |
1 files changed, 24 insertions, 0 deletions
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==============================
|