This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
-- This is used only during the building of the data structures.
setName :: Group -> String -> Group
setName t s = t { name = s }
-- This is used only during the building of the data structures.
setName :: Group -> String -> Group
setName t s = t { name = s }