Closed DJDavies2 closed 3 months ago
For https://github.com/ecmwf-ifs/ectrans/issues/75.
This is because there are some dummy arguments declared like this:
real(kind=jprd), intent(inout) :: a(n) integer(kind=jpim), intent(in) :: n
I think this counts as "n" being used before it is declared; the solution is to have "n" declared first, this is what this change does.
Seems reasonable.
Yes, it was the NAG compiler.
For https://github.com/ecmwf-ifs/ectrans/issues/75.
This is because there are some dummy arguments declared like this:
real(kind=jprd), intent(inout) :: a(n) integer(kind=jpim), intent(in) :: n
I think this counts as "n" being used before it is declared; the solution is to have "n" declared first, this is what this change does.