#include <stdio.h>
#include "clips.h"
#define MX 80

main(int argc,char *argv[])
{
 int x,y,I,J;
 char a[MX], b[MX], c[MX], d[MX];
 FILE *af, *bf, *cf, *df;
 char *multix3;
 if(argc<7)
    printf("\nUsage:multix <Input File> <.......> <.......>\n");

   else
   { af=fopen(argv[1],"r");
     bf=fopen(argv[2],"r");
     cf=fopen(argv[3],"r");
     df=fopen(argv[4],"r");
     J =atoi(argv[5]);
     I =atoi(argv[6]);
     init_clips();
     load_rules("multix3");
     {
      for(x=1;x<=J;x++)
       {for(y=1;y<=I;y++)
	{ reset_clips();
	fgets(a,50,af);
       /* printf("%s\n",a);*/
	fgets(b,50,bf);
       /* printf("%s\n",b);*/
	fgets(c,50,cf);
       /* printf("%s\n",c);*/
	fgets(d,50,df);
       /* printf("%s\n",d);*/
	assert(a);
	assert(b);
	assert(c);
	assert(d);
	run(-1); }
	       }
	     }
	 fclose(af);
	 fclose(bf);
	 fclose(cf);
	 fclose(df);
	 exit();
	     }
	}
usrfuncs()
  {
   }
