imach/src/imach.c - diff

Return to imach.c CVS log

Up to [Local Repository] / imach / src

version 1.59, 2002/11/18 23:01:13	version 1.60, 2002/11/19 00:17:38
Line 3652 int main(int argc, char *argv[])	Line 3652 int main(int argc, char *argv[])
/* Calculates basic frequencies. Computes observed prevalence at single age	/* Calculates basic frequencies. Computes observed prevalence at single age
and prints on file fileres'p'. */	and prints on file fileres'p'. */

	pmmij= matrix(1,nlstate+ndeath,1,nlstate+ndeath); /* creation */
	oldms= matrix(1,nlstate+ndeath,1,nlstate+ndeath); /* creation */
	newms= matrix(1,nlstate+ndeath,1,nlstate+ndeath); /* creation */
	savms= matrix(1,nlstate+ndeath,1,nlstate+ndeath); /* creation */
	oldm=oldms; newm=newms; savm=savms; /* Keeps fixed addresses to free */


/* For Powell, parameters are in a vector p[] starting at p[1]	/* For Powell, parameters are in a vector p[] starting at p[1]
Line 3884 Interval (in months) between two waves:	Line 3889 Interval (in months) between two waves:
fprintf(ficrespl,"\n");	fprintf(ficrespl,"\n");

prlim=matrix(1,nlstate,1,nlstate);	prlim=matrix(1,nlstate,1,nlstate);
pmmij= matrix(1,nlstate+ndeath,1,nlstate+ndeath); /* creation */
oldms= matrix(1,nlstate+ndeath,1,nlstate+ndeath); /* creation */
newms= matrix(1,nlstate+ndeath,1,nlstate+ndeath); /* creation */
savms= matrix(1,nlstate+ndeath,1,nlstate+ndeath); /* creation */
oldm=oldms; newm=newms; savm=savms; /* Keeps fixed addresses to free */

agebase=ageminpar;	agebase=ageminpar;
agelim=agemaxpar;	agelim=agemaxpar;