package coq
type !'a summary_declaration = {
freeze_function : marshallable -> 'a;
unfreeze_function : 'a -> unit;
init_function : unit -> unit;
}
val declare_summary : string -> 'a summary_declaration -> unit
val declare_summary_tag : string -> 'a summary_declaration -> 'a Dyn.tag
val ref : ?freeze:(marshallable -> 'a -> 'a) -> name:string -> 'a -> 'a ref
val ref_tag :
?freeze:(marshallable -> 'a -> 'a) ->
name:string ->
'a ->
'a ref * 'a Dyn.tag
module Local : sig ... end
val declare_ml_modules_summary : 'a summary_declaration -> unit
val empty_frozen : frozen
val freeze_summaries : marshallable:marshallable -> frozen
val unfreeze_summaries : ?partial:bool -> frozen -> unit
val freeze_summary :
marshallable:marshallable ->
?complement:bool ->
string list ->
frozen_bits
val unfreeze_summary : frozen_bits -> unit
val surgery_summary : frozen -> frozen_bits -> frozen
val project_summary : frozen -> ?complement:bool -> string list -> frozen_bits
val pointer_equal : frozen_bits -> frozen_bits -> bool
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>