if (defined($REF_NGRAM{$ngram})) {
    if ($REF_NGRAM{$ngram} >= $T_NGRAM{$ngram}) {
	$CORRECT[$n] += $T_NGRAM{$ngram};
    }
    else {
	$CORRECT[$n] += $REF_NGRAM{$ngram};
    }
}
