integer, intent(in) :: nparg !< number of integers in the group data structure integer, target, intent(in) :: iparg(nparg,ngroup) !< group data structure if ...