(vector z) = (zero vector)

 
/* sphzv - zero a vector */

void sphzv(z) double *z; {int i; for (i=0; i<6; i++) z[i]=0.0;}