1 files changed, 13 insertions, 0 deletions
diff --git a/3745/CH1/EX1.32/Ex1_32.sce b/3745/CH1/EX1.32/Ex1_32.sce
new file mode 100644
index 000000000..49d2cc5a5
--- /dev/null
+++ b/3745/CH1/EX1.32/Ex1_32.sce
@@ -0,0 +1,13 @@
+// Ex 32 Page 375
+
+clc;clear;close;
+// Given
+L=30;//H
+C=10*10**-6;//F
+RL=8*10**3;//ohm
+f=50;//Hz
+
+r=sqrt(2)/12/(2*%pi*f)**2/L/C*100;//%
+Lc=2*RL/6/(2*%pi*f);//H
+printf("ripple factor = %.1f percent",r)
+printf("\n Critical inductance, Lc=%.1f H",Lc)