Satish wrote:
> The basic idea is that add( ) is a generic function (i.e. function overloading) which is bound to type(vector). It can > add to a vector or a scalar. My compiler gives the following error:
>
> generic_procedure_module_MY.f90(10): error #8182: The name is neither an
> abstract interface nor a procedure with an explicit interface. [ADD]
> procedure, nopass :: add
> -----------------------------^
> compilation aborted for generic_procedure_module_MY.f90 (code 1)
> Of course, I DID create an explicit interface in the above program ! Adding or removing the 'pass' / 'nopass'
> attribute made no difference. We can do it in F2003 using GENERIC keyword, but my compiler doesn't support it. Is there
> a way to do it in F95 itself ? -- Satish
If you wanted to use F95, you couldn't use type-bound procedures. Yes, you could define a generic for this, just not as a TBP. As you correctly note, Intel Fortran does not yet support generic type-bound procedures.
Steve Lionel
Intel Developer Support
Nashua, NH
|