(j3.2006) Actual argument rank 2 array X(1, 4) associated with dummy rank 1 array - is that allowed ?

[Toon Moene]

Reinhold Bader wrote:

> Toon Moene schrieb:
>> I came upon a piece of code in our Weather Forecasting system that
>> roughly did the following:
>>
>> SUBROUTINE A(X, N)
>> REAL X(N, 4), Y(N)
>> ...
>> CALL B(Y, N)
>> DO I = 1, N
>>    X(I,4) = Y
> 
> The RHS should be Y(I), I guess ...

Yep, definitely.  Thanks for the pointers ...

-- 
Toon Moene - e-mail: toon at moene.org - phone: +31 346 214290
Saturnushof 14, 3738 XG  Maartensdijk, The Netherlands
At home: http://moene.org/~toon/
Progress of GNU Fortran: http://gcc.gnu.org/gcc-4.5/changes.html