bl1_randv.c File Reference

(r12600)

Functions
void	bl1_srandv (int n, float *x, int incx)
void	bl1_drandv (int n, double *x, int incx)
void	bl1_crandv (int n, scomplex *x, int incx)
void	bl1_zrandv (int n, dcomplex *x, int incx)

---

Function Documentation

void bl1_crandv	(	int	n,
		scomplex *	x,
		int	incx
	)

References bl1_crands().

Referenced by bl1_crandm(), and bl1_crandmr().

{
    scomplex* chi;
    int       i;

    for ( i = 0; i < n; ++i )
    {
        chi = x + i*incx;

        bl1_crands( chi );
    }
}

void bl1_drandv	(	int	n,
		double *	x,
		int	incx
	)

References bl1_drands().

Referenced by bl1_drandm(), and bl1_drandmr().

{
    double* chi;
    int     i;

    for ( i = 0; i < n; ++i )
    {
        chi = x + i*incx;

        bl1_drands( chi );
    }
}

void bl1_srandv	(	int	n,
		float *	x,
		int	incx
	)

References bl1_srands().

Referenced by bl1_srandm(), and bl1_srandmr().

{
    float* chi;
    int    i;

    for ( i = 0; i < n; ++i )
    {
        chi = x + i*incx;

        bl1_srands( chi );
    }
}

void bl1_zrandv	(	int	n,
		dcomplex *	x,
		int	incx
	)

References bl1_zrands().

Referenced by bl1_zrandm(), and bl1_zrandmr().

{
    dcomplex* chi;
    int       i;

    for ( i = 0; i < n; ++i )
    {
        chi = x + i*incx;

        bl1_zrands( chi );
    }
}