(:*******************************************************:)
(:Test: round-half-to-evenpint1args-3                     :)
(:Written By: Carmelo Montanez                            :)
(:Date: Fri Dec 10 10:15:46 GMT-05:00 2004                :)
(:Purpose: Evaluates The "round-half-to-even" function   :)
(: with the arguments set as follows:                    :)
(:$arg = xs:positiveInteger(upper bound)                 :)
(:*******************************************************:)

fn:round-half-to-even(xs:positiveInteger("999999999999999999"))