package ocsigen-toolkit
type !'a t = {
elt : 'a Eliom_content.Html.elt;
pos : int Eliom_shared.React.S.t;
pos_post : int Eliom_shared.React.S.t;
vis_elts : int Eliom_shared.React.S.t;
swipe_pos : float React.S.t Eliom_client_value.t;
}
val make :
?a:[< Html_types.div_attrib ] Eliom_content.Html.attrib list ->
?vertical:bool ->
?position:int ->
?transition_duration:float ->
?inertia:float ->
?swipeable:bool ->
?allow_overswipe:bool ->
?update:[ `Goto of int | `Next | `Prev ] React.event Eliom_client_value.t ->
?disabled:bool Eliom_shared.React.S.t ->
?full_height:
[ `Header of (unit -> int) Eliom_client_value.t | `No | `No_header ] ->
?make_transform:
(vertical:bool -> ?delta:int -> int -> string) Eliom_shared.Value.t ->
?make_page_attribute:
(vertical:bool ->
int ->
Html_types.div_attrib Eliom_content.Html.D.attrib list)
Eliom_shared.Value.t ->
[< Html_types.div_content ] Eliom_content.Html.elt list ->
[> `Div ] t
val make_lazy :
?a:[< Html_types.div_attrib ] Eliom_content.Html.attrib list ->
?vertical:bool ->
?position:int ->
?transition_duration:float ->
?inertia:float ->
?swipeable:bool ->
?allow_overswipe:bool ->
?update:[ `Goto of int | `Next | `Prev ] React.event Eliom_client_value.t ->
?disabled:bool Eliom_shared.React.S.t ->
?full_height:
[ `Header of (unit -> int) Eliom_client_value.t | `No | `No_header ] ->
?make_transform:
(vertical:bool -> ?delta:int -> int -> string) Eliom_shared.Value.t ->
?make_page_attribute:
(vertical:bool ->
int ->
Html_types.div_attrib Eliom_content.Html.D.attrib list)
Eliom_shared.Value.t ->
?spinner:(unit -> Html_types.div_content Eliom_content.Html.elt) ->
(unit ->
[< Html_types.div_content ] Eliom_content.Html.elt Lwt.t)
Eliom_shared.Value.t
list ->
[> `Div ] t Lwt.t
val wheel :
?a:[< Html_types.div_attrib Class ] Eliom_content.Html.attrib list ->
?vertical:bool ->
?position:int ->
?transition_duration:float ->
?inertia:float ->
?allow_overswipe:bool ->
?update:[ `Goto of int | `Next | `Prev ] React.event Eliom_client_value.t ->
?disabled:bool Eliom_shared.React.S.t ->
?faces:int ->
?face_size:int ->
[< Html_types.div_content ] Eliom_content.Html.elt list ->
[> `Div ] Eliom_content.Html.elt
* int Eliom_shared.React.S.t
* float React.S.t Eliom_client_value.t
val bullets :
?a:[< Html_types.ul_attrib ] Eliom_content.Html.attrib list ->
?attributes:[< Html_types.li_attrib ] Eliom_content.Html.attrib list list ->
change:([ `Goto of int | `Next | `Prev ] -> unit) Eliom_client_value.t ->
pos:int Eliom_shared.React.S.t ->
length:int ->
?size:int Eliom_shared.React.S.t ->
?content:[< Html_types.li_content_fun ] Eliom_content.Html.elt list list ->
unit ->
[> `Ul ] Eliom_content.Html.elt
val ribbon :
?a:[< Html_types.ul_attrib ] Eliom_content.Html.attrib list ->
change:([ `Goto of int | `Next | `Prev ] -> unit) Eliom_client_value.t ->
pos:int Eliom_shared.React.S.t ->
?size:int Eliom_shared.React.S.t ->
?initial_gap:int ->
?transition_duration:float ->
?cursor:float React.S.t Eliom_client_value.t ->
[< Html_types.li_content_fun ] Eliom_content.Html.elt list list ->
[> `Div ] Eliom_content.Html.elt
val previous :
?a:[< Html_types.button_attrib ] Eliom_content.Html.attrib list ->
change:([> `Goto of int | `Prev ] -> unit) Eliom_client_value.t ->
?offset:int Eliom_shared.React.S.t ->
pos:int Eliom_shared.React.S.t ->
Html_types.button_content Eliom_content.Html.elt list ->
[> `Button ] Eliom_content.Html.elt
val next :
?a:[< Html_types.button_attrib ] Eliom_content.Html.attrib list ->
change:([> `Goto of int | `Next ] -> unit) Eliom_client_value.t ->
?offset:int Eliom_shared.React.S.t ->
pos:int Eliom_shared.React.S.t ->
vis_elts:int Eliom_shared.React.S.t ->
length:int ->
Html_types.button_content Eliom_content.Html.elt list ->
[> `Button ] Eliom_content.Html.elt
val bind_arrow_keys :
?use_capture:bool ->
?vertical:bool ->
change:([> `Goto of int | `Next | `Prev ] -> unit) ->
Js_of_ocaml.Dom_html.eventTarget Js_of_ocaml.Js.t ->
unit Lwt.t
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>