blob: 873fdbbd68e15fee091d55cfa3fcf1d0ca65a35b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
close();
clear;
clc;
//from solved example 13.6
V = 120; //V
Pc = 75; //W
Rc = V^2/Pc;
I = 1.5; //A
pf = 0.417;
Im = sqrt(I^2 - (I*pf)^2); //A
Ic = V/Rc; //A
Xm = V/Im; //ohm
mprintf("Rc = %d ohm\nXm = %d ohm",Rc,Xm);
|