subscript Function

private function subscript(shape_spec, name)

Arguments

Type	Intent	Optional	Attributes		Name
type(dim_spec_t),	intent(in)			::	shape_spec(:)
character(len=*),	intent(in)			::	name

Return Value integer