The type of the actual argument differs from the type of the dummy argument

[davidgraham]

I'm getting the following error - I cannot see why as the definitions look the same.

Error 1 error #6633: The type of the actual argument differs from the type of the dummy argument. [PT]

The definition of the subroutine is as follows - I have only included part of it as the problem is with 'pt'.

subroutine TriSlopeSym (sym,pt,X4,Y4,Z4,sfx,brgsym)

type enhType
integer*4 e,n,h
end type

type (enhType) pt(3)

The definition of the call is as follows - I have only included part of the code

type enhType
integer*4 e,n,h
end type

type (enhType) pt(3)

call TriSlopeSym (sym,pt,X4,Y4,Z4,sfx,brgsym)

[Arjen_Markus]

It looks as if you have literally repeated the definition of the enhType derived type. The Fortran standard dictates that these are nevertheless to be considered two _different_ types. Hence the message.

What you should do is put the definition of enhType in a module that you use anywhere that you have such variables.

Regards,

Arjen

[davidgraham]

Arjen,
Thanks, I added them to a module and it worked fine.
David

[Arjen_Markus]

You're welcome

Regards,

Arjen