#include <stdio.h>
#include <stdlib.h>
#include "mkl.h"
#define N  140
int main() 
{
    MKL_INT i;  
    MKL_INT info;
    MKL_INT size = N;
    double *arr = (double*)mkl_calloc( size, sizeof(double), 64);
    
    /* For random generation of matrices */
    MKL_INT idist = 1;
    MKL_INT iseed[] = { 0, 1, 2, 3 };

    /* Random generation of matrices */
    dlarnv(&idist, iseed, &size, arr);

    for (i = 0; i < size; i++) {
	printf(".. %d , %lf  \n", i, arr[i]);
    }
 
    mkl_free(arr);
    return 0;
}