Skip to content

Commit

Permalink
fixed radiation compilation issues
Browse files Browse the repository at this point in the history
  • Loading branch information
achael committed Mar 12, 2024
1 parent 8b910c7 commit af5fa10
Show file tree
Hide file tree
Showing 6 changed files with 15 additions and 15 deletions.
4 changes: 2 additions & 2 deletions PROBLEMS/RADSURVEY/define.h
Original file line number Diff line number Diff line change
Expand Up @@ -125,7 +125,7 @@
/************************************/
//radiation choices
/************************************/
//#define RADIATION
#define RADIATION
#ifdef RADIATION

#define EVOLVEPHOTONNUMBER
Expand Down Expand Up @@ -192,7 +192,7 @@
/************************************/
//electron choices
/************************************/
//#define EVOLVEELECTRONS
#define EVOLVEELECTRONS
#ifdef EVOLVEELECTRONS

#define CONSISTENTGAMMA
Expand Down
18 changes: 9 additions & 9 deletions postproc.c
Original file line number Diff line number Diff line change
Expand Up @@ -1332,16 +1332,16 @@ int calc_scalars(ldouble *scalars,ldouble t)
#endif
int ix;
for(ix=0;ix<NX;ix++)
{
get_xx(ix,0,0,xx);
#ifdef PRECOMPUTE_MY2OUT
get_xxout(ix, 0, 0, xxBL);
#else
coco_N(xx,xxBL,MYCOORDS,OUTCOORDS);
#endif
{
get_xx(ix,0,0,xx);
#ifdef PRECOMPUTE_MY2OUT
get_xxout(ix, 0, 0, xxBL);
#else
coco_N(xx,xxBL,MYCOORDS,OUTCOORDS);
#endif

if(xxBL[1]>radius) break;
}
if(xxBL[1]>radius) break;
}

double totlum;
calc_local_lum(ix,NCCORRECTPOLAR+1,0,&radlum,&totlum);
Expand Down
2 changes: 1 addition & 1 deletion problem.h
Original file line number Diff line number Diff line change
Expand Up @@ -154,7 +154,7 @@
//if you are using a problem older than 100 with a different kappa defined in kappa.c
//make sure your kappa.c ends with (kappa=(.....)) NOT (return kappa)!!

#define PROBLEM 145
#define PROBLEM 140

#if(PROBLEM==146)

Expand Down
2 changes: 1 addition & 1 deletion rad.c
Original file line number Diff line number Diff line change
Expand Up @@ -5219,7 +5219,7 @@ test_solve_implicit_lab()
params[6]=0; //ifelectron
solve_implicit_lab_4dprim(uu0,pp0,&geom,dt,verbose,params,pp);
print_primitives(pp);
printf("gas temp: %e\nrad temp: %e\n",calc_PEQ_Tfromurho(pp[UU],pp[RHO]),calc_LTE_TfromE(pp[EE]));
printf("gas temp: %e\nrad temp: %e\n",calc_PEQ_Tfromurho(pp[UU],pp[RHO],geom.ix,geom.iy,geom.iz),calc_LTE_TfromE(pp[EE]));
}
#endif
exit(1);
Expand Down
2 changes: 1 addition & 1 deletion silo.c
Original file line number Diff line number Diff line change
Expand Up @@ -666,7 +666,7 @@ int fprint_silofile(ldouble time, int num, char* folder, char* prefix)
#endif

//electrons
ne=calc_thermal_ne(pp);
ldouble ne=calc_thermal_ne(pp);
tempeloc=pe/K_BOLTZ/ne;
ldouble gammae=GAMMAE;
#ifdef CONSISTENTGAMMA
Expand Down
2 changes: 1 addition & 1 deletion u2p.c
Original file line number Diff line number Diff line change
Expand Up @@ -383,7 +383,7 @@ u2p(ldouble *uu0, ldouble *pp, void *ggg, int corrected[3], int fixups[2], int t
#ifdef RADIATION

//Do the radiative inversion from u2p_rad.c
u2p_rad(uu,pp,geom,&radcor)
u2p_rad(uu,pp,geom,&radcor);
if(radcor>0) //rad fixups only for critical failure in implicit
{
fixups[1]=1;
Expand Down

0 comments on commit af5fa10

Please sign in to comment.