added function cuspidal_rational_subgroup_mod_rational_cuspidal_subgroup