Memory bandwidth test code for M1 and PC

[CRquantum]

@mecej4

I was also curious as to why you chose 9 as the second argument. The returned value from the intrinsic function would have been the same if you had specified any higher value up to 307 for X86/X64 platforms.

Thank you very much @mecej4 , @JohnCampbell for pointing out that.

Eh, is there drawback of using selected_real_kind(15,9)?
Or using selected_real_kind(15) is better than selected_real_kind(15,9)?

I am not Fortran language lawyer, lol, but there should be a reason for SELECTED_REAL_KIND([P, R, RADIX]) having three arugments P, R, and RADIX. Otherwise perhaps just one argument P should be enough.

We could discuss here,

What are the true portable or best to define real 4 real 8 integer 4 integer 8, etc?

Depending on the options chosen, that file could be module stdlib_kinds use iso_fortran_env, only: int8, int16, int32, int64 use iso_c_binding, only: c_bool implicit none private public :: sp, dp, xdp, qp, int8, int16, int32, int64, lk, c_bool !> Single precision real numbers integer, parameter :: sp = selected_real_kind(6) !> Double precision real numbers integer, parameter :: dp = selected_real_kind(15) !> Extended double precision real numbers integer, parameter :: …