GAP 4.8.9 installation with standard packages -- copy to your CoCalc project to get it
#############################################################################
##
#W ctblsolv.tst GAP Library Thomas Breuer
##
##
#Y Copyright (C) 1998, Lehrstuhl D für Mathematik, RWTH Aachen, Germany
##
## To be listed in testinstall.g
##
gap> START_TEST("ctblsolv.tst");
gap> CharacterDegrees( SmallGroup( 256, 529 ) );
[ [ 1, 8 ], [ 2, 30 ], [ 4, 8 ] ]
gap> for pair in [ [ 18, 3 ], [ 27, 3 ], [ 36, 7 ], [ 50, 3 ], [ 54, 4 ] ] do
> G:= SmallGroup( pair[1], pair[2] );
> if CharacterDegrees( G, 0 )
> <> Collected( List( Irr( G ), x -> x[1] ) ) then
> Error( IdGroup( G ) );
> fi;
> od;
gap> STOP_TEST( "ctblsolv.tst", 3640000);
#############################################################################
##
#E