Merge branch 'development' of github.com:starkiller-astro/Microphysics into development

Author: zingale

integration/VODE/vode_type_simplified_sdc.F90

@@ -544,8 +544,8 @@ subroutine jac_to_vode(time, jac_react, vode_state, jac)
 
     eos_state % rho = vode_state % rpar(irp_SRHO)
     eos_state % T = 1.e4   ! initial guess
-    eos_state % xn(:) = y(SFS:SFS-1+nspec)/vode_state % rpar(irp_SRHO)
-    eos_state % h = y(SENTH)/vode_state % rpar(irp_SRHO)
+    eos_state % xn(:) = vode_state % y(SFS:SFS-1+nspec)/vode_state % rpar(irp_SRHO)
+    eos_state % h = vode_state % y(SENTH)/vode_state % rpar(irp_SRHO)
 
     call eos(eos_input_rh, eos_state)
 

interfaces/burn_type.F90

@@ -44,6 +44,11 @@ module burn_type_module
     real(rt) :: aux(naux)
 #endif
 
+#if SDC_EVOLVE_ENTHALPY
+    ! make pressure available to RHS
+    real(rt) :: p0
+#endif
+    
     real(rt) :: cv
     real(rt) :: cp
     real(rt) :: y_e