forums.silverfrost.com

enhanced test also works in Plato

type lostPart
integer*4 :: is
real*4, allocatable :: Particles(:,:)
end type lostPart

Type (lostPart), allocat ...

Dan,

I can't see what you are doing wrong.
I use this approach with both FTN95 and Gfortran.
I also have "ispecies" as an allocatable derived type structure.

What compiler options ar ...

reported that he got the speedup 173x from just single GPU

Dan,

Is this dan-talk !!

This speedup needs some explaination !
For my calculations, I can get 10 to 15x with OpenMP (100 Gflop/s), ...

Dan,

I think the only problem is with iand, so I included a corrected I*8 mask.
Let me know if I have misunderstood.

I modified your code, to enforce a 64-bit integer mask, "mask24". ...

Hi Paul,

I tested the slink64 (ver 1.94 ? ) you provided, but it did not produce a noticeable difference when executing the program and reporting the access violation, rather than a trace back.

...

I don't experience the access violation when running your sample

So you do not get the failure I am seeing ? That is a worry.
Could it be related to Win 10 and ntdll.dll ?
ntdll.dll is mentione ...

Paul,

Thanks for investigating this minor problem that has been annoying me for months.
You could confirm you have the same problem I am seeing by using the small reproducer above as trace_back.f9 ...

Paul,

I have made some progress with my larger program (that consists of 20 .f90 files)

I tested my small reproducer with "ftn95 trace_back /checkmate /64 /lgo"
When it reached the Fo ...

Paul,

I have now downloaded the Ver 9.00 (Nov-23) ftn95_update.exe and have done a clean build. This version gives similar results to Ver 9.04.

I am using Windows 10 Pro, version 22H2

Using t ...

Hi Paul,

I downloaded the Ver 9.04 update files from the support links.
I updated 11 files.

I compiles and ran with "ftn95 /lgo" and got a similar resp;onse to ver 9.03, giving a Form ...

Thanks Paul,
I will generate a Ver 9.04, see how it goes and report back.

Paul,

This may be related to the FTN95 files are not all compatible, but this example produces a similar error report on my install.

! reproducer for formast data mismatch

character*20 ...

Hi Paul,

I am typically using Plato for Ver 9.03.0.0 with options of /64 /check.
I build and run using a .bat file.

set options=/64 /check

del manage_shares_error.log

now > manage_shar ...

Dan,

I downloaded from here (the support thread), but there might be a problem with your other .dll's ?

This shows how unique this problem might be.
The following variant shows there is something special about N = 1000 ; i = 19 ?
Does anyone know the reason for the problem with this ?

PROGRAM RUN ...