subscript Function

private function subscript(shape_spec, name)

Returns the subscript of the dimension matching name in the shape_spec array. If no such dimension exists, the function aborts.

Arguments

Type IntentOptional Attributes Name
type(dim_spec_t), intent(in) :: shape_spec(:)

The shape_spec array to search for the name.

character(len=*), intent(in) :: name

The name of the dimension to find the subscript of.

Return Value integer