Displaying 1 result from an estimated 1 matches for "lipgo".
Did you mean:
lingo
2014 Sep 30
2
Intel Fortran compiler returns a -1 TRUE value
...t; R CMD SHLIB truth.f
ifort -fpic -O3 -xHOST -axCORE-AVX-I -fp-model precise -c truth.f -o
truth.o
ifort: command line warning #10212: -fp-model precise evaluates in source
precision with Fortran.
icc -std=gnu99 -shared -L/usr/local/lib64 -o truth.so truth.o -lifport
-lifcore -limf -lsvml -lm -lipgo -lirc -lpthread -lirc_s -ldl
And runs so:
> dyn.load("truth.so")
> z = .Fortran("truth",as.logical(TRUE))
> z[[1]]
[1] TRUE
> as.numeric(z[[1]])
[1] -1
> z[[1]] == TRUE
[1] FALSE
> all(z[[1]])
[1] TRUE
> identical(z[[1]],TRUE)
[1] FALSE
The v...