Returns the diameter of the surface labelled by rp.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real, | intent(in) | :: | rp |
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