f77_blas_rot Module
Interfaces
public interface f77_rot
Generic old style interface for ROT. Supports s, d, c, z, cs, zd. See also: mfi_rot, srot, drot, crot, zrot, csrot, zdrot.
-
public pure subroutine srot(n, x, incx, y, incy, c, s)
Original interface for SROT See also: mfi_rot, rot. SROT applies a plane rotation.
Arguments
Type Intent Optional Attributes Name integer, intent(in) :: n real(kind=REAL32), intent(in) :: x(*) integer, intent(in) :: incx real(kind=REAL32), intent(in) :: y(*) integer, intent(in) :: incy real(kind=REAL32), intent(in) :: c real(kind=REAL32), intent(in) :: s -
public pure subroutine drot(n, x, incx, y, incy, c, s)
Original interface for DROT See also: mfi_rot, rot. DROT applies a plane rotation.
Arguments
Type Intent Optional Attributes Name integer, intent(in) :: n real(kind=REAL64), intent(in) :: x(*) integer, intent(in) :: incx real(kind=REAL64), intent(in) :: y(*) integer, intent(in) :: incy real(kind=REAL64), intent(in) :: c real(kind=REAL64), intent(in) :: s -
public pure subroutine crot(n, x, incx, y, incy, c, s)
Original interface for CROT See also: mfi_rot, rot. CROT applies a plane rotation.
Arguments
Type Intent Optional Attributes Name integer, intent(in) :: n complex(kind=REAL32), intent(in) :: x(*) integer, intent(in) :: incx complex(kind=REAL32), intent(in) :: y(*) integer, intent(in) :: incy real(kind=REAL32), intent(in) :: c complex(kind=REAL32), intent(in) :: s -
public pure subroutine zrot(n, x, incx, y, incy, c, s)
Original interface for ZROT See also: mfi_rot, rot. ZROT applies a plane rotation.
Arguments
Type Intent Optional Attributes Name integer, intent(in) :: n complex(kind=REAL64), intent(in) :: x(*) integer, intent(in) :: incx complex(kind=REAL64), intent(in) :: y(*) integer, intent(in) :: incy real(kind=REAL64), intent(in) :: c complex(kind=REAL64), intent(in) :: s -
public pure subroutine csrot(n, x, incx, y, incy, c, s)
Original interface for CSROT See also: mfi_rot, rot. CSROT applies a plane rotation.
Arguments
Type Intent Optional Attributes Name integer, intent(in) :: n complex(kind=REAL32), intent(in) :: x(*) integer, intent(in) :: incx complex(kind=REAL32), intent(in) :: y(*) integer, intent(in) :: incy real(kind=REAL32), intent(in) :: c real(kind=REAL32), intent(in) :: s -
public pure subroutine zdrot(n, x, incx, y, incy, c, s)
Original interface for ZDROT See also: mfi_rot, rot. ZDROT applies a plane rotation.
Arguments
Type Intent Optional Attributes Name integer, intent(in) :: n complex(kind=REAL64), intent(in) :: x(*) integer, intent(in) :: incx complex(kind=REAL64), intent(in) :: y(*) integer, intent(in) :: incy real(kind=REAL64), intent(in) :: c real(kind=REAL64), intent(in) :: s