function [U,S,NetLoss]=Main_PFC
% this program was used for computation the power flow of power net.

% load the fundmental information of the power net
[SB,NodeNum,para_line,para_trans2,para_trans3,para_capac,para_bus]=InputData_Net1;

% initialize bus 
[PQ,PV,UA]=InitBus(para_bus,SB);

% construct Y matrix
[Y_B]=YmatrixConstruct(para_line,para_trans2,para_trans3,para_capac,SB,NodeNum);

% compute power flow
[U,S,NetLoss,num_Iter]=PFC_NL(Y_B,PQ,PV,UA);

% result output
ResultOutput(U,S,NetLoss,num_Iter);