CHPR2 ( UPLO N ALPHA X INCX Y INCY AP -- )

Vocabulary

math.blas.ffi

Inputs

UPLO	an object
N	an object
ALPHA	an object
X	an object
INCX	an object
Y	an object
INCY	an object
AP	an object

Outputs

None

Definition

USING: alien.fortran ;

IN: math.blas.ffi

: CHPR2 ( UPLO N ALPHA X INCX Y INCY AP -- )
    f "blas" "CHPR2" {
        "CHARACTER*1"
        "INTEGER"
        "COMPLEX"
        "COMPLEX(*)"
        "INTEGER"
        "COMPLEX(*)"
        "INTEGER"
        "COMPLEX(*)"
    } fortran-invoke ;