------- Comment #2 from tkoenig at gcc dot gnu dot org 2006-07-23 17:23 -------
While I work on this, I might as well tackle some other issues.
Before I start work, some timings with a vanilla tree as of today.
The timing isn't terrible (within a factor of two with Intel 8.1),
but of course, I don't know Intel's quality of RNG.
$ cat random-single.f90
program main
real, dimension(10**7) :: a
call random_number(a)
end program main
$ gfortran random-single.f90
$ ./a.out && time ./a.out
real 0m0.765s
user 0m0.730s
sys 0m0.036s
$ ifort random-single.f90
$ ./a.out && time ./a.out
real 0m0.362s
user 0m0.313s
sys 0m0.049s
$ cat random-double.f90
program main
real(kind=8), dimension(10**7) :: a
call random_number(a)
end program main
$ gfortran random-double.f90
$ ./a.out && time ./a.out
real 0m0.886s
user 0m0.804s
sys 0m0.077s
$ ifort random-double.f90
$ ./a.out && time ./a.out
real 0m0.402s
user 0m0.328s
sys 0m0.074s
--
tkoenig at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
AssignedTo|unassigned at gcc dot gnu |tkoenig at gcc dot gnu dot
|dot org |org
Status|NEW |ASSIGNED
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=28452
