new function, cut off the ratran input at 'rin', i.e. only use subset of input model