1. Forum
  2. Usenet
  3. COMP.LANG.FORTRAN

  • Re: Curious problem with an interface block (conversion of old code)fun

    From John@21:1/5 to All on Wed Oct 12 07:44:30 2022
    43 | function dexp( x )
    | 1
    Error: Symbol ‘dexp’ at (1) already has an explicit interface

    Using dp before the import does seem to be conflating it. Get a nice message if routine is instead

    function dexp( x )
    import :: dp
    real(kind=dp), intent(in) :: x
    real(kind=dp) :: dexp
    end function dexp

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)