function Mat_G=FormG(I1r,I1i) Mat_G=[ I1r; I1i; ]; end