FreeCalypso > hg > efr-experiments
view src/set_zero.c @ 8:8b17df8f6340 default tip
add README
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Wed, 17 Apr 2024 17:30:25 +0000 |
parents | 56410792419a |
children |
line wrap: on
line source
/************************************************************************* * * FUNCTION: Set zero() * * PURPOSE: Set vector x[] to zero * *************************************************************************/ #include "typedef.h" #include "basic_op.h" #include "count.h" void Set_zero ( Word16 x[], /* (o) : vector to clear */ Word16 L /* (i) : length of vector */ ) { Word16 i; for (i = 0; i < L; i++) { x[i] = 0; move16 (); } return; }