sortnum_ri.c