void CORE_sgeqp3_init	(	int	n,
		int *	jpvt
	)

CORE_sgeqp3_init initializes jpvt to [1, ..., n]. Uses 1-based indexing for Fortran compatability.

Parameters

[in]	n	Size of vector.
[in,out]	jpvt	Vector of size n. On exit, jpvt[i] = i+1.