function [ output_args ] = TransPower( newwordParameter,Volt,VAngel ) %TRANSPOWER Summary of this function goes here % Detailed explanation goes here transI=newwordParameter.trans.transI; transJ=newwordParameter.trans.transJ; transR=newwordParameter.trans.transR; transX=newwordParameter.trans.transX; transK=newwordParameter.trans.transK; cmpSEV=Volt.*exp(1j*VAngel); %Έ΄Κύ΅ηΡΉ % cmpY=sparse(r,c,Y.*(1j*YAngel),length(Volt),length(Volt)); cmpSETransI=(cmpSEV(transI)./transK-cmpSEV(transJ)).*1./(transR+1j*transX); output_args=real(cmpSEV(transI)./transK.*conj(cmpSETransI)); end