(:*******************************************************:)
(:Test: floorflt1args-3                                   :)
(:Written By: Carmelo Montanez                            :)
(:Date: Fri Dec 10 10:15:46 GMT-05:00 2004                :)
(:Purpose: Evaluates The "floor" function                :)
(: with the arguments set as follows:                    :)
(:$arg = xs:float(upper bound)                           :)
(:*******************************************************:)

fn:floor(xs:float("3.4028235E38"))