Hi,there. I have a function which has the following
interface;
function testFn(xx)
implicit none
real,dimension(:) :: xx
real,dimension(size(xx)) :: testFn
When I called this function in the following ways
value = testFn(1.0)
v1 = 1.0
value = testFn(v1) ! v1 has the type real
compiler didn't compile this. I thought that constant is
compatible with any array. I wonder how the make intrisic
function exp() can handle this kind of situation without
using an array of size 1 or multiple definition of the
function. Any help will be appreciated.Thanks.
Jaehoon
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|