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

其他行业

开发平台:

Matlab

  1. % This function computes the shunt capacitor compensation required
  2. % for an specified receiving-end voltage and a given series capacitor
  3. % compensation.
  4. % Copyright (C) 1998 by H. Saadat.
  5. function srshcomp(ABCD)
  6. global resp model par1 par2 linelngt freq
  7. if exist('ABCD')~=1
  8. A = input('Enter the complex line constant A = ');
  9. B = input('Enter the complex line constant B = ');
  10. C = input('Enter the complex line constant C = ');
  11. D = A; ABCD=[A B; C D]; end
  12. if exist('freq')~=1
  13. f = input('Enter frequency in Hz = '); else f = freq; end
  14. Z = ABCD(1,2); Y = 2*ABCD(2,1)/(ABCD(1,1)+1);
  15. Vsm = input('Enter sending end line-line voltage kV = ');
  16. Vrm = input('Enter desired receiving end line-line voltage kV = ');
  17. dr = input('Enter receiving end voltage phase angle