1 type fields 2 3 val override : bool Dream_html.Form.t 4 val stimulus : Prescription.Stimulus.t -> Evidence.Stimulus.t Dream_html.Form.t 5 6 val profile_username : string Dream_html.Form.t 7 (** The raw username from the rename form; the domain validates it. *) 8 9 val profile_password : (string * string) Dream_html.Form.t 10 (** The current and new passwords from the change-password form. *) 11 12 val app_feedback : string Dream_html.Form.t 13 (** Decodes the required freeform application feedback message. *) 14 15 val errors_to_text : (string * string) list -> string 16