summaryrefslogtreecommitdiff
path: root/1760/CH2/EX2.102/EX2_102.sce
blob: 56ef079c242144a04a5d9a5152f2c42af8c3d58b (plain)
1
2
3
4
5
6
7
8
                           //EXAMPLE 2-102        PG NO-142
L1=0.3;
L2=0.8;                //INDUCTANCE
K=0.7;
M=K*sqrt(L1*L2);
disp('i)  M (M) is    =  '+string (M) +'  H ');
Lp=[(L1*L2)-M^2]/[L1+L2-(2*M)];
disp('ii)  Lp (Lp) is    =  '+string (Lp) +'  H ');