...L_km=0.367; % ohm/km at 60 Hz
RL_km= 0.1*XL_km; % Resistance in ohm/km
KV_LL= 345; MVA_Base=100; % common 3-phase base
Z_Base=KV_LL^2/MVA_Base; % common base
% YBUS Creation
Z13_ohm=(RL_km+j*XL_km)*200; B13_Micro_Mho=4.5*200; % Line 1-3 is 200 km long
Z12_ohm=(RL_km+j*XL_km)*150; B12_Micro...