Earlier I wrote:
>
> I've just been told (by a new compiler I'm testing) that a
> certain construct I use isn't standard conforming. After
> taking a look at the F90 Handbook I'm reluctantly forced to
> agree. For example,
>
> real, dimension(2,2), parameter :: &
> a = reshape( source=(/ 1.0, 2.0, 3.0, 4.0 /), shape=(/ 2, 2 /) )
I came to this conclusion based on the diagram on p253 of the F90
Handbook which shows initialization expressions as a subclass of
restricted expressions, and section 7.2.9.3 which limits a restricted
expression primary to (among other things) "one of the transformational
intrinsic functions ..., RESHAPE, ..., where each argument is a
restricted expression of type integer or character".
However, after further poking around I found the section that
speaks directly to initialization expressions, and there I find
no restriction on the type of reshape arguments. (The book would
seem to have an error in one place or the other.) This agrees
with what I had always believed to be the case, so I'll take this
to be accurate :).
Sorry for the wasted bandwidth,
---------------------------------------------------------------------------
Neil N. Carlson [log in to unmask]
Department of Mathematics 765-494-1920 (Fax: 4-0548)
Purdue University
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|