fix rokko/rokko_sparse.f90