add one old get_model.f90 codes as memo