function Lz=FormLz(Mat_G,Init_L,Busnum,Loadi) VoltL=sparse(0.9*ones(Busnum,1)); PDL=sparse(0*ones(length(Loadi),1)); QDL=sparse(0*ones(length(Loadi),1)); t1=[PDL; QDL; VoltL ]; t2=Mat_G-Init_L-t1; Lz=t2; end