f77_syr Interface
public interface f77_syr
Generic old style interface for SYR. Supports s, d. See also: mfi_syr, ssyr, dsyr.
Subroutines
public pure subroutine ssyr(uplo, n, alpha, x, incx, a, lda)
Original interface for SSYR See also: mfi_syr, f77_syr.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=1), | intent(in) | :: | uplo | |||
| integer, | intent(in) | :: | n | |||
| real(kind=REAL32), | intent(in) | :: | alpha | |||
| real(kind=REAL32), | intent(in) | :: | x(*) | |||
| integer, | intent(in) | :: | incx | |||
| real(kind=REAL32), | intent(inout) | :: | a(lda,*) | |||
| integer, | intent(in) | :: | lda |
public pure subroutine dsyr(uplo, n, alpha, x, incx, a, lda)
Original interface for DSYR See also: mfi_syr, f77_syr.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=1), | intent(in) | :: | uplo | |||
| integer, | intent(in) | :: | n | |||
| real(kind=REAL64), | intent(in) | :: | alpha | |||
| real(kind=REAL64), | intent(in) | :: | x(*) | |||
| integer, | intent(in) | :: | incx | |||
| real(kind=REAL64), | intent(inout) | :: | a(lda,*) | |||
| integer, | intent(in) | :: | lda |