summaryrefslogtreecommitdiff
path: root/3871/CH12/EX12.24/Ex12_21.sce
blob: b4cc88b06534a6d2554a33f7e84977cae6b251f3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

//=====================================================================================
//Chapter 12 example 21

clc;clear all;

//variable declaration
M1    = 15.9;		//mutual inductance in mH
M2    = 0.1;			//mutual inductance in mH
r1      = 25.9;		//resistance   in  Ω
r2      = 12.63;		//resistance   in  Ω

//calculations
L1     = 2*(M1-M2);		//self inductance in mH
R1    = r1-r2;		//resistance   in  Ω

//result
mprintf("self inductance = %3.2f mH",L1);
mprintf("\nresistance = %3.2f Ω",R1);