InitSetRadiusCircle Subroutine

public subroutine InitSetRadiusCircle(obj, radius)

Type Bound

Circle_

Arguments

Type IntentOptional Attributes Name
class(Circle_), intent(inout) :: obj
real(kind=real64), intent(in) :: radius