Skip to content

Commit

Permalink
Fix bug from merge.
Browse files Browse the repository at this point in the history
  • Loading branch information
alisonkyoung1 committed Sep 19, 2024
1 parent b6b62b4 commit 29d08ee
Showing 1 changed file with 5 additions and 3 deletions.
8 changes: 5 additions & 3 deletions src/main/radiation_utils.f90
Original file line number Diff line number Diff line change
Expand Up @@ -411,13 +411,15 @@ end function get_kappa
! calculate opacities
!+
!--------------------------------------------------------------------
subroutine get_opacity(opacity_type,density,temperature,kappa)
subroutine get_opacity(opacity_type,density,temperature,kappa,u)
use eos_stamatellos, only:getopac_opdep
use mesa_microphysics, only:get_kappa_mesa
use units, only:unit_density,unit_opacity
use units, only:unit_density,unit_opacity,unit_ergg
real, intent(in) :: density, temperature
real, intent(in), optional :: u
real, intent(out) :: kappa
integer, intent(in) :: opacity_type
real :: kapt,kapr,rho_cgs
real :: kapt,kapr,rho_cgs,Ti,gmwi,gammai,kapBar,kappaPart

select case(opacity_type)
case(1)
Expand Down

0 comments on commit 29d08ee

Please sign in to comment.