其他行业

开发平台：

Matlab

Sercomp.m：源码内容

							% This function determines the line performance for a given
% series capacitor compensation.
% Copyright (C) 1998 by H. Saadat
function sercomp(ABCD)
global resp model par1 par2 linelngt freq
if exist('ABCD')~=1
A = input('Enter the complex line constant A = ');
B = input('Enter the complex line constant B = ');
C = input('Enter the complex line constant C = ');
D = A; ABCD=[A B; C D]; end
if exist('freq')~=1
f = input('Enter frequency in Hz = '); else, f = freq; end
Z = ABCD(1,2); Y = 2*ABCD(2,1)/(ABCD(1,1)+1);
Vrm = input('Enter receiving end line-line voltage kV = ');
dr = input('Enter receiving end voltage phase angle

						