#include "string.h"
  int hbkey(p,n,a,b,m)
  int n,*m;
  BISERCH *p[];
  char a[],b[];
  { int i,j,k;
    i=1; j=n;
    while (i<=j)
      { k=(i+j)/2;
        if ((strcmp((*p[k-1]).KEY,a)>=0)&&
                  (strcmp((*p[k-1]).KEY,b)<=0))
          { i=k-1; j=0;
            while ((i>=0)&&(strcmp((*p[i]).KEY,a)>=0)) 
                { i=i-1; j=j+1;}
            i=i+1;
            while ((k<=n-1)&&(strcmp((*p[k]).KEY,b)<=0)) 
                { k=k+1; j=j+1;}
            *m=j; return(i);
          }
        if (strcmp((*p[k-1]).KEY,b)>0) j=k-1;
        else i=k+1;
      }
    while ((i>=0)&&(strcmp(b,(*p[i]).KEY)<0)) i=i-1;
    i=i+1; *m=0;
    return(i);
  }