type sys = Sys.ttype mode = Scope.t * Term.ttype modes = mode option * mode listtype sys_modes = sys * modes listtype t = modes * sys_modes list
val pp_print_mode : Stdlib.Format.formatter -> (Scope.t * Term.t) -> unitval pp_print_modes : Stdlib.Format.formatter -> ((Scope.t * Term.t) option * (Scope.t * Term.t) list) -> unitval pp_print_sys_modes : Stdlib.Format.formatter -> (Sys.t * ((Scope.t * Term.t) option * (Scope.t * Term.t) list) list) -> unitval pp_print_modes : Stdlib.Format.formatter -> (((Scope.t * Term.t) option * (Scope.t * Term.t) list) * (Sys.t * ((Scope.t * Term.t) option * (Scope.t * Term.t) list) list) list) -> unitval sv_at_0 : StateVar.t -> Term.tval modes_of_sys : Sys.t -> modesval modes_of : Sys.t -> modes * 'a list