do_sxx.f90 10 KB