Sphere_Factory Function

public function Sphere_Factory(this, division, n) result(Spheres)

$OMP end parallel do

Type Bound

Factory_

Arguments

Type	Intent	Optional	Attributes		Name
class(Factory_),	intent(in)			::	this
integer(kind=int32),	intent(in)			::	division(1:3)
integer(kind=int32),	intent(in)			::	n

Return Value type(FEMDomain_), (n)