floor package:basic-prelude

floor x returns the greatest integer not greater than x