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

其他行业

开发平台:

Matlab

  1. % This function obtains the line performance for given sending-end
  2. % conditions.
  3. % Copyright (C) 1998 by H. Saadat
  4. function givenss(ABCD)
  5. global resp model par1 par2 linelngt freq
  6. if exist('ABCD')~=1
  7. A = input('Enter the complex line constant A = ');
  8. B = input('Enter the complex line constant B = ');
  9. C = input('Enter the complex line constant C = ');
  10. D = A; ABCD=[A B; C D]; end
  11. Vsm = input('Enter sending end line-line voltage kV = ');
  12. ds = input('Enter sending end voltage phase angle