TODO: seq_probability_given_a_model()