ready for another run ?
This commit is contained in:
@@ -10,7 +10,7 @@ program essai
|
||||
call init_random_seed()
|
||||
somme = 0.0
|
||||
|
||||
do foo=1, 200000
|
||||
do foo=1, 5
|
||||
quux = rand()
|
||||
somme = somme + quux
|
||||
print *, foo, quux, somme/foo
|
||||
|
||||
Reference in New Issue
Block a user