public interface linv
m > n, 列满秩，使用 linv
Functions
public module function linv_real_kind(x) result(y)
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
real(kind=fffc_real_kind),
|
intent(in) |
|
|
:: |
x(:,:) |
|
Return Value
real(kind=fffc_real_kind), (size(x,2),size(x,1))
public module function linv_complex_kind(x) result(y)
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
complex(kind=fffc_complex_kind),
|
intent(in) |
|
|
:: |
x(:,:) |
|
Return Value
complex(kind=fffc_complex_kind), (size(x,2),size(x,1))