struct type t = { name: string; gap_open_penalty: int; gap_extension_penalty: int; mismatch_penalty: int; } end