add and use the workspace

2026-04-25 13:12:16 +02:00
parent 483fa3d13f
commit 5fb1b809e1
5 changed files with 20 additions and 5 deletions
--- a/randomwalk.f90
+++ b/randomwalk.f90
@@ -10,7 +10,7 @@ program randomwalk

  write (0, '(A)') "----[ genplotting randomwalk ]----"
  call srand(time())
-  call genp_init (0, 'randomwalk.scratch')
+  call genp_init (0, 'WS/randomwalk.scratch')
  do foo=1, 51
    col = 2 + mod(foo, 4)
    call do_randomwalk(42, col)