| (:*******************************************************:) | |
| (:Test: adjust-time-to-timezone-18 :) | |
| (:Written By: Carmelo Montanez :) | |
| (:Date: August 10, 2005 :) | |
| (:Test Description: Evaluates The "adjust-time-to-timezone" function :) | |
| (:as part of a subtraction expression, which results on a negative number. :) | |
| (:Uses one adjust-time-to-timezone function and one :) | |
| (:xs:time constructor. Use zulu timezone and empty sequence for 2nd :) | |
| (: argument. :) | |
| (:*******************************************************:) | |
| let $tz := xs:dayTimeDuration("PT10H") | |
| return | |
| fn:adjust-time-to-timezone(xs:time("01:00:00Z"),$tz) - xs:time("10:00:00Z") |