let countA =0 in
let countC =0 in
let countG =0 in
let countT =0 in
let countChar x =
match x with
'A' -> countA = countA + 1
|'C'-> countC = countC + 1
|'G' -> countG = countG
Я новичок в FP и OCaml. Причина, по которой я пытаюсь сделать это таким грубым способом, состоит в том, что я не изучил списки в OCaml. Я пытаюсь написать функцию, которая возвращает медиану 5-кортежа
В настоящее время у меня есть цикл вложенных циклов, после проверки значений он увеличивает каждый ref int внутри функции. То, что я пытаюсь сделать, - это ref ref reset to 0 после каждой итерации вну