let groupssel:int list ref   = ref []