diff options
Diffstat (limited to '147/CH13/EX13.6/Example13_6.sce')
| -rw-r--r-- | 147/CH13/EX13.6/Example13_6.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/147/CH13/EX13.6/Example13_6.sce b/147/CH13/EX13.6/Example13_6.sce new file mode 100644 index 000000000..d9db22ba2 --- /dev/null +++ b/147/CH13/EX13.6/Example13_6.sce @@ -0,0 +1,12 @@ +//Input Power Pi, Primary current I1, Primary winding resistance R1
+//Primary terminal voltage V1
+close();
+clear;
+clc;
+Pi = 75;//W
+I1 = 1.5;//A
+V1 = 120;//V
+R1 = 0.4;//ohm
+Pc = Pi - I1^2*R1;
+Pfo = Pi/(V1*I1);
+mprintf('Core loss, Pc = %0.1f W\nNo-load power factor = %0.3f lagging',Pc,Pfo);
\ No newline at end of file |