function Lz=FormLz(Loadi,Mat_G,Init_L)
lower=0*sparse(ones(length(Loadi)*1,1));
Lz=Mat_G-Init_L-lower;
end