module Team: sig
.. end
The teams of students inside projects.
type
team = {
|
num : int ; |
|
name : string ; |
|
grade : float ; |
|
size : int ref ; |
|
spec : bool ; |
}
val make_team : ?name:string -> ?grade:float -> ?spec:bool -> int -> team
val empty_team : team
val get_team_num : team -> int
val get_team_name : team -> string
val get_team_grade : team -> float
val set_team_name : team -> string -> team
val set_team_grade : team -> float -> team
val get_team_size : team -> int
val get_team_spec : team -> bool
val increase_team_size : team -> unit
val decrease_team_size : team -> unit