diameter Function

public function diameter(rp)

Returns the diameter of the surface labelled by rp.

Arguments

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

Return Value real


Contents

Source Code


Source Code

  real function diameter(rp)
    implicit none
    real, intent(in) :: rp
    diameter = geom%diameter(rp) !Used to allow rp<rpmin here by just returning zero
  end function diameter