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