Troct.m
上传用户:eighthdate
上传日期:2014-05-24
资源大小:270k
文件大小:1k
源码类别:

其他行业

开发平台:

Matlab

  1. % This function computes the transformer shunt branch from
  2. % open-circuit test data.
  3. %
  4. % Copyright (C) 1998 by H. Saadat.
  5. function [Rc, Xm] = troct(Vo, Io, Po)
  6. if exist('Vo') ~= 1
  7. Vo = input(' Enter input voltage in volts, Vo = '); else, end
  8. if exist('Io') ~= 1
  9. Io = input(' Enter no-load current in Amp, Io = '); else, end
  10. if exist('Po') ~= 1
  11. Po = input(' Enter no-load power in Watt, Po = '); else, end
  12. Rc = (Vo)^2/Po;
  13. Ic = Vo/Rc;
  14. if Ic > Io
  15.    fprintf(' Error, Ic > Io. Inconsistent test data. Check test data and try again');
  16.    return, end
  17. Im = sqrt(Io^2 - Ic^2);
  18. Xm = Vo/Im;