/******************  s_m_sum_vec.c  (in u1.a) ******************************
*									    *
* void scalar_mult_sum_u1_vector(u1_vector *a, u1_vector *b, float s);   *
* A <- A + s*B,  A and C vectors 					    *
*/
#include "complex.h"
#include "u1.h"

void scalar_mult_sum_u1_vector(u1_vector *a, u1_vector *b, float s) {
      a->c.real += s*b->c.real;
      a->c.imag += s*b->c.imag;
}