@brief Fortran-90 routine for packing symmetric matrix to 1D array
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=dp), | intent(in) | :: | A(:,:) | |||
| real(kind=dp), | intent(out) | :: | AP(:) | |||
| character(len=1), | intent(in), | optional | :: | UPLO |
@brief Fortran-77 routine for packing symmetric matrix to 1D array
@date 6 October 2021 - Initial release - @author Igor S. Gerasimov
@param[in] A - matrix for packing (N x N)
@param[in] N - shape of matrix A
@param[out] AP - packed matrix ( N*(N+1)/2 )
@param[in] UPLO - format of packed matrix, U for upper and L for lower
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=dp), | intent(in) | :: | A(N,*) | |||
| integer, | intent(in) | :: | N | |||
| real(kind=dp), | intent(out) | :: | AP(*) | |||
| character(len=1), | intent(in) | :: | UPLO |