1 files changed, 16 insertions, 0 deletions
diff --git a/620/CH19/EX19.9/example19_9.sce b/620/CH19/EX19.9/example19_9.sce
new file mode 100644
index 000000000..ca7336d98
--- /dev/null
+++ b/620/CH19/EX19.9/example19_9.sce
@@ -0,0 +1,16 @@
+vp=12;
+f=2.5*10^3;
+l=20*10^(-3);
+r=500;
+disp("Part a");
+t1=0.1*10^(-3);
+i=vp/r;
+t0=l/r;
+i1=0.008*i;..........//from the curve
+disp("the current (in mA) 0.1ms after the input voltage goes to zero is"); disp(i1*10^3);
+disp("Part b");
+t2=20*10^(-6);
+v1=0.6*vp;
+disp("the voltage (in V) across the coil after the input voltage goes to zero is"); disp(v1);
+disp("Part c");
+disp("Both i and vl are approximately zero after 0.2 ms");
+\ No newline at end of file