Text this: A code for reducing many-group cross sections to few groups /