/*-------------- Telecommunications & Signal Processing Lab ---------------
                             McGill University

Routine:
  void VRfZero (float y[], int N)

Purpose:
  Zero an array of floats

Description:
  This routine zeros N elements of a given float array,
    y[i] = 0.0,  0 <= i < N.

Parameters:
  <-  float y[]
      Array of floats (N elements)
   -> int N
      Number of elements

Author / revision:
  P. Kabal  Copyright (C) 1996
  $Revision: 1.5 $  $Date: 1996/05/06 20:40:18 $

-------------------------------------------------------------------------*/

static char rcsid[] = "$Id: VRfZero.c 1.5 1996/05/06 AFsp-V2R1 $";

#include <libtsp.h>

void
VRfZero (y, N)

     float y[];
     int N;

{
  int i;

  for (i = 0; i < N; ++i)
    y[i] = 0.0;

  return;
}