diameter Function

private pure function diameter(self, rp)

FIXME : Add documentation

Type Bound

leq_type

Arguments

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

Return Value real


Contents

Source Code


Source Code

  pure real function diameter (self, rp)
    class(leq_type), intent(in) :: self
    real, intent(in) :: rp
    diameter = 2. * rp
  end function diameter