module Common:sig
..end
type
t = {
|
name : |
|
gap_open_penalty : |
|
gap_extension_penalty : |
val default : t
val name : t -> string
val to_json : t ->
[> `Assoc of (string * [> `Int of int | `String of string ]) list ]