Increase maximum redshift to z=10

This commit is contained in:
Guilhem Lavaux 2021-02-25 14:19:00 +02:00
parent ccc469aa6e
commit 017c0095d7

View file

@ -170,8 +170,8 @@ int main(int argc, char **argv) {
double result, error; double result, error;
size_t nEval; size_t nEval;
int iZ, numZ = 4000; int iZ, numZ = 8000;
double maxZ = 5.0, z, *dL, *redshifts; double maxZ = 10.0, z, *dL, *redshifts;
dL = (double *) malloc(numZ * sizeof(double)); dL = (double *) malloc(numZ * sizeof(double));
redshifts = (double *) malloc(numZ * sizeof(double)); redshifts = (double *) malloc(numZ * sizeof(double));
for (iZ = 0; iZ < numZ; iZ++) { for (iZ = 0; iZ < numZ; iZ++) {
@ -181,7 +181,7 @@ int main(int argc, char **argv) {
//printf("HERE %e %e\n", z, dL[iZ]); //printf("HERE %e %e\n", z, dL[iZ]);
redshifts[iZ] = z; redshifts[iZ] = z;
} }
gsl_interp *interp = gsl_interp_alloc(gsl_interp_linear, 4000); gsl_interp *interp = gsl_interp_alloc(gsl_interp_linear, numZ);
gsl_interp_init(interp, dL, redshifts, numZ); gsl_interp_init(interp, dL, redshifts, numZ);
gsl_interp_accel *acc = gsl_interp_accel_alloc(); gsl_interp_accel *acc = gsl_interp_accel_alloc();