#include <stdio.h>
main(ac,av)
int ac; char *av[];
{
  FILE *fp;
  char a[60],filt[16],d[60];
  int i,j,k,m;
  if(ac<2){ printf("\n\n\t aa N024\n\n"); exit(0); }
  system("mv con1 con1old");
  system("mv av.dat av.datold");
  strcpy(d,"grep ");
  strcat(d,av[1]);
  strcat(d," /vega2/rhbin/cali.dat  > con1");
  printf("%s\n",d);
  system(d);
  fp=fopen("../deep/file","r");
  m=0;
l08:
  fgets(a,60,fp); if(feof(fp)!=0)goto l09;
  filt[m++]=a[4];
  goto l08;
l09:
  fclose(fp);  
  for(i=0;i<m;i++)printf("%c",filt[i]); printf("\n");
  system("wc con1");
  fp=fopen("con1","r");
  j=0;
l10:
  fgets(a,60,fp); if(feof(fp)!=0)goto l20;
  a[20]=0;
  k=(a[4]-48)*1000+(a[5]-48)*100+(a[6]-48)*10+a[7]-48;
  for(i=0;i<m;i++)if(a[12]==filt[i])break;
  if(i==m)i=-1;
  strcpy(d,"cp /batc1/*/*/");
  strcat(d,a); strcat(d," .");
  if(k>427)d[8]='2';
  if(k>1799)d[8]='3';
  if(k>2759) d[8]='4';
  if(k>8000) d[8]='1';
  printf("%2d: %s",++j,a); if(i==-1)printf("-1\n"); else printf("\n");
//    if(i!=-1)printf("%s\n",d);
  if(i!=-1)system(d);
  goto l10;
l20:
  fclose(fp);
//  system("mvcon");
  system("dirccd1");
}