Part of the TclX package.
This command returns the current group access list of the current process as a list of names.
An example would be
$ tclsh8.5 % package require Tclx 8.4 % id groups staff %