let
of_int_exn x =
if
x >= 0
then
x
else
Error
(sprintf
"invalid PHRED score %d"
x) |! raise