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