Mercurial > octave
comparison src/DLD-FUNCTIONS/rand.cc @ 7533:ff52243af934
save state separately for each MT random number generator
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Tue, 26 Feb 2008 05:28:59 -0500 |
parents | 1c7b3e1fda19 |
children | 08125419efcb |
comparison
equal
deleted
inserted
replaced
7532:493bb0de3199 | 7533:ff52243af934 |
---|---|
111 { | 111 { |
112 retval = octave_rand::seed (); | 112 retval = octave_rand::seed (); |
113 } | 113 } |
114 else if (s_arg == "state" || s_arg == "twister") | 114 else if (s_arg == "state" || s_arg == "twister") |
115 { | 115 { |
116 retval = octave_rand::state (); | 116 retval = octave_rand::state (fcn); |
117 } | 117 } |
118 else if (s_arg == "uniform") | 118 else if (s_arg == "uniform") |
119 { | 119 { |
120 octave_rand::uniform_distribution (); | 120 octave_rand::uniform_distribution (); |
121 } | 121 } |
248 { | 248 { |
249 ColumnVector s = | 249 ColumnVector s = |
250 ColumnVector (args(idx+1).vector_value(false, true)); | 250 ColumnVector (args(idx+1).vector_value(false, true)); |
251 | 251 |
252 if (! error_state) | 252 if (! error_state) |
253 octave_rand::state (s); | 253 octave_rand::state (s, fcn); |
254 } | 254 } |
255 else | 255 else |
256 error ("%s: unrecognized string argument", fcn); | 256 error ("%s: unrecognized string argument", fcn); |
257 } | 257 } |
258 else | 258 else |