Create solv_res.f90