Ada Programming/Attributes/'Min
Description
edit'Min(X, Y) is a scalar type attribute. It returns the lesser of the two parameters.
Example
edittype My_Enum is (Enum1, Enum2, Enum3);
A : Integer := 3;
B : Integer := -5;
X : Float := 1.0;
Y : Float := 1.5;
-- ...
pragma Assert (My_Enum'Min(Enum3, Enum1) = Enum1);
pragma Assert (Integer'Min(A, B) = -5);
pragma Assert (Float'Min(X, Y) = 1.0);