diff options
Diffstat (limited to '1319/CH8/EX8.2/8_2.sce')
| -rw-r--r-- | 1319/CH8/EX8.2/8_2.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/1319/CH8/EX8.2/8_2.sce b/1319/CH8/EX8.2/8_2.sce new file mode 100644 index 000000000..5011b1189 --- /dev/null +++ b/1319/CH8/EX8.2/8_2.sce @@ -0,0 +1,19 @@ +//To calculate motor speed and its slip
+
+clc;
+clear;
+
+f=50;
+sf=3/2;
+s=sf/f;
+
+p=8;
+N=120*f/8;
+
+Nr=poly([0 1],'Nr','c'); // Actual Speed Variable
+
+x=(750*s)-(750-Nr); // Equation To find the Actual Speed
+
+Nr=roots(x); // Actual Speed Constant
+
+printf('The motor runs at a speed of %g rpm and has a slip of %g \n',ceil(Nr),s)
|