Hello,
Here is my main program:
...
use func
use mult
...
print*, my_function(func,dfunc)
...
Both func and dfunc are defined in module func:
...
function func(x)
real :: func
...
endfunction func
function dfunc
real, dimension(2) :: dfunc
...
endfunction dfunc
Also, my_function is defined in...