Wizard (p.GT.0.4.2.doc.GT.HTML.HTML.Wizard)

type page =
  < string : ?attrs:string -> string -> page
  ; text : ?attrs:string -> ?default:string -> string -> page
  ; div : ?attrs:string -> ?default:string -> string -> page
  ; flag : ?attrs:string -> string -> page
  ; combo : ?attrs:string -> string -> (viewer * string * string) list -> page
  ; radio : ?attrs:string -> string -> (viewer * string * string) list -> page
  ; id : string -> string >

type t = < page : (page -> page) list -> page ; generate : string * string >

val string : ?attrs:string -> string -> page -> page

val text : ?attrs:string -> ?default:string -> string -> page -> page

val div : ?attrs:string -> ?default:string -> string -> page -> page

val flag : ?attrs:string -> string -> page -> page

val combo : 
  ?attrs:string ->
  string ->
  (viewer * string * string) list ->
  page ->
  page

val radio : 
  ?attrs:string ->
  string ->
  (viewer * string * string) list ->
  page ->
  page

val create : ?attrs:string -> string -> string -> string -> t