module Euler: sig .. end
type 'a spec =
| |
Alpha of 'a |
| |
Font of 'a |
| |
Case of 'a |
| |
Graisse of 'a |
| |
Width of int |
val styles : ((int * int) list *
[> `Cal | `Chiffres | `Fraktur | `Gras | `Latin | `Maj | `Min ] spec
list)
list
val get_index : int -> (int * int) list -> int option
val categorize : int -> ((int * int) list * 'a) list -> (int * 'a) option
val subst_index : int -> (int * int) list -> int option
val make_subst : [> `Cal | `Chiffres | `Fraktur | `Gras | `Latin | `Maj | `Min ] spec
list -> int -> int
val subst : [> `Cal | `Chiffres | `Fraktur | `Gras | `Latin | `Maj | `Min ] spec
list -> FTypes.glyph_id list -> FTypes.glyph_id list
val compose : ('a -> 'b) -> ('c -> 'a) -> 'c -> 'b
val changeFont : [> `Cal | `Chiffres | `Fraktur | `Gras | `Latin | `Maj | `Min ] spec
list -> Document.environment -> Document.environment
val default_env : Document.Mathematical.env
val msubst : int Extra.IntMap.t -> FTypes.glyph_id list -> FTypes.glyph_id list
val displaySubst : int Extra.IntMap.t Lazy.t
val default_env2 : Document.Mathematical.env
val default : Document.Mathematical.env array