summaryrefslogtreecommitdiff
path: root/2384/CH10/EX10.13/ex10_13.sce
blob: e750effb69eb063a4fc788832383efa10c2e31e3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
// Exa 10.13
clc;
clear;
close;
format('v',6)
// Given data
V = 230;// in V
Ra = 0.115;// in ohm
Rsh = 115;// in ohm
I_L = 100;// inA
Ish =V/Rsh;// in A
Ia = I_L + Ish;// in A
Eg = V + (Ia*Ra);// in V
Ia = I_L-Ish;// in A
Eb = V - (Ia*Ra);// in V
// The ratio of speed as a generator to speed as a motor 
NgBYNm = Eg/Eb;
disp(NgBYNm,"The ratio of speed as a generator to speed as a motor is");