package ask

  1. Overview
  2. Docs
type t
val questions : t -> QuestionAnswer.t list
val description : t -> string
val label : t -> string
val template_uuid : t -> string
val uuid : t -> string
val set_questions : QuestionAnswer.t list -> t -> t
val to_yojson : t -> Yojson.Safe.t
val pp : Stdlib.Format.formatter -> t -> unit
val show : t -> string
val equal : t -> t -> bool
val make : uuid:string -> template_uuid:string -> label:string -> description:string -> ?questions:QuestionAnswer.t list -> unit -> t
val is_ready_for_submission : t -> bool
val set_question_to_optional : (Question.t * 'a) -> Question.t * 'a
val set_question_with_id_to_optional : question_id:string -> questions:(Question.t * 'a) list -> (Question.t * 'a) list
val set_all_questions_to_optional : t -> t
val answer : t -> QuestionAnswer.t list -> (Event.t list, string list) Result.t