/* Escala los recuentos de los símbolos, esta vez redondeando al  
   entero inferior más cercano. */  
void scale_probs() {  
  int i;  
  for (i = ALPHA_SIZE; i>=0; i--) {  
    prob[i] = prob[i]/2;  
  }  
  fprintf(stderr,"S");  
}