add "implicit none" to jacobi_1d
implement gs_1d
but there are bugs in gs_1d