Displaying 1 result from an estimated 1 matches for "dogidog".
Did you mean:
dog_dog
2001 Oct 11
3
Underscores and Fortran code
...#39;ve
appended a simple test case below.
--
Brett Presnell
Department of Statistics
University of Florida
http://www.stat.ufl.edu/~presnell/
dog1.f:
subroutine dog_dog(x,y,z)
implicit none
double precision x,y,z
z = x+y
return
end
dog2.f:
subroutine dogidog(x,y,z)
implicit none
double precision x,y,z
z = x+y
return
end
After
bash$ R CMD SHLIB dog1.f
bash$ R CMD SHLIB dog2.f
note the symbols
bash$ nm dog1.so | grep dog
00000730 T dog_dog__
bash$ nm dog2.so | grep dog
00000730 T dogidog_
and in R
> x <- 2; y &l...