ADA - Pasar de float a integer

Hola de nuevo

Podría decirme alguien como pasar un dato de una variable declarada como float a otra variable entera?

Muchas Gracias

Nuria Ruiz

i: integer;
f: float;

f:=3.141592;
i:=integer(f); --Creo que redondea

se podria hacer con la funcion rodund().