1    let rand () : int
2    let srand (seed : uint)
3    
4    let now = Time.now
5    srand now.s.as<uint>
6    
7    object Rand =
8        def next_u32 : u32 = rand as u32
9        def next_u64 : u64 = rand as u64 << 32 | rand as u64
10