summaryrefslogtreecommitdiff
path: root/620/CH17/EX17.6/example17_6.sce
blob: e119251c225363ef96a6feac2bc8c9106794184e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
k=0.8;
l1=5;
l2=8;
disp("Part a");
m=k*sqrt(l1*l2);
disp("the mutual inductance (in H) between the two coils is"); disp(m);
disp("Part b");
lmax=l1+l2+2*m;
disp("the maximum inductance (in H) is"); disp(lmax);
disp("Part c");
lmin=l1+l2-2*m;
disp("the minimum inductance (in H) is"); disp(lmin);