#include <stdio.h>
FILE *fp,*fp1;
main()
{
  char a[40];
  system("ls p*o???.fit >1.1");
  fp1=fopen("1.1","r");
  fp=fopen("1.o","w");
l10:
  fgets(a,40,fp1);  if(feof(fp1))goto l20;
  fprintf(fp,"psc0 %s",a);
  goto l10;
l20:
  fclose(fp1); fclose(fp);
  system("rm 1.1");
  system("source 1.o");
}