fortran - Fortran 90 で関数を定義する方法

Question

モジュール コードで関数を定義し、それをメインの fortran コードで呼び出そうとしていますが、コードをコンパイルしようとすると、次のエラーが発生します。

この実引数は、外部ユーザー関数の名前または組み込み関数の名前でなければなりません。

私の機能は次のとおりです。

Function func (x)  
   implicit none  
   double precision func,x  
   func=x  
   RETURN  
end function func

そしてメインコードで

call Romberg (dra,func,ra(mm),ra(kk))

ra(mm)との距離を測りたいra(kk)