Re: [PATCH] Implementation of RANDOM_INIT from F2018

2018-01-09 Thread Damian Rouson
Hi Steve, Here are the results of compiling with the OpenCoarrays “caf” compiler wrapper, which uses -fcoarray=lib -lcaf_mpi: 1. random_init(repeatable=.true., image_distinct=.true.) gives repeatable sequences that are distinct on each image. 2. random_init(.true., .false.) gives repeatable seq

Re: [PATCH] Implementation of RANDOM_INIT from F2018

2018-01-09 Thread Steve Kargl
On Mon, Jan 08, 2018 at 06:51:06PM -0800, Jerry DeLisle wrote: > On 01/08/2018 04:58 PM, Steve Kargl wrote: > > > > Boostrapped and regression tested on x86_64-*-freebsd. > > OK to commit? > > > > Yes, Looks good Steve. So all we need is a run test with actual =lib case. > Just realized that

Re: [PATCH] Implementation of RANDOM_INIT from F2018

2018-01-08 Thread Steve Kargl
On Mon, Jan 08, 2018 at 06:51:06PM -0800, Jerry DeLisle wrote: > On 01/08/2018 04:58 PM, Steve Kargl wrote: > > On Sun, Jan 07, 2018 at 06:52:22PM -0800, Steve Kargl wrote: > >> > >> I have zero knowledge about co-arrays and especially zero > >> knowledge about gfortran internals for co-arrays. I'

Re: [PATCH] Implementation of RANDOM_INIT from F2018

2018-01-08 Thread Jerry DeLisle
On 01/08/2018 04:58 PM, Steve Kargl wrote: > On Sun, Jan 07, 2018 at 06:52:22PM -0800, Steve Kargl wrote: >> >> I have zero knowledge about co-arrays and especially zero >> knowledge about gfortran internals for co-arrays. I'm >> disinclined to waste another 12 hours trying to get gfortran >> to e

Re: [PATCH] Implementation of RANDOM_INIT from F2018

2018-01-08 Thread Steve Kargl
On Mon, Jan 08, 2018 at 05:33:01PM -0800, Damian Rouson wrote: > I’ll be glad to test with -fcoarray=lib -lcaf_mpi with two caveats: > > 1. My turnaround time will probably usually be 48-72 hours for > such tests. Turn around time is unimportant to me. I'm simply interested if what I have done w

Re: [PATCH] Implementation of RANDOM_INIT from F2018

2018-01-08 Thread Damian Rouson
I’ll be glad to test with -fcoarray=lib -lcaf_mpi with two caveats: 1. My turnaround time will probably usually be 48-72 hours for such tests.   2. I don’t monitor this mailing list very closely so I might miss similar requests unless they are also submitted as issues on the OpenCoarrays GitHub

Re: [PATCH] Implementation of RANDOM_INIT from F2018

2018-01-08 Thread Steve Kargl
On Sun, Jan 07, 2018 at 06:52:22PM -0800, Steve Kargl wrote: > > I have zero knowledge about co-arrays and especially zero > knowledge about gfortran internals for co-arrays. I'm > disinclined to waste another 12 hours trying to get gfortran > to emit essentially a call to this_image(). See ires

[PATCH] Implementation of RANDOM_INIT from F2018

2018-01-07 Thread Steve Kargl
I have attached my current implementation for RANDOM_INIT. For programs compiled without -fcoarry= or with -fcoarray=single, the one gets, % cat random_init_2.f90 program foo real x(2) call random_init(.false., .false.) call random_number(x) print *, x call random_init(.false., .f