如何生成没有种子的随机数?

How to generate random number without seed?

我试图找到 rand() 的等价物,它生成一个介于 0 和 1 之间的随机数,没有种子。有人可以告诉我如何在 ADA 中实现这一点吗?

使用Ada.Numerics.Float_Random.

G : Ada.Numerics.Float_Random.Generator;
R : Ada.Numerics.Float_Random.Uniformly_Distributed;

-- Get a random number
R := Ada.Numerics.Float_Random.Random(G);