my ($tgs) = @_;