(:*******************************************************:) | |
(:Test: op-gMonth-equal-7 :) | |
(:Written By: Carmelo Montanez :) | |
(:Date: June 16, 2005 :) | |
(:Purpose: Evaluates The "gMonth-equal" function used :) | |
(:together with "and" expression (eq operator). :) | |
(:*******************************************************:) | |
(xs:gMonth("--04Z") eq xs:gMonth("--02Z")) and (xs:gMonth("--01Z") eq xs:gMonth("--12Z")) |