summaryrefslogtreecommitdiff
path: root/1892/CH1/EX1.48/Example1_48.sce
diff options
context:
space:
mode:
Diffstat (limited to '1892/CH1/EX1.48/Example1_48.sce')
-rwxr-xr-x1892/CH1/EX1.48/Example1_48.sce27
1 files changed, 27 insertions, 0 deletions
diff --git a/1892/CH1/EX1.48/Example1_48.sce b/1892/CH1/EX1.48/Example1_48.sce
new file mode 100755
index 000000000..609af93a8
--- /dev/null
+++ b/1892/CH1/EX1.48/Example1_48.sce
@@ -0,0 +1,27 @@
+// Example 1.48
+
+clear; clc; close;
+
+format('v',6);
+// Given data
+P=16;//no. of poles
+PM=4;//no. of poles of modulating function
+n=1;//assumed
+r=4;//assumed
+f=50;//in Hz
+
+//Calculations
+check=n/r==1/3*(1-PM/P);
+if check then
+ disp("Equation is satisfied with -ve sign.");
+ P2=P+PM;
+
+end
+check=n/r==1/3*(1+PM/P);
+if check then
+ disp("Equation is satisfied with +ve sign.")
+ P2=P-PM;
+end
+Ns1=120*f/P;//in rpm
+Ns2=120*f/P2;//in rpm
+disp(Ns2,Ns1,"Two speeds(in rpm) are : ");