UpdateMap( char, paramap, indirected )
improves the paramap paramap using that indirected is the (possibly parametrized) indirection of the character char by paramap.
gap> s:= CharTable( "S4(4).2" );; he:= CharTable( "He" );; gap> fus:= InitFusion( s, he ); [ 1, 2, 2, [ 2, 3 ], 4, 4, [ 7, 8 ], [ 7, 8 ], 9, 9, 9, [ 10, 11 ], [ 10, 11 ], 18, 18, 25, 25, [ 26, 27 ], [ 26, 27 ], 2, [ 6, 7 ], [ 6, 7 ], [ 6, 7, 8 ], 10, 10, 17, 17, 18, [ 19, 20 ], [ 19, 20 ] ] gap> Filtered( s.irreducibles, x -> x[1] = 50 ); [ [ 50, 10, 10, 2, 5, 5, -2, 2, 0, 0, 0, 1, 1, 0, 0, 0, 0, -1, -1, 10, 2, 2, 2, 1, 1, 0, 0, 0, -1, -1 ], [ 50, 10, 10, 2, 5, 5, -2, 2, 0, 0, 0, 1, 1, 0, 0, 0, 0, -1, -1, -10, -2, -2, -2, -1, -1, 0, 0, 0, 1, 1 ] ] gap> UpdateMap( he.irreducibles[2], fus, last[1] + s.irreducibles[1] ); gap> fus; [ 1, 2, 2, 3, 4, 4, 8, 7, 9, 9, 9, 10, 10, 18, 18, 25, 25, [ 26, 27 ], [ 26, 27 ], 2, [ 6, 7 ], [ 6, 7 ], [ 6, 7 ], 10, 10, 17, 17, 18, [ 19, 20 ], [ 19, 20 ] ]
GAP 3.4.4