From ce2b2e80da2a17d4082b3a3a64c44c706c079139 Mon Sep 17 00:00:00 2001 From: Dianne Skoll Date: Sun, 1 Sep 2024 11:31:28 -0400 Subject: [PATCH] Remove unnecessary _h() function definition. --- include/holidays/jewish.rem | 45 ++++++++++++++++++------------------- 1 file changed, 22 insertions(+), 23 deletions(-) diff --git a/include/holidays/jewish.rem b/include/holidays/jewish.rem index a0246125..545005c6 100644 --- a/include/holidays/jewish.rem +++ b/include/holidays/jewish.rem @@ -10,7 +10,6 @@ SET InIsrael value("InIsrael", 0) SET Reform value("Reform", 0) # Convenient function definition to save typing -FSET _h(x, y) HEBDATE(x,y) FSET _h2(x, y) HEBDATE(x, y, $U-7) FSET _PastSat(x, y) IIF(WKDAYNUM(_h2(x,y))!=6, _h2(x,y), _h2(x,y)+1) FSET _BackTwoFri(x, y) IIF(WKDAYNUM(_h2(x,y))!=5, _h2(x,y), _h2(x,y)-2) @@ -19,28 +18,28 @@ FSET _BackTwoSat(x, y) IIF(WKDAYNUM(_h2(x,y))!=6, _h2(x,y), _h2(x,y)-2) SET InIsrael VALUE("InIsrael", 0) SET Reform VALUE("Reform", 0) -REM [_h(1, "Tishrey")] ++4 MSG %"Rosh Hashana 1%" is %b. +REM [hebdate(1, "Tishrey")] ++4 MSG %"Rosh Hashana 1%" is %b. # No RH-2 or Tzom Gedalia in Reform IF !Reform - REM [_h(2, "Tishrey")] ++4 MSG %"Rosh Hashana 2%" is %b. + REM [hebdate(2, "Tishrey")] ++4 MSG %"Rosh Hashana 2%" is %b. REM [_PastSat(3, "Tishrey")] ++4 MSG %"Tzom Gedalia%" is %b. ENDIF -REM [_h(10, "Tishrey")] ++4 MSG %"Yom Kippur%" is %b. -REM [_h(15, "Tishrey")] ++4 MSG %"Sukkot 1%" is %b. +REM [hebdate(10, "Tishrey")] ++4 MSG %"Yom Kippur%" is %b. +REM [hebdate(15, "Tishrey")] ++4 MSG %"Sukkot 1%" is %b. IF !InIsrael - REM [_h(16, "Tishrey")] MSG %"Sukkot 2%" + REM [hebdate(16, "Tishrey")] MSG %"Sukkot 2%" ENDIF -REM [_h(21, "Tishrey")] ++4 MSG %"Hoshana Rabba%" is %b. -REM [_h(22, "Tishrey")] ++4 MSG %"Shemini Atzeret%" is %b. +REM [hebdate(21, "Tishrey")] ++4 MSG %"Hoshana Rabba%" is %b. +REM [hebdate(22, "Tishrey")] ++4 MSG %"Shemini Atzeret%" is %b. IF InIsrael - REM [_h(22, "Tishrey")] ++4 MSG %"Simchat Torah%" is %b. + REM [hebdate(22, "Tishrey")] ++4 MSG %"Simchat Torah%" is %b. ELSE - REM [_h(23, "Tishrey")] ++4 MSG %"Simchat Torah%" is %b. + REM [hebdate(23, "Tishrey")] ++4 MSG %"Simchat Torah%" is %b. ENDIF # Because Kislev can change length, we must be more careful about Chanukah @@ -58,11 +57,11 @@ REM [_chan(8)] MSG %"Chanukah 8%" IF !Reform # 10 Tevet will never be a Saturday, so whether or not to # move it is moot. (Thanks to Art Werschulz.) - REM [_h(10, "Tevet")] MSG %"Tzom Tevet%" is %b. + REM [hebdate(10, "Tevet")] MSG %"Tzom Tevet%" is %b. ENDIF -REM [_h(15, "Shvat")] ++4 MSG %"Tu B'Shvat%" is %b. -REM [_h(14, "Adar A")] ++4 MSG %"Purim Katan%" is %b. +REM [hebdate(15, "Shvat")] ++4 MSG %"Tu B'Shvat%" is %b. +REM [hebdate(14, "Adar A")] ++4 MSG %"Purim Katan%" is %b. # If Purim is on Sunday, then Fast of Esther is 11 Adar. IF WKDAYNUM(_h2(13, "Adar")) != 6 @@ -70,33 +69,33 @@ IF WKDAYNUM(_h2(13, "Adar")) != 6 ELSE REM [_h2(11, "Adar")] ++4 MSG %"Fast of Esther%" is %b. ENDIF -REM [_h(14, "Adar")] ++4 MSG %"Purim%" is %b. -REM [_h(15, "Nisan")] ++4 MSG %"Pesach%" is %b. +REM [hebdate(14, "Adar")] ++4 MSG %"Purim%" is %b. +REM [hebdate(15, "Nisan")] ++4 MSG %"Pesach%" is %b. IF !InIsrael - REM [_h(16, "Nisan")] MSG %"Pesach 2%" + REM [hebdate(16, "Nisan")] MSG %"Pesach 2%" ENDIF -REM [_h(21, "Nisan")] MSG %"Pesach 7%" +REM [hebdate(21, "Nisan")] MSG %"Pesach 7%" IF !InIsrael && !Reform - REM [_h(22, "Nisan")] MSG %"Pesach 8%" + REM [hebdate(22, "Nisan")] MSG %"Pesach 8%" ENDIF -REM [_h(27, "Nisan")] ++4 MSG %"Yom HaShoah%" is %b. +REM [hebdate(27, "Nisan")] ++4 MSG %"Yom HaShoah%" is %b. REM [_BackTwoFri(4, "Iyar")] ++4 MSG %"Yom HaZikaron%" is %b. REM [_BackTwoSat(5, "Iyar")] ++4 MSG %"Yom Ha'atzmaut%" is %b. # Not sure about Reform's position on Lag B'Omer IF !Reform - REM [_h(18, "Iyar")] ++4 MSG %"Lag B'Omer%" is %b. + REM [hebdate(18, "Iyar")] ++4 MSG %"Lag B'Omer%" is %b. ENDIF -REM [_h(28, "Iyar")] ++4 MSG %"Yom Yerushalayim%" is %b. -REM [_h(6, "Sivan")] ++4 MSG %"Shavuot%" is %b. +REM [hebdate(28, "Iyar")] ++4 MSG %"Yom Yerushalayim%" is %b. +REM [hebdate(6, "Sivan")] ++4 MSG %"Shavuot%" is %b. IF !InIsrael && !Reform - REM [_h(7, "Sivan")] MSG %"Shavuot 2%" + REM [hebdate(7, "Sivan")] MSG %"Shavuot 2%" ENDIF # Fairly sure Reform Jews don't observe the next two