2013-04-22 21:56:16 +08:00
|
|
|
|
function [ output_args ] = TransPower( newwordParameter,cmpY,Volt,VAngel )
|
|
|
|
|
|
%TRANSPOWER Summary of this function goes here
|
|
|
|
|
|
% Detailed explanation goes here
|
|
|
|
|
|
transI=newwordParameter.trans.transI;
|
|
|
|
|
|
transJ=newwordParameter.trans.transJ;
|
|
|
|
|
|
cmpSEV=Volt.*exp(1j*VAngel); %<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ѹ
|
|
|
|
|
|
% cmpY=sparse(r,c,Y.*(1j*YAngel),length(Volt),length(Volt));
|
|
|
|
|
|
cmpSETransI=(cmpSEV(transI)-cmpSEV(transJ)).*cmpY(sub2ind(size(cmpY),transI,transJ));
|
|
|
|
|
|
SETransP=real((cmpSEV(transI)-cmpSEV(transJ)).*conj(cmpSETransI));
|
2013-04-23 11:43:35 +08:00
|
|
|
|
output_args=full(SETransP);
|
2013-04-22 21:56:16 +08:00
|
|
|
|
end
|
|
|
|
|
|
|