Jean Vezina said:
> Now, look at this variant of the previous example:
>
> integer,parameter::v(3)=(/3,1,2/)
> real x(3)
> data x(v)/4.,6.,2./
> print *,x
> end
>
> Is this valid ? This example is also rejected by many compilers.
Looks perfectly valid to me.
R534 requires "x(v)" to be a variable, which it is.
The constraint at [61:34-35] requires "v" to be an initialization
expression, which it is (since it is a constant).
Cheers,
--
...........................Malcolm Cohen, NAG Ltd., Oxford, U.K.
([log in to unmask])
________________________________________________________________________
This e-mail has been scanned for all viruses by Star Internet. The
service is powered by MessageLabs. For more information on a proactive
anti-virus service working around the clock, around the globe, visit:
http://www.star.net.uk
________________________________________________________________________
|