Actual source code: mkl_utils.c
petsc-3.10.5 2019-03-28
Report Typos and Errors

      1: /* mkl.h could conflict with petscblaslapack.h in mkl_pardiso.c */
      2: /* The current translation unit contains calls specific to mkl library */
      3: #include "petscsys.h"
      4: #include <mkl.h>

      6: PETSC_EXTERN void PetscSetMKL_PARDISOThreads(int threads)
      7: {
      8:   mkl_domain_set_num_threads(threads,MKL_DOMAIN_PARDISO);
      9: }