diff options
Diffstat (limited to '3835/CH6/EX6.10/Ex6_10.sce')
| -rw-r--r-- | 3835/CH6/EX6.10/Ex6_10.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/3835/CH6/EX6.10/Ex6_10.sce b/3835/CH6/EX6.10/Ex6_10.sce new file mode 100644 index 000000000..3f29ac343 --- /dev/null +++ b/3835/CH6/EX6.10/Ex6_10.sce @@ -0,0 +1,15 @@ +clear +// +//at unity power factor +op=15000 +n=0.98 +i=op/(n) +printf("\n %0.3f ",i) +loss=i-op +printf("\n %0.3f ",loss) +pc=(loss)/2000 //actually division by 2 but value given only to make pc 0.153 instead of 153 +t=pc*24 //iron loss in a day +toteng=20+96+108 //sum of energy outputs +engloss=0.109+1.224+1.632 //sum of energy losses +n=toteng/(engloss+toteng+t) +printf("\n %0.3f ",n) |