Quantcast
Channel: Intel® Software - Intel® oneAPI Math Kernel Library & Intel® Math Kernel Library
Viewing all articles
Browse latest Browse all 3005

/iface option cause mkl_dcsrmm error

$
0
0

I tried test the MKL subroutine mkl_dcsrmm on my 64-bit windows 7 with visual studio 2010 and Intel Fortran composer 2013. If I set the /iface as default, the subroutine mkl_dcsrmm worked fine. But once I changed /iface option as /iface:mixed_str_len_arg, the mkl_dscrmm reported error. Here is my code

          program test
          implicit none
          integer  m,  nnz, mnew, nnz1
          parameter( m = 5,  nnz=13, mnew=3, nnz1=9)
          real*8  values(nnz), values1(nnz1)
          integer columns(nnz), rowIndex(m+1), columns1(nnz1), rowIndex1(m+1)
          integer pointerB(m) , pointerE(m)

!    Sparse representation of the matrix A
          data values/1.d0, -1.d0, -3.d0, -2.d0, 5.d0,4.d0, 6.d0, 4.d0, -4.d0, 2.d0, 7.d0, 8.d0, -5.d0/
          data rowIndex/1, 4,  6,  9,  12, 14/
          data columns/1, 2, 4, 1, 2, 3, 4, 5, 1, 3, 4, 2, 5/

!    Declaration of local variables :
          integer n
          parameter (n=2)
          real*8 rhs(m, n), sol(m, n), temp(m, n)
          data sol/1.D0, 1.D0, 1.D0, 1.D0, 1.D0,5.D0, 4.D0, 3.D0, 2.D0, 1.D0/
          real*8 alpha, beta
          data alpha/1.d0/, beta/0.d0/
          integer i, j, is           
          
          call mkl_dcsrmm('t', m, n, m, alpha, 'tln', &
                values, columns, rowIndex, rowindex(2), sol, m,  beta, rhs,  m)
          end  program test

How can I fix it?  Thanks in advance.

Jing


Viewing all articles
Browse latest Browse all 3005

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>