let get_multip_resp rsp (gl:student list) groupnum padd teamnum =
  List.find_all (fun s -> 
                   ((s.group == groupnum) && (student_resp s padd) == rsp) 
                   && ((student_team s padd) == teamnum)) gl