#include <S.h>
#include <math.h>
void my_sin_vec(x, n)
double *x; long *n ;
{
	long i ;
	for (i = 0; i < *n ; i++)
		x[i] = sin(x[i]) ;
}