// Search for some words in some texts and return a total score
static double scoredSearch_scoreWeighted2(Cl<Pair<S, Double>> l, LS words) {
  double score = 0;
  if (l != null) for (S s, double weight : unpair l)
    score += scoredSearch_score(s, words)*weight;
  ret score;
}