lengthSeed Function

public function lengthSeed(obj) result(length)

Type Bound

Seed_

Arguments

Type	Intent	Optional	Attributes		Name
class(Seed_),	intent(inout)			::	obj

Return Value real(kind=real64), (3)