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
