topic MKL interval_arithmetic module in Intel® oneAPI Math Kernel Library

MKL interval_arithmetic module

g_f_thomas — Tue, 08 Apr 2008 15:05:25 GMT

I'm using interval_arithmetic as in

program main

use interval_arithmetic

implicit none

type
(D_INTERVAL) :: A, sumA

!Initialization stuff here

sumA = dinterval(zero, zero)

doj = 1, lda

do i = 1, lda

sumA = sumA + ABS(A(i,j))

enddo

Why is ABS, which is interfaced in the interval_arithmetic module, not recognized as such? The linker issues:

error LNK2019: unresolved external symbol _DI_ABS referenced in function _MAIN__

Thanks,

Gerry

Re: MKL interval_arithmetic module

Todd_R_Intel — Thu, 10 Apr 2008 17:28:11 GMT

Indeed, I only see entry points for _D_ABS. I'll look into this.
-Todd

Re: MKL interval_arithmetic module

Vladimir_Koldakov__I — Wed, 07 May 2008 08:04:58 GMT

Gerry,

There is workaround. Replace, please, name DI_ABS with D_ABS in the file include/mkl_interval.f90.
The same for SI_ABS. Here is diffs:

INTERFACE ABS

- FUNCTION SI_ABS(X)
+ FUNCTION S_ABS(X)
TYPE S_INTERVAL
REAL(4) :: INF, SUP
END TYPE S_INTERVAL
TYPE(S_INTERVAL), INTENT(IN) :: X
- TYPE(S_INTERVAL) :: SI_ABS
- END FUNCTION SI_ABS
+ TYPE(S_INTERVAL) :: S_ABS
+ END FUNCTION S_ABS

- FUNCTION DI_ABS(X)
+ FUNCTION D_ABS(X)
TYPE D_INTERVAL
REAL(8) :: INF, SUP
END TYPE D_INTERVAL
TYPE(D_INTERVAL), INTENT(IN) :: X
- TYPE(D_INTERVAL) :: DI_ABS
- END FUNCTION DI_ABS
+ TYPE(D_INTERVAL) :: D_ABS
+ END FUNCTION D_ABS

END INTERFACE

Thanks,
Vladimir