Finally done with Gauss elim in fortran