package GT
Module GTSource
Source
val bool :
(['inh, bool, 'syn] bool_t ->
'inh ->
bool ->
'syn,
< compare : bool -> bool -> comparison
; enum : bool -> int
; eq : bool -> bool -> bool
; eval : 'env -> bool -> bool
; fmt : Format.formatter -> bool -> unit
; foldl : 'a -> bool -> 'a
; foldr : 'a -> bool -> 'a
; gmap : bool -> bool
; html : bool -> HTML.viewer
; show : bool -> string
; stateful : 'env -> bool -> 'env * bool >,
(('inh -> bool -> 'syn) -> < t_bool : 'inh -> bool -> 'syn >) ->
'inh ->
bool ->
'syn)
tSource
val int :
(['inh, int, 'syn] int_t ->
'inh ->
int ->
'syn,
< compare : int -> int -> comparison
; enum : int -> int
; eq : int -> int -> bool
; eval : 'env -> int -> int
; fmt : Format.formatter -> int -> unit
; foldl : 'a -> int -> 'a
; foldr : 'a -> int -> 'a
; gmap : int -> int
; html : int -> HTML.viewer
; show : int -> string
; stateful : 'env -> int -> 'env * int >,
(('inh -> int -> 'syn) -> < t_int : 'inh -> int -> 'syn >) ->
'inh ->
int ->
'syn)
tSource
val string :
(['inh, string, 'syn] string_t ->
'inh ->
string ->
'syn,
< compare : string -> string -> comparison
; enum : string -> int
; eq : string -> string -> bool
; eval : 'env -> string -> string
; fmt : Format.formatter -> string -> unit
; foldl : 'a -> string -> 'a
; foldr : 'a -> string -> 'a
; gmap : string -> string
; html : string -> HTML.viewer
; show : string -> string
; stateful : 'env -> string -> 'env * string >,
(('inh -> string -> 'syn) -> < t_string : 'inh -> string -> 'syn >) ->
'inh ->
string ->
'syn)
tSource
val float :
(['inh, float, 'syn] float_t ->
'inh ->
float ->
'syn,
< compare : float -> float -> comparison
; enum : float -> int
; eq : float -> float -> bool
; eval : 'env -> float -> float
; fmt : Format.formatter -> float -> unit
; foldl : 'a -> float -> 'a
; foldr : 'a -> float -> 'a
; gmap : float -> float
; html : float -> HTML.viewer
; show : float -> string
; stateful : 'env -> float -> 'env * float >,
(('inh -> float -> 'syn) -> < t_float : 'inh -> float -> 'syn >) ->
'inh ->
float ->
'syn)
tSource
val char :
(['inh, char, 'syn] char_t ->
'inh ->
char ->
'syn,
< compare : char -> char -> comparison
; enum : char -> int
; eq : char -> char -> bool
; eval : 'env -> char -> char
; fmt : Format.formatter -> char -> unit
; foldl : 'a -> char -> 'a
; foldr : 'a -> char -> 'a
; gmap : char -> char
; html : char -> HTML.viewer
; show : char -> string
; stateful : 'env -> char -> 'env * char >,
(('inh -> char -> 'syn) -> < t_char : 'inh -> char -> 'syn >) ->
'inh ->
char ->
'syn)
tSource
val unit :
(['inh, unit, 'syn] unit_t ->
'inh ->
unit ->
'syn,
< compare : unit -> unit -> comparison
; enum : unit -> int
; eq : unit -> unit -> bool
; eval : 'env -> unit -> unit
; fmt : Format.formatter -> unit -> unit
; foldl : 'a -> unit -> 'a
; foldr : 'a -> unit -> 'a
; gmap : unit -> unit
; html : unit -> HTML.viewer
; show : unit -> string
; stateful : 'env -> unit -> 'env * unit >,
(('inh -> unit -> 'syn) -> < t_unit : 'inh -> unit -> 'syn >) ->
'inh ->
unit ->
'syn)
tSource
val int32 :
(['inh, int32, 'syn] int32_t ->
'inh ->
int32 ->
'syn,
< compare : int32 -> int32 -> comparison
; enum : int32 -> int
; eq : int32 -> int32 -> bool
; eval : 'env -> int32 -> int32
; fmt : Format.formatter -> int32 -> unit
; foldl : 'a -> int32 -> 'a
; foldr : 'a -> int32 -> 'a
; gmap : int32 -> int32
; html : int32 -> HTML.viewer
; show : int32 -> string
; stateful : 'env -> int32 -> 'env * int32 >,
(('inh -> int32 -> 'syn) -> < t_int32 : 'inh -> int32 -> 'syn >) ->
'inh ->
int32 ->
'syn)
tSource
val int64 :
(['inh, int64, 'syn] int64_t ->
'inh ->
int64 ->
'syn,
< compare : int64 -> int64 -> comparison
; enum : int64 -> int
; eq : int64 -> int64 -> bool
; eval : 'env -> int64 -> int64
; fmt : Format.formatter -> int64 -> unit
; foldl : 'a -> int64 -> 'a
; foldr : 'a -> int64 -> 'a
; gmap : int64 -> int64
; html : int64 -> HTML.viewer
; show : int64 -> string
; stateful : 'env -> int64 -> 'env * int64 >,
(('inh -> int64 -> 'syn) -> < t_int64 : 'inh -> int64 -> 'syn >) ->
'inh ->
int64 ->
'syn)
tSource
val nativeint :
(['inh, nativeint, 'syn] nativeint_t ->
'inh ->
nativeint ->
'syn,
< compare : nativeint -> nativeint -> comparison
; enum : nativeint -> int
; eq : nativeint -> nativeint -> bool
; eval : 'env -> nativeint -> nativeint
; fmt : Format.formatter -> nativeint -> unit
; foldl : 'a -> nativeint -> 'a
; foldr : 'a -> nativeint -> 'a
; gmap : nativeint -> nativeint
; html : nativeint -> HTML.viewer
; show : nativeint -> string
; stateful : 'env -> nativeint -> 'env * nativeint >,
(('inh -> nativeint -> 'syn) ->
< t_nativeint : 'inh -> nativeint -> 'syn >) ->
'inh ->
nativeint ->
'syn)
tSource
val gcata_list :
< c_Cons : 'a -> 'b list -> 'b -> 'b list -> 'c
; c_Nil : 'a -> 'b list -> 'c.. > ->
'a ->
'b list ->
'cSource
class ['a, 'self] show_list_t : (unit -> 'a -> string) -> (unit -> 'a list -> string) -> object ... endSource
class ['a, 'sa, 'self, +'b] gmap_list_t : (unit -> 'a -> 'sa) -> (unit -> 'a list -> 'sa list) -> object ... endSource
class ['a, 'sa, 'self, 'syn, 'env] eval_list_t : ('env -> 'a -> 'sa) -> ('env -> 'a list -> 'sa list) -> object ... endSource
class ['a, 'sa, 'self, 'syn, 'env] stateful_list_t : ('env ->
'a ->
'b * 'sa) -> ('b ->
'a list ->
'env * 'sa list) -> object ... endSource
class ['a, 'syn, 'self] foldl_list_t : ('syn -> 'a -> 'b) -> ('b -> 'a list -> 'syn) -> object ... endSource
class ['a, 'syn, 'self] foldr_list_t : ('syn -> 'a -> 'syn) -> ('syn -> 'a list -> 'syn) -> object ... endSource
class ['a, 'self] compare_list_t : ('a ->
'a ->
comparison) -> ('a list ->
'a list ->
comparison) -> object ... endSource
val list :
(['ia, 'a, 'sa, 'inh, 'a list, 'syn] list_t ->
'inh ->
'a list ->
'syn,
< compare : ('a -> 'a -> comparison) -> 'a list -> 'a list -> comparison
; enum : ('a -> int) -> 'a list -> int
; eq : ('a -> 'a -> bool) -> 'a list -> 'a list -> bool
; eval : ('env -> 'a -> 'b) -> 'env -> 'a list -> 'b list
; fmt :
(Format.formatter -> 'a -> unit) ->
Format.formatter ->
'a list ->
unit
; foldl : ('c -> 'a -> 'c) -> 'c -> 'a list -> 'c
; foldr : ('c -> 'a -> 'c) -> 'c -> 'a list -> 'c
; gmap : ('a -> 'b) -> 'a list -> 'b list
; html : ('a -> HTML.viewer) -> 'a list -> HTML.viewer
; show : ('a -> string) -> 'a list -> string
; stateful : ('env -> 'a -> 'env * 'b) -> 'env -> 'a list -> 'env * 'b list >,
(('inh -> 'a list -> 'syn) -> ('ia, 'a, 'sa, 'inh, 'a list, 'syn) list_t) ->
'inh ->
'a list ->
'syn)
tSource
val gcata_option :
< c_None : 'a -> 'b option -> 'c ; c_Some : 'a -> 'b option -> 'b -> 'c.. > ->
'a ->
'b option ->
'cSource
class ['a, 'sa, 'self, 'syn, 'env] eval_option_t : ('env -> 'a -> 'sa) -> 'b -> object ... endSource
class ['a, 'sa, 'self, +'b, 'env] stateful_option_t : ('env -> 'a -> 'env * 'sa) -> 'c -> object ... endSource
val option :
(['ia, 'a, 'sa, 'inh, 'd, 'syn] option_t ->
'inh ->
'a option ->
'syn,
< compare :
('a -> 'a -> comparison) ->
'a option ->
'a option ->
comparison
; eq : ('a -> 'a -> bool) -> 'a option -> 'a option -> bool
; eval : ('env -> 'a -> 'b) -> 'env -> 'a option -> 'b option
; fmt :
(Format.formatter -> 'a -> unit) ->
Format.formatter ->
'a option ->
unit
; foldl : ('c -> 'a -> 'c) -> 'c -> 'a option -> 'c
; foldr : ('c -> 'a -> 'c) -> 'c -> 'a option -> 'c
; gmap : ('a -> 'b) -> 'a option -> 'b option
; html : ('a -> HTML.viewer) -> 'a option -> HTML.viewer
; show : ('a -> string) -> 'a option -> string
; stateful :
('env -> 'a -> 'env * 'b) ->
'env ->
'a option ->
'env * 'b option >,
(('e -> 'f option -> 'g) ->
< c_None : 'e -> 'f option -> 'g
; c_Some : 'e -> 'f option -> 'f -> 'g.. >) ->
'e ->
'f option ->
'g)
tSource
class ['a, 'sa, 'b, 'sb, 'self] gmap_arrow_t : (unit -> 'a -> 'sa) -> 'c -> 'd -> object ... endSource
class ['a, 'sa, 'b, 'sb, 'self, 'syn, 'env] stateful_arrow_t : 'c -> 'd -> 'e -> object ... endSource
val arrow :
(['ia, 'a, 'sa, 'ib, 'b, 'sb, 'inh, 'e, 'syn] arrow_t ->
'inh ->
('a, 'b) arrow ->
'syn,
< compare :
('a -> 'a -> comparison) ->
('b -> 'b -> comparison) ->
('a, 'b) arrow ->
('a, 'b) arrow ->
comparison
; enum : ('a -> int) -> ('b -> int) -> ('a, 'b) arrow -> int
; eq :
('a -> 'a -> bool) ->
('b -> 'b -> bool) ->
('a, 'b) arrow ->
('a, 'b) arrow ->
bool
; eval :
('env -> 'a -> 'c) ->
('env -> 'b -> 'd) ->
'env ->
('a, 'b) arrow ->
('c, 'd) arrow
; fmt :
(Format.formatter -> 'a -> unit) ->
(Format.formatter -> 'b -> unit) ->
Format.formatter ->
('a, 'b) arrow ->
unit
; foldl :
('c -> 'a -> 'c) ->
('c -> 'b -> 'c) ->
'c ->
('a, 'b) arrow ->
'c
; foldr :
('c -> 'a -> 'c) ->
('c -> 'b -> 'c) ->
'c ->
('a, 'b) arrow ->
'c
; gmap : ('a -> 'c) -> ('b -> 'd) -> ('a, 'b) arrow -> ('c, 'd) arrow
; html :
('a -> HTML.viewer) ->
('b -> HTML.viewer) ->
('a, 'b) arrow ->
HTML.viewer
; show : ('a -> string) -> ('b -> string) -> ('a, 'b) arrow -> string
; stateful :
('env -> 'a -> 'env * 'c) ->
('env -> 'b -> 'env * 'd) ->
'env ->
('a, 'b) arrow ->
'env * ('c, 'd) arrow >,
(('f -> 'g -> 'h) -> < c_Arrow : 'f -> 'g -> 'h.. >) ->
'f ->
'g ->
'h)
tSource
val ref :
(['ia, 'a, 'sa, 'inh, 'b, 'syn] ref_t ->
'inh ->
'a ref ->
'syn,
< fmt :
(Format.formatter -> 'a -> unit) ->
Format.formatter ->
'a ref ->
unit
; html : ('a -> HTML.er) -> 'a ref -> HTML.er
; show : ('a -> string) -> 'a ref -> string >,
(('c -> 'd ref -> 'e) -> < c_ref : 'c -> 'd -> 'e.. >) ->
'c ->
'd ref ->
'e)
tSource
class ['a, 'sa, 'self, 'syn, +'b] stateful_array_t : ('b -> 'a -> 'sa * 'b) -> 'c -> object ... endSource
val array :
(< do_array : 'a -> 'b -> 'c.. > ->
'a ->
'b ->
'c,
< compare : ('d -> 'd -> comparison) -> 'd array -> 'd array -> comparison
; enum : 'e -> unit -> 'f array -> int
; eq : ('g -> 'g -> bool) -> 'g array -> 'g array -> bool
; eval : ('h -> 'i -> 'j) -> 'h -> 'i array -> 'j array
; fmt :
(Format.formatter -> 'k -> unit) ->
Format.formatter ->
'k array ->
unit
; foldl : ('l -> 'm -> 'l) -> 'l -> 'm array -> 'l
; foldr : ('n -> 'o -> 'n) -> 'n -> 'o array -> 'n
; gmap : ('p -> 'q) -> 'p array -> 'q array
; html : ('r -> HTML.viewer) -> 'r array -> HTML.viewer
; show : ('s -> string) -> 's array -> string
; stateful :
('t array -> 'u -> 't * 't array) ->
't array ->
'u array ->
't array * 't array >,
(('v -> 'w -> 'x) -> < do_array : 'v -> 'w -> 'x.. >) ->
'v ->
'w ->
'x)
tSource
val bytes :
(< do_bytes : 'a -> 'b -> 'c.. > ->
'a ->
'b ->
'c,
< compare : bytes -> bytes -> comparison
; eq : bytes -> bytes -> bool
; eval : 'd -> bytes -> bytes
; fmt : Format.formatter -> bytes -> unit
; foldl : 'e -> bytes -> 'e
; foldr : 'f -> bytes -> 'f
; gmap : bytes -> bytes
; html : bytes -> HTML.viewer
; show : bytes -> string
; stateful : 'g -> bytes -> 'g * bytes >,
(('h -> 'i -> 'j) -> < do_bytes : 'h -> 'i -> 'j.. >) ->
'h ->
'i ->
'j)
t