5.1 - coindexed access to a pointer or allocatable component of the coindexed coarray at (1) is not yet supported

5.1 - coindexed access to a pointer or allocatable component of the coindexed coarray at (1) is not yet supported

[Anton Shterenlikht]

Hi

With GCC 5.1 and OpenCoarrays 1.2.0
I get:

  cgca_pfem_integrity[ lcentr(i)%image ] % i( lcentr(i)%elnum ) =       &
 1
Error: Sorry, coindexed access to a pointer or allocatable component of the coindexed coarray at (1) is not yet supported

Is this supported in later versions?

Thanks

Anton

Re: 5.1 - coindexed access to a pointer or allocatable component of the coindexed coarray at (1) is not yet supported

[Steve Kargl]

On Tue, Nov 24, 2015 at 09:21:19AM -0800, Anton Shterenlikht wrote:
> 
> With GCC 5.1 and OpenCoarrays 1.2.0
> I get:
> 
>   cgca_pfem_integrity[ lcentr(i)%image ] % i( lcentr(i)%elnum ) =       &
>  1
> Error: Sorry, coindexed access to a pointer or allocatable component of the coindexed coarray at (1) is not yet supported
> 
> Is this supported in later versions?
> 

Need a compilable piece of code to test.

-- 
Steve

Re: 5.1 - coindexed access to a pointer or allocatable component of the coindexed coarray at (1) is not yet supported

[Anton Shterenlikht]

From sgk@troutmask.apl.washington.edu Tue Nov 24 18:12:36 2015
>
>On Tue, Nov 24, 2015 at 09:21:19AM -0800, Anton Shterenlikht wrote:
>> 
>> With GCC 5.1 and OpenCoarrays 1.2.0
>> I get:
>> 
>>   cgca_pfem_integrity[ lcentr(i)%image ] % i( lcentr(i)%elnum ) =       &
>>  1
>> Error: Sorry, coindexed access to a pointer or allocatable component of the coindexed coarray at (1) is not yet supported
>> 
>> Is this supported in later versions?
>> 
>
>Need a compilable piece of code to test.

I get the same on FreeBSD with gcc6-devel-6.0.0.s20151108,
so probaly not, but I'd be grateful if you could double check.

Sorry I haven't had the time to reduce to a single file.
Please use these 4 files:

http://sourceforge.net/p/cgpack/code/HEAD/tree/head/cgca_m1co.f90
http://sourceforge.net/p/cgpack/code/HEAD/tree/head/cgca_m2lnklst.f90
http://sourceforge.net/p/cgpack/code/HEAD/tree/head/cgca_m2geom.f90
http://sourceforge.net/p/cgpack/code/HEAD/tree/head/cgca_m3pfem.f90

Then e.g.

gfortran6 -c -fcoarray=lib cgca_m1co.f90 cgca_m2lnklst.f90 cgca_m2geom.f90 cgca_m3pfem.f90

Thank you

Anton

Re: 5.1 - coindexed access to a pointer or allocatable component of the coindexed coarray at (1) is not yet supported

[Anton Shterenlikht]

From sgk@troutmask.apl.washington.edu Tue Nov 24 18:12:36 2015
>
>On Tue, Nov 24, 2015 at 09:21:19AM -0800, Anton Shterenlikht wrote:
>> 
>> With GCC 5.1 and OpenCoarrays 1.2.0
>> I get:
>> 
>>   cgca_pfem_integrity[ lcentr(i)%image ] % i( lcentr(i)%elnum ) =       &
>>  1
>> Error: Sorry, coindexed access to a pointer or allocatable component of the coindexed coarray at (1) is not yet supported
>> 
>> Is this supported in later versions?

I tried to work around the problem by:

type rca
  real( kind=cgca_pfem_iwp ), allocatable :: r(:,:)
end type rca
  type( rca ) :: cgca_pfem_centroid_tmp[*], tmp

! identical allocation for tmp%r and cgca_pfem_centroid_tmp[...]%r

  tmp = cgca_pfem_centroid_tmp[ img_curr ]

This also does not work:


   tmp = cgca_pfem_centroid_tmp[ img_curr ]
        1
Error: Sorry, coindexed coarray at (1) with allocatable component is not yet supported


Thanks

Anton

Re: 5.1 - coindexed access to a pointer or allocatable component of the coindexed coarray at (1) is not yet supported

[Anton Shterenlikht]

From sgk@troutmask.apl.washington.edu Tue Nov 24 18:12:36 2015
>
>Need a compilable piece of code to test.

A complete program:

type t
  real, allocatable :: r(:,:)
end type t
 type( t ) :: c[*], l
   allocate( c%r(10,10), source=0.0 )
   allocate( l%r(10,10), source=1.0 )
   sync all
   if ( this_image() .eq. 1 ) l = c[ num_images() ]
   write (*,*) this_image(), sum( l%r )
end

$ gfortran6 -fcoarray=lib z.f90

    if ( this_image() .eq. 1 ) l = c[ num_images() ]
                                  1

Error: Sorry, coindexed coarray at (1) with allocatable component is not yet supported

I cannot think of any workaround.

In my program c%r is allocated differently on each image.
The dimensions of r can be calculated by each image
and passed between images as scalars. This allows
allocating non-coarray arrays l%r of the same size as
the array on remote image. However, there seem to be
no way to pull the data.

Please help

Thanks

Anton