--- 
:name: cla_wwaddw
:md5sum: e6fda1b93199f58e559cbd022af359dc
:category: :subroutine
:arguments: 
- n: 
    :type: integer
    :intent: input
- x: 
    :type: complex
    :intent: input/output
    :dims: 
    - n
- y: 
    :type: complex
    :intent: input/output
    :dims: 
    - n
- w: 
    :type: complex
    :intent: input
    :dims: 
    - n
:substitutions: {}

:fortran_help: "      SUBROUTINE CLA_WWADDW( N, X, Y, W )\n\n\
  *     Purpose\n\
  *     =======\n\
  *\n\
  *     CLA_WWADDW adds a vector W into a doubled-single vector (X, Y).\n\
  *\n\
  *     This works for all extant IBM's hex and binary floating point\n\
  *     arithmetics, but not for decimal.\n\
  *\n\n\
  *     Arguments\n\
  *     =========\n\
  *\n\
  *     N      (input) INTEGER\n\
  *            The length of vectors X, Y, and W.\n\
  *\n\
  *     X      (input/output) COMPLEX array, dimension (N)\n\
  *            The first part of the doubled-single accumulation vector.\n\
  *\n\
  *     Y      (input/output) COMPLEX array, dimension (N)\n\
  *            The second part of the doubled-single accumulation vector.\n\
  *\n\
  *     W      (input) COMPLEX array, dimension (N)\n\
  *            The vector to be added.\n\
  *\n\n\
  *  =====================================================================\n\
  *\n\
  *     .. Local Scalars ..\n      COMPLEX            S\n      INTEGER            I\n\
  *     ..\n"
