let
all_groups:group list ref = ref []