/*** MAIN.C ***/

#include "header.h"

#define	TIMESTEPS	(5000)
#define	PREYDIFF	1
#define	LEFTBIAS	(0.0)
#define	TSKIP		10
#define	XSKIP		1

int	preydiff;
double	leftbias;

int main(int argc, char **argv)
{
	int	i;
	int	step;
	FILE	*imfileid;

	preydiff = PREYDIFF;
	leftbias = LEFTBIAS;
	if (argc>1)  ArgumentControl(argc,argv);

	InitSeed();
	Initialize_Arena(&habitat[0][0]);
	Initial_Conditions(habitat);

	imfileid = fopen("dissolve.eps","w");
	EPS_Header(imfileid,NCOLS/XSKIP,TIMESTEPS/TSKIP);

	for(step=0;step<TIMESTEPS;step++)
	{
		if(step%TSKIP==0)
			EPS_Row(habitat,(int)(NROWS/2),XSKIP,imfileid);

		for(i=0;i<preydiff;i++) DiffusePrey(&habitat[0][0], leftbias);

		if(step%500==0) printf(" time: %4d\n", step);
	}
	EPS_Trailer(imfileid);
	return (0);
}


void ArgumentControl(int argc, char **argv)
{
     	int argcount, skip;

	for(argcount=1; argcount<argc; argcount+=skip)
     	{
		if(argv[argcount][0] == '-')
     		{
     			skip = 1;
			switch(argv[argcount][1])
     			{
				case 'b':
					sscanf(argv[argcount+1],"%lf",&leftbias);
					if(leftbias<-0.25||leftbias>0.25)
					{
						printf("need |leftbias|<0.25 ... quiting.\n");
     						exit(0);
     					}
					skip++;
					break;
				case 'd':
					sscanf(argv[argcount+1],"%d",&preydiff);
					skip++;
					break;

				default:
     					printf("**invalid command line argument >%c< \n",
     						    argv[argcount][1]);
     					printf("command line arguments:\n");
     					printf(" -b (%f) >>leftward bias (abs<0.25)\n", leftbias);
     					printf(" -d (%d) >>diffusive steps\n", preydiff);
     					exit(0);
     			}
     		}  
     	}
}