InitSetRadiusSphere Subroutine

public subroutine InitSetRadiusSphere(obj, radius)

Arguments

Type	Intent	Optional	Attributes		Name
class(Sphere_),	intent(inout)			::	obj
real(kind=real64),	intent(in)			::	radius

Contents

None