mfi_gesvd Interface
public interface mfi_gesvd
Generic modern interface for GESVD. Supports s, d, c, z. See also: sgesvd, dgesvd, cgesvd, zgesvd.
Module Procedures
public pure subroutine mfi_sgesvd(a, s, u, vt, ww, job, info)
Modern interface for sgesvd. See also: mfi_gesvd, f77_gesvd.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=REAL32), | intent(inout) | :: | a(:,:) | |||
| real(kind=REAL32), | intent(out) | :: | s(:) | |||
| real(kind=REAL32), | intent(out), | optional, | target | :: | u(:,:) | |
| real(kind=REAL32), | intent(out), | optional, | target | :: | vt(:,:) | |
| real(kind=REAL32), | intent(out), | optional, | target | :: | ww(:) | |
| character(len=1), | intent(in), | optional | :: | job | ||
| integer, | intent(out), | optional | :: | info |
public pure subroutine mfi_dgesvd(a, s, u, vt, ww, job, info)
Modern interface for dgesvd. See also: mfi_gesvd, f77_gesvd.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=REAL64), | intent(inout) | :: | a(:,:) | |||
| real(kind=REAL64), | intent(out) | :: | s(:) | |||
| real(kind=REAL64), | intent(out), | optional, | target | :: | u(:,:) | |
| real(kind=REAL64), | intent(out), | optional, | target | :: | vt(:,:) | |
| real(kind=REAL64), | intent(out), | optional, | target | :: | ww(:) | |
| character(len=1), | intent(in), | optional | :: | job | ||
| integer, | intent(out), | optional | :: | info |
public pure subroutine mfi_cgesvd(a, s, u, vt, ww, job, info)
Modern interface for cgesvd. See also: mfi_gesvd, f77_gesvd.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| complex(kind=REAL32), | intent(inout) | :: | a(:,:) | |||
| real(kind=REAL32), | intent(out) | :: | s(:) | |||
| complex(kind=REAL32), | intent(out), | optional, | target | :: | u(:,:) | |
| complex(kind=REAL32), | intent(out), | optional, | target | :: | vt(:,:) | |
| real(kind=REAL32), | intent(out), | optional, | target | :: | ww(:) | |
| character(len=1), | intent(in), | optional | :: | job | ||
| integer, | intent(out), | optional | :: | info |
public pure subroutine mfi_zgesvd(a, s, u, vt, ww, job, info)
Modern interface for zgesvd. See also: mfi_gesvd, f77_gesvd.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| complex(kind=REAL64), | intent(inout) | :: | a(:,:) | |||
| real(kind=REAL64), | intent(out) | :: | s(:) | |||
| complex(kind=REAL64), | intent(out), | optional, | target | :: | u(:,:) | |
| complex(kind=REAL64), | intent(out), | optional, | target | :: | vt(:,:) | |
| real(kind=REAL64), | intent(out), | optional, | target | :: | ww(:) | |
| character(len=1), | intent(in), | optional | :: | job | ||
| integer, | intent(out), | optional | :: | info |