int hashfunction(s)
    char *s;
    
    { int i;

      for( i=0; *s; s++ ) i = 131*i + *s;
      return( i % m );
    }