diff options
| -rw-r--r-- | simulation.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/simulation.scm b/simulation.scm index 4ce8fc0..417bde2 100644 --- a/simulation.scm +++ b/simulation.scm @@ -84,7 +84,7 @@ (thunk device-thunk)) (define (rand-time) - (random 2)) + (random 2.)) (define (make-class-a id initial-channel upstream-chn downstream-chn) ;; Make all atomic |