rhofun Function

private function rhofun(rp)

FIXME : Add documentation Only used with ~undocumented irho = 4 option. Ideally would update to take pbar

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: rp

Return Value real


Contents

Source Code

rhofun

Source Code

  real function rhofun (rp)
    implicit none
    real, intent (in) :: rp
    real :: pbar
    pbar = psifun(rp)
    rhofun = geom%rhofun(pbar)
  end function rhofun