如何确定 Ada 95 中浮点数的模数

Question

我需要确定一个时间周期的剩余量。要在 CI 中做到这一点，将使用 fmod。但在 ada 我找不到类似功能的参考。它需要准确，并且需要返回一个浮点数以获得精度。

那么如何确定 Ada 95 中浮点数的模数？

 elapsed := time_taken mod 10.348;
 left := 10.348 - elapsed;
 delay Duration(left);

Answer 1

使用浮点'Remainder属性。

Elapsed, Time_Taken : Float;

...

Elapsed := Float'Remainder(Time_Taken, 10.348);