set_inp.f90 20 KB