1 files changed, 17 insertions, 0 deletions
diff --git a/1628/CH16/EX16.13/Ex16_13.sce b/1628/CH16/EX16.13/Ex16_13.sce
new file mode 100755
index 000000000..c88550cd3
--- /dev/null
+++ b/1628/CH16/EX16.13/Ex16_13.sce
@@ -0,0 +1,17 @@
+
+                // Examle 16.13
+
+At=900;                  // Speed of motor
+V=460;                   // Supply voltage
+kQ=V/At;                 // Orignal Flux 
+disp(' Orignal Flux = '+string(kQ));
+
+V1=200;                  // Chenged Supply voltage
+N=V1/(0.7*kQ);           // Speed of Motor When Supply (200 V)
+disp(' Speed of Motor When Supply (200 V) = '+string(round(N))+' rpm');
+
+
+
+
+
+              //  p 649     16.13
+\ No newline at end of file