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