Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Barboza-Alcaniz dark energy model #477

Open
wants to merge 2 commits into
base: master
Choose a base branch
from
Open
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion include/background.h
Original file line number Diff line number Diff line change
Expand Up @@ -16,7 +16,7 @@ enum spatial_curvature {flat,open,closed};

/** list of possible parametrisations of the DE equation of state */

enum equation_of_state {CLP,EDE};
enum equation_of_state {CLP,EDE,SRS};


/** list of possible parametrizations of the varying fundamental constants */
Expand Down
82 changes: 0 additions & 82 deletions output/explanatory00_parameters.ini

This file was deleted.

9 changes: 9 additions & 0 deletions source/background.c
Original file line number Diff line number Diff line change
Expand Up @@ -679,6 +679,9 @@ int background_w_fld(
case CLP:
*w_fld = pba->w0_fld + pba->wa_fld * (1. - a);
break;
case SRS:
*w_fld = ( pba->w0_fld -2*a*pba->w0_fld+ 2*a*a*pba->w0_fld + pba->wa_fld -a*pba->wa_fld ) /( 1.-2*a+2*a*a );
break;
case EDE:
// Omega_ede(a) taken from eq. (10) in 1706.00730
Omega_ede = (pba->Omega0_fld - pba->Omega_EDE*(1.-pow(a,-3.*pba->w0_fld)))
Expand Down Expand Up @@ -714,6 +717,9 @@ int background_w_fld(
case CLP:
*dw_over_da_fld = - pba->wa_fld;
break;
case SRS:
*dw_over_da_fld = ((1.-4*a+2*a*a)*pba->wa_fld)/((1.-2*a +2*a*a)*(1.-2*a +2*a*a));
break;
case EDE:
d2Omega_ede_over_da2 = 0.;
*dw_over_da_fld = - d2Omega_ede_over_da2*a/3./(1.-Omega_ede)/Omega_ede
Expand All @@ -740,6 +746,9 @@ int background_w_fld(
case EDE:
class_stop(pba->error_message,"EDE implementation not finished: to finish it, read the comments in background.c just before this line\n");
break;
case SRS:
*integral_fld =( 3./2. )*( -2*(1+pba->wa_fld+ pba->w0_fld ) *log (a) + pba->wa_fld*log( 1-2*a +2*a*a ) );
break;
}

/** note: of course you can generalise these formulas to anything,
Expand Down
10 changes: 10 additions & 0 deletions source/input.c
Original file line number Diff line number Diff line change
Expand Up @@ -3231,6 +3231,9 @@ int input_read_parameters_species(struct file_content * pfc,
if ((strstr(string1,"CLP") != NULL) || (strstr(string1,"clp") != NULL)) {
pba->fluid_equation_of_state = CLP;
}
else if ((strstr(string1,"SRS") != NULL) || (strstr(string1,"srs") != NULL)) {
pba->fluid_equation_of_state = SRS;
}
else if ((strstr(string1,"EDE") != NULL) || (strstr(string1,"ede") != NULL)) {
pba->fluid_equation_of_state = EDE;
}
Expand All @@ -3246,6 +3249,13 @@ int input_read_parameters_species(struct file_content * pfc,
class_read_double("wa_fld",pba->wa_fld);
class_read_double("cs2_fld",pba->cs2_fld);
}
if (pba->fluid_equation_of_state == SRS) {
/** 8.a.2.2) Equation of state of the fluid in 'LRS' case */
/* Read */
class_read_double("w0_fld",pba->w0_fld);
class_read_double("wa_fld",pba->wa_fld);
class_read_double("cs2_fld",pba->cs2_fld);
}
if (pba->fluid_equation_of_state == EDE) {
/** 8.a.2.3) Equation of state of the fluid in 'EDE' case */
/* Read */
Expand Down