to_string c returns a string representation of codon c

Example:

  let codon_option = Codon.of_string "ATG" in
  match codon_option with
  | Some codon -> assert (Codon.to_string codon = "ATG")
  | None -> failwith "Invalid codon string"

In this example, the codon is converted to its string representation. The string representation is then compared to the expected value.

of_string s tries tp build a codon from a string representation. It returns None if the string is not a valid codon

neighbours p q tests if codons p and q are neighbors that is, if they differ by exactly one nucleotide. If so, the function returns the index of the differing nucleotide and the nucleotides themselves; it returns None if the codons are not neighbors.

Example:

  let codon_p = Codon.of_string "ATA" in
  let codon_q = Codon.of_string "ATG" in
  match Codon.neighbours codon_p codon_q with
  | Some (index, nucleotide_p, nucleotide_q) ->
    assert (index = 2);
    assert (nucleotide_p = Nucleotide.A);
    assert (nucleotide_q = Nucleotide.G)
  | None -> failwith "Codons are not neighbors"

In this example, the codons are compared to find the index of the differing nucleotide and the nucleotides themselves. The index and nucleotides are then compared to the expected values.

nucleotides c returns the triplet of nucleotides of c

Example :

  let codon_option = Codon.of_string "ATG" in
  match codon_option with
  | None -> failwith "Invalid codon string"
  | Some codon ->
    let (n1, n2, n3) = Codon.nucleotides codon in
    assert (n1 = Nucleotide.A);
    assert (n2 = Nucleotide.T);
    assert (n3 = Nucleotide.G)

In this example, the nucleotides of the codon are extracted and compared to the expected values.