__vatan
extern void __vatan(int, double *, int, double *, int);
__vatan(*n, x, *stridex, y, *stridey);