/******************* clearvec.c (in su3.a) ***************************** * * * void clearvec( su3_vector *vec ) * * print out a 3 element complex vector * */ #include "complex.h" #include "su3.h" void clearvec( su3_vector *v ){ int j; v->c[0].real = v->c[0].imag = 0.0; v->c[1].real = v->c[1].imag = 0.0; v->c[2].real = v->c[2].imag = 0.0; }