subroutine mersenne_twister::random_gauss::random_gauss_s ( real, dimension(:), intent(out)  harvest )

private