Next: Subroutine tidy_groups
Up: Module group_module
Previous: Subroutine group_add_object
Contents
Index
Create an atom lookup table: The supplied lookup table will be filled with the
group number that atom i belongs to, with an error if it belongs to multiple groups
or if an atom is ungrouped (unless ungrouped errors are turned off).
The first group is 1 by default, but can be overridden with the first argument
- this -- type(Group), dimension(:), intent(in)
-
- lookup -- integer, dimension(:), intent(inout)
-
- first -- integer, optional, intent(in)
-
- ungrouped_error -- logical, optional, intent(in)
-
tidy_groups subroutine
gabor
2009-06-30