intrgb() function

[Stefano Antoniazzi]

Why calls to intrgb() with gfortran generate the following error message ?

Error: Function 'intrgb'  has no IMPLICIT type|
||=== Build failed: 1 error(s), 0 warning(s) (0 minute(s), 2 second(s)) ===|

I'm using:

    use dislin

at the beginning of a program.

Adding the interface directly inside my program solves the issue but it's not clear why:

interface
      function intrgb(xr,xg,xb)
      implicit none
      real, intent (in) :: xr,xg,xb
      integer :: intrgb
    end function intrgb
end interface

[Helmut Michels]

Hi,

you need the 'use dislin' statement in every program unit. where you are calling Dislin functions

or subroutines.

With best regards,

Helmut