tensor_size Function

public pure function tensor_size(rank)

compute size of tensor of given rank

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: rank

Return Value integer


Contents

Source Code


Source Code

integer pure function tensor_size(rank)

    integer, intent(in) :: rank

    tensor_size = (rank + 2) * (rank + 1) / 2

end function tensor_size