forums.silverfrost.com

Also how about SSE2 and AVX instructions with 64bit compilers. Do they still support 80bit accuracy?

No ! this is the problem with AVX registers, they only support grouped 4/8 byte instructions.
...

Dan,

Coarrays and MPI (distributed processing) was introduced into Fortran 2008.

DO CONCURRENT (DC) was also introduced in Fortran 2008, but locality-specs wern't introduced until Fortran 2018 a ...

OK,

A new program that demonstrates 32-bit has different round-off.

program main
use iso_fortran_env
implicit none
double precision :: a,b,c,d, one = 1
logical :: ...

The recent Fortran versions of DO CONCURRENT now includes locality-specs for multi-threading.
You can now (Ver 2023) specify LOCAL, LOCAL_INIT, REDUCE, SHARED, and DEFAULT (NONE) in the same DO CONCU ...

I changed your program to:
program main
use iso_fortran_env
implicit none
double precision :: a,b,c,d
logical :: f1, f2

write (*,*) 'Vern : ',compiler ...

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 ...