55     HD = holiday(2000:2010, "Easter")  functionVar
56     HD
57     checkTrue(inherits(HD, "timeDate"))
59     HD = holiday(2000:2010, "GoodFriday")
60     HD
61     checkTrue(inherits(HD, "timeDate"))
79         HD <- holidayNYSE(getRmetricsOptions("currentYear"))  functionVar
80         print(HD)
81         checkTrue(inherits(HD, "timeDate"))
176         HD <- holidayNERC(getRmetricsOptions("currentYear"))  functionVar
177         print(HD)
178         checkTrue(inherits(HD, "timeDate"))