1 files changed, 12 insertions, 0 deletions
diff --git a/620/CH17/EX17.6/example17_6.sce b/620/CH17/EX17.6/example17_6.sce
new file mode 100644
index 000000000..e119251c2
--- /dev/null
+++ b/620/CH17/EX17.6/example17_6.sce
@@ -0,0 +1,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);
+\ No newline at end of file