ready for another run ?

This commit is contained in:
tth
2022-02-18 19:30:10 +01:00
parent 64206904ca
commit 47a383f3b6
9 changed files with 66 additions and 34 deletions

View File

@@ -17,8 +17,8 @@ module mathstuff
write(0, '(A,3I3,A,I6)') "sranding: ", tarray, " --> ", t3
call srand(t3)
! after initializing the random generator,
! you MUST use it for initializin the initialier
! after initializing the random generator engine,
! you MUST use it for initializing the initializer
dummy = rand()
end subroutine