val bind :
?transition_duration:float ->
?min:(unit -> int) Eliom_client_value.t ->
?max:(unit -> int) Eliom_client_value.t ->
compute_final_pos:
(Js_of_ocaml.Dom_html.touchEvent Js_of_ocaml.Js.t ->
int ->
int)
Eliom_client_value.t ->
?onstart:
(Js_of_ocaml.Dom_html.touchEvent Js_of_ocaml.Js.t ->
int ->
unit)
Eliom_client_value.t ->
?onmove:
(Js_of_ocaml.Dom_html.touchEvent Js_of_ocaml.Js.t ->
int ->
unit)
Eliom_client_value.t ->
?onend:
(Js_of_ocaml.Dom_html.touchEvent Js_of_ocaml.Js.t ->
int ->
unit)
Eliom_client_value.t ->
'a Eliom_content.Html.elt ->
unit