mfi_rot Interface
public interface mfi_rot
Generic modern interface for ROT. Supports s, d, c, z, cs, zd. See also: srot, drot, crot, zrot, csrot, zdrot.
Module Procedures
public pure subroutine mfi_srot(x, y, c, s, incx, incy)
Modern interface for srot. See also: mfi_rot, f77_rot. Given two vectors x and y, each vector element of these vectors is replaced as follows:
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=REAL32), | intent(inout) | :: | x(:) | |||
| real(kind=REAL32), | intent(inout) | :: | y(:) | |||
| real(kind=REAL32), | intent(in) | :: | c | |||
| real(kind=REAL32), | intent(in) | :: | s | |||
| integer, | intent(in), | optional | :: | incx | ||
| integer, | intent(in), | optional | :: | incy |
public pure subroutine mfi_drot(x, y, c, s, incx, incy)
Modern interface for drot. See also: mfi_rot, f77_rot. Given two vectors x and y, each vector element of these vectors is replaced as follows:
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=REAL64), | intent(inout) | :: | x(:) | |||
| real(kind=REAL64), | intent(inout) | :: | y(:) | |||
| real(kind=REAL64), | intent(in) | :: | c | |||
| real(kind=REAL64), | intent(in) | :: | s | |||
| integer, | intent(in), | optional | :: | incx | ||
| integer, | intent(in), | optional | :: | incy |
public pure subroutine mfi_crot(x, y, c, s, incx, incy)
Modern interface for crot. See also: mfi_rot, f77_rot. Given two vectors x and y, each vector element of these vectors is replaced as follows:
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| complex(kind=REAL32), | intent(inout) | :: | x(:) | |||
| complex(kind=REAL32), | intent(inout) | :: | y(:) | |||
| real(kind=REAL32), | intent(in) | :: | c | |||
| complex(kind=REAL32), | intent(in) | :: | s | |||
| integer, | intent(in), | optional | :: | incx | ||
| integer, | intent(in), | optional | :: | incy |
public pure subroutine mfi_zrot(x, y, c, s, incx, incy)
Modern interface for zrot. See also: mfi_rot, f77_rot. Given two vectors x and y, each vector element of these vectors is replaced as follows:
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| complex(kind=REAL64), | intent(inout) | :: | x(:) | |||
| complex(kind=REAL64), | intent(inout) | :: | y(:) | |||
| real(kind=REAL64), | intent(in) | :: | c | |||
| complex(kind=REAL64), | intent(in) | :: | s | |||
| integer, | intent(in), | optional | :: | incx | ||
| integer, | intent(in), | optional | :: | incy |
public pure subroutine mfi_csrot(x, y, c, s, incx, incy)
Modern interface for csrot. See also: mfi_rot, f77_rot. Given two vectors x and y, each vector element of these vectors is replaced as follows:
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| complex(kind=REAL32), | intent(inout) | :: | x(:) | |||
| complex(kind=REAL32), | intent(inout) | :: | y(:) | |||
| real(kind=REAL32), | intent(in) | :: | c | |||
| real(kind=REAL32), | intent(in) | :: | s | |||
| integer, | intent(in), | optional | :: | incx | ||
| integer, | intent(in), | optional | :: | incy |
public pure subroutine mfi_zdrot(x, y, c, s, incx, incy)
Modern interface for zdrot. See also: mfi_rot, f77_rot. Given two vectors x and y, each vector element of these vectors is replaced as follows:
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| complex(kind=REAL64), | intent(inout) | :: | x(:) | |||
| complex(kind=REAL64), | intent(inout) | :: | y(:) | |||
| real(kind=REAL64), | intent(in) | :: | c | |||
| real(kind=REAL64), | intent(in) | :: | s | |||
| integer, | intent(in), | optional | :: | incx | ||
| integer, | intent(in), | optional | :: | incy |