1 files changed, 7 insertions, 0 deletions
diff --git a/1529/CH7/EX7.2/7_02.sce b/1529/CH7/EX7.2/7_02.sce
new file mode 100755
index 000000000..cb4513916
--- /dev/null
+++ b/1529/CH7/EX7.2/7_02.sce
@@ -0,0 +1,7 @@
+//Chapter 1, Problem 2
+clc;
+phi=353*10^-3;              //Flux
+B=1.8;                      //Flux density
+A=phi/B;                    //Area of pole face
+r=sqrt(A/%pi);              //Radius
+printf("The radius of the pole face = %f mm",r*1000);