Fix: group variable is changed from Real to Integer to be consistent. A real is passed as an argument when an integer is expected in the subroutine signature.