pbarfun Function

public function pbarfun(r, theta)

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: r
real, intent(in) :: theta

Return Value real


Contents

Source Code

pbarfun

Source Code

  real function pbarfun(r, theta)
    implicit none
    real, intent(in) :: r, theta
    pbarfun = psifun(geom%psi(r, theta))
  end function pbarfun