Hello,
I am trying to compile a module of different mathematical
Fortran 90 routines. All routines are supposed to
evaluate the same type of function. The interface of this
function is given below.
INTERFACE
FUNCTION Func1d(x)
USE Num_const
REAL(RS), INTENT(IN) :: x
REAL(RS) :: Func1d
END FUNCTION Func1d
END INTERFACE
To reduce redundant Fortran coding, I am looking for a way to
avoid the interface statement in each routine.
Does anyone know an elegant way to solve this problem ?
Thanks,
Göran
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|