blob: 481ba6eb07f36a407c074a216ec362136473b394 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
//Book Name:Fundamentals of Electrical Engineering
//Author:Rajendra Prasad
//Publisher: PHI Learning Private Limited
//Edition:Third ,2014
//Ex7_2.sce.
clc;
clear;
Np=1000; //number of Primary turns
Ns=200; //number of secondary turns
Io=3; //No load current in A
cos_phi_not=0.2; //lagging
Is=250; //secondary current in A
cos_phi_s=0.8; //lagging
Is_dash=Ns*Is/Np;
phi_s=(acosd(0.8));
phi_not=(acosd(0.2));
Ip_cos_phi_p=(Is_dash*cos_phi_s)+(Io*cos_phi_not);
Ip_sin_phi_p=(Is_dash*(sind(phi_s)))+(Io*(sind(phi_not)));
Ip=sqrt((Ip_cos_phi_p)^2+(Ip_sin_phi_p)^2);
printf("\n Primary current=%2.2f A\n",Ip)
phi_p=atand((Ip_sin_phi_p)/(Ip_cos_phi_p));
printf("\n Power factor=%1.3f lagging",cosd(phi_p))
|
