
Example Markov : simulation of a Markov chain. Use of a Random module, external call to C rand() function.
3 lines
83 B
Text
3 lines
83 B
Text
|
|
(* output : random float in interval [0,1] *)
|
|
unsafe val fun random() = (z:float)
|