sla_wwaddw (3p)

Name

sla_wwaddw - single vector

Synopsis

SUBROUTINE SLA_WWADDW( N, X, Y, W )


INTEGER N

REAL X(*), Y(*), W(*)


SUBROUTINE SLA_WWADDW_64( N, X, Y, W )


INTEGER*8 N

REAL X(*), Y(*), W(*)


F95 INTERFACE
SUBROUTINE LA_WWADDW( N, X, Y, W )


INTEGER :: N

REAL, DIMENSION(:) :: X, Y, W


SUBROUTINE LA_WWADDW_64( N, X, Y, W )


INTEGER(8) :: N

REAL, DIMENSION(:) :: X, Y, W


C INTERFACE
#include <sunperf.h>

void sla_wwaddw (int n, float *x, float *y, float *w);


void sla_wwaddw_64 (long n, float *x, float *y, float *w);

Description

Oracle Solaris Studio Performance Library                       sla_wwaddw(3P)



NAME
       sla_wwaddw - add a vector into a doubled-single vector


SYNOPSIS
       SUBROUTINE SLA_WWADDW( N, X, Y, W )


       INTEGER N

       REAL X(*), Y(*), W(*)


       SUBROUTINE SLA_WWADDW_64( N, X, Y, W )


       INTEGER*8 N

       REAL X(*), Y(*), W(*)


   F95 INTERFACE
       SUBROUTINE LA_WWADDW( N, X, Y, W )


       INTEGER :: N

       REAL, DIMENSION(:) :: X, Y, W


       SUBROUTINE LA_WWADDW_64( N, X, Y, W )


       INTEGER(8) :: N

       REAL, DIMENSION(:) :: X, Y, W


   C INTERFACE
       #include <sunperf.h>

       void sla_wwaddw (int n, float *x, float *y, float *w);


       void sla_wwaddw_64 (long n, float *x, float *y, float *w);


PURPOSE
       sla_wwaddw adds a vector W into a doubled-single vector (X, Y).

       This  works  for  all extant IBM's hex and binary floating point arith-
       metics, but not for decimal.


ARGUMENTS
       N (input)
                 N is INTEGER
                 The length of vectors X, Y, and W.


       X (input/output)
                 X is REAL array, dimension (N)
                 The first part of the doubled-single accumulation vector.


       Y (input/output)
                 Y is REAL array, dimension (N)
                 The second part of the doubled-single accumulation vector.


       W (input)
                 W is REAL array, dimension (N)
                 The vector to be added.




                                  7 Nov 2015                    sla_wwaddw(3P)