Problem with user defined pointer structures and modules

pwlivermore · ‎07-14-2004

Hi,
The following code does not compile - compilation of module1
results in the error message:

The type of the actual argument differs from the type of the dummy argument.
CALL SUB2(A)

This can't be the case since both types are identical.

The error seems to be coming from the using defined structure POINTER_TYPE which is defined in each module separately.
If instead, the definitions are moved to an entirely separate module which is USEd by module1 and module2, the code compiles fine. Surely (a) defining identical us...

Steven_L_Intel1 · ‎07-14-2004

pwlivermore wrote:
Surely (a) defining identical user types in each module and (b) replacing each definition by a USE statement to a separate "definitions module" should be the same?

Well, you may think so, but the Fortran standard considers these distinct types. Your workaround is the correct solution.