John Reid is having problems in post this message:
NP
-----Original Message-----
From: John Reid [SMTP:[log in to unmask]]
Sent: Friday, November 14, 1997 6:43 PM
To: [log in to unmask]; [log in to unmask]
Subject: Re: Error with sum function
> can somebody explain me why I am getting the following error:
>
> Error: The part-name to the right of a part-ref with nonzero rank has the POINTER attribute (6.1.2). [SPECIES]
See page 134 of Metcalf and Reid:
Additionally, a {part-name} to the right of a {part-ref} with nonzero
rank must not have the POINTER attribute. This is because such an
object would represent an array of pointers and require a very
different implementation mechanism from that needed for an ordinary
array. For example, consider the array
TYPE(ENTRY), DIMENSION(N) :: ROWS ! N of type INTEGER
for the type ENTRY defined near the end of Section 6.5.2. If we were
allowed to write the object ROWS%NEXT, it would be interpreted as
another array of size N and type ENTRY, but its elements are likely to
be stored without any regular pattern (each having been separately
given storage by an ALLOCATE statement) and indeed some will be null if
any of the pointers are disassociated. Note that there is no problem
over accessing individual pointers such as ROWS(I)%NEXT.
Hope this helps.
John Reid.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|