30:T419,function yahrzeit(death_date, h_year) { // """Return fixed date of the anniversary of Hebrew death date death_date // occurring in Hebrew h_year.""" const death_day = standard_day(death_date); const death_month = standard_month(death_date); const death_year = standard_year(death_date); if ( death_month == MARHESHVAN && death_day == 30 && !is_long_marheshvan(death_year + 1) ) return fixed_from_hebrew(hebrew_date(h_year, KISLEV, 1)) - 1; else if ( death_month == KISLEV && death_day == 30 && is_short_kislev(death_year + 1) ) return fixed_from_hebrew(hebrew_date(h_year, TEVET, 1)) - 1; else if (death_month == ADARII) return fixed_from_hebrew( hebrew_date(h_year, last_month_of_hebrew_year(h_year), death_day) ); else if ( death_day == 30 && death_month == ADAR && !is_hebrew_leap_year(h_year) ) return fixed_from_hebrew(hebrew_date(h_year, SHEVAT, 30)); else return ( fixed_from_hebrew(hebrew_date(h_year, death_month, 1)) + death_day - 1 ); }31:[] 2e:{"title":"Hebrew Calendar","cells":[{"id":0,"value":"md`# Hebrew Calendar`","pinned":false,"hidden":false,"mode":"ojs"},{"id":499,"value":"credits","pinned":false,"hidden":false,"mode":"ojs"},{"id":507,"value":"md`Notebook's image: An Omer Calendar from Italy, produced in 1804. On display at the Jewish Museum London (JM 633).`","pinned":false,"hidden":false,"mode":"ojs"},{"id":5,"value":"function hebrew_date(year, month, day) {\n // \"\"\"Return an Hebrew date data structure.\"\"\"\n return [year, month, day];\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":63,"value":"function is_hebrew_leap_year(h_year) {\n // \"\"\"Return True if h_year is a leap year on Hebrew calendar.\"\"\"\n return mod(7 * h_year + 1, 19) < 7;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":68,"value":"function last_month_of_hebrew_year(h_year) {\n // \"\"\"Return last month of Hebrew year.\"\"\"\n return is_hebrew_leap_year(h_year) ? ADARII : ADAR;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":72,"value":"function is_hebrew_sabbatical_year(h_year) {\n // \"\"\"Return True if h_year is a sabbatical year on the Hebrew calendar.\"\"\"\n return mod(h_year, 7) == 0;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":75,"value":"function last_day_of_hebrew_month(h_month, h_year) {\n // \"\"\"Return last day of month h_month in Hebrew year h_year.\"\"\"\n if (\n [IYYAR, TAMMUZ, ELUL, TEVET, ADARII].includes(h_month) ||\n (h_month == ADAR && !is_hebrew_leap_year(h_year)) ||\n (h_month == MARHESHVAN && !is_long_marheshvan(h_year)) ||\n (h_month == KISLEV && is_short_kislev(h_year))\n )\n return 29;\n else return 30;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":78,"value":"function molad(h_month, h_year) {\n // \"\"\"Return moment of mean conjunction of h_month in Hebrew h_year.\"\"\"\n const y = h_month < TISHRI ? h_year + 1 : h_year;\n const months_elapsed = h_month - TISHRI + quotient(235 * y - 234, 19);\n return (\n HEBREW_EPOCH -\n 876 / 25920 +\n months_elapsed * (29 + days_from_hours(12) + 793 / 25920)\n );\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":94,"value":"function hebrew_calendar_elapsed_days(h_year) {\n // \"\"\"Return number of days elapsed from the (Sunday) noon prior\n // to the epoch of the Hebrew calendar to the mean\n // conjunction (molad) of Tishri of Hebrew year h_year,\n // or one day later.\"\"\"\n const months_elapsed = quotient(235 * h_year - 234, 19);\n const parts_elapsed = 12084 + 13753 * months_elapsed;\n const days = 29 * months_elapsed + quotient(parts_elapsed, 25920);\n return mod(3 * (days + 1), 7) < 3 ? days + 1 : days;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":91,"value":"function hebrew_new_year(h_year) {\n // \"\"\"Return fixed date of Hebrew new year h_year.\"\"\"\n return (\n HEBREW_EPOCH +\n hebrew_calendar_elapsed_days(h_year) +\n hebrew_year_length_correction(h_year)\n );\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":97,"value":"function hebrew_year_length_correction(h_year) {\n // \"\"\"Return delays to start of Hebrew year h_year to keep ordinary\n // year in range 353-356 and leap year in range 383-386.\"\"\"\n // # I had a bug... h_year = 1 instead of h_year - 1!!!\n const ny0 = hebrew_calendar_elapsed_days(h_year - 1);\n const ny1 = hebrew_calendar_elapsed_days(h_year);\n const ny2 = hebrew_calendar_elapsed_days(h_year + 1);\n if (ny2 - ny1 == 356) return 2;\n else if (ny1 - ny0 == 382) return 1;\n else return 0;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":89,"value":"function days_in_hebrew_year(h_year) {\n // \"\"\"Return number of days in Hebrew year h_year.\"\"\"\n return hebrew_new_year(h_year + 1) - hebrew_new_year(h_year);\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":87,"value":"function is_long_marheshvan(h_year) {\n // \"\"\"Return True if Marheshvan is long in Hebrew year h_year.\"\"\"\n return [355, 385].includes(days_in_hebrew_year(h_year));\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":104,"value":"function is_short_kislev(h_year) {\n // \"\"\"Return True if Kislev is short in Hebrew year h_year.\"\"\"\n return [353, 383].includes(days_in_hebrew_year(h_year));\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":107,"value":"function fixed_from_hebrew(h_date) {\n // \"\"\"Return fixed date of Hebrew date h_date.\"\"\"\n const month = standard_month(h_date);\n const day = standard_day(h_date);\n const year = standard_year(h_date);\n let tmp;\n if (month < TISHRI)\n tmp =\n summa(\n m => last_day_of_hebrew_month(m, year),\n TISHRI,\n m => m <= last_month_of_hebrew_year(year)\n ) + summa(m => last_day_of_hebrew_month(m, year), NISAN, m => m < month);\n else\n tmp = summa(m => last_day_of_hebrew_month(m, year), TISHRI, m => m < month);\n return hebrew_new_year(year) + day - 1 + tmp;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":115,"value":"function hebrew_from_fixed(date) {\n // \"\"\"Return Hebrew (year month day) corresponding to fixed date date.\n // # The fraction can be approximated by 365.25.\"\"\"\n const approx = quotient(date - HEBREW_EPOCH, 35975351 / 98496) + 1;\n const year = final(approx - 1, y => hebrew_new_year(y) <= date);\n const start =\n date < fixed_from_hebrew(hebrew_date(year, NISAN, 1)) ? TISHRI : NISAN;\n const month = next(\n start,\n m =>\n date <=\n fixed_from_hebrew(hebrew_date(year, m, last_day_of_hebrew_month(m, year)))\n );\n const day = date - fixed_from_hebrew(hebrew_date(year, month, 1)) + 1;\n return hebrew_date(year, month, day);\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":169,"value":"function hebrew_in_gregorian(h_month, h_day, g_year) {\n // \"\"\"Return list of the fixed dates of Hebrew month, h_month, day, h_day,\n // that occur in Gregorian year g_year.\"\"\"\n const jan1 = gregorian_new_year(g_year);\n const y = standard_year(hebrew_from_fixed(jan1));\n const date1 = fixed_from_hebrew(hebrew_date(y, h_month, h_day));\n const date2 = fixed_from_hebrew(hebrew_date(y + 1, h_month, h_day));\n // # Hebrew and Gregorian calendar are aligned but certain\n // # holidays, i.e. Tzom Tevet, can fall on either side of Jan 1.\n // # So we can have 0, 1 or 2 occurences of that holiday.\n const dates = [date1, date2];\n return list_range(dates, gregorian_year_range(g_year));\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":211,"value":"function possible_hebrew_days(h_month, h_day) {\n // \"\"\"Return a list of possible days of week for Hebrew day h_day\n // and Hebrew month h_month.\"\"\"\n\n // DOESNOTWORK;\n\n const h_date0 = hebrew_date(5, NISAN, 1);\n const h_year = h_month > ELUL ? 6 : 5;\n const h_date = hebrew_date(h_year, h_month, h_day);\n const n = fixed_from_hebrew(h_date) - fixed_from_hebrew(h_date0);\n let basic = [TUESDAY, THURSDAY, SATURDAY];\n let extra = [];\n if (h_month == MARHESHVAN && h_day == 30) extra = [];\n else if (h_month == KISLEV && h_day < 30) extra = [MONDAY, WEDNESDAY, FRIDAY];\n else if (h_month == KISLEV && h_day == 30) extra = [MONDAY];\n else if ([TEVET, SHEVAT].includes(h_month)) extra = [SUNDAY, MONDAY];\n else if (h_month == ADAR && h_day < 30) extra = [SUNDAY, MONDAY];\n else extra = [SUNDAY];\n basic = basic.concat(extra).flat();\n return shift_days(basic, n);\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":50,"value":"HEBREW_EPOCH = fixed_from_julian(julian_date(bce(3761), OCTOBER, 7))","pinned":false,"hidden":false,"mode":"ojs"},{"id":122,"value":"md`## Holidays and Notable Days`","pinned":false,"hidden":false,"mode":"ojs"},{"id":125,"value":"function yom_kippur(g_year) {\n // \"\"\"Return fixed date of Yom Kippur occurring in Gregorian year g_year.\"\"\"\n const hebrew_year = g_year - gregorian_year_from_fixed(HEBREW_EPOCH) + 1;\n return fixed_from_hebrew(hebrew_date(hebrew_year, TISHRI, 10));\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":129,"value":"function passover(g_year) {\n // \"\"\"Return fixed date of Passover occurring in Gregorian year g_year.\"\"\"\n const hebrew_year = g_year - gregorian_year_from_fixed(HEBREW_EPOCH);\n return fixed_from_hebrew(hebrew_date(hebrew_year, NISAN, 15));\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":133,"value":"function omer(date) {\n // \"\"\"Return the number of elapsed weeks and days in the omer at date date.\n // Returns BOGUS if that date does not fall during the omer.\"\"\"\n const c = date - passover(gregorian_year_from_fixed(date));\n return 1 <= c && c <= 49 ? [quotient(c, 7), mod(c, 7)] : BOGUS;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":138,"value":"function purim(g_year) {\n // \"\"\"Return fixed date of Purim occurring in Gregorian year g_year.\"\"\"\n const hebrew_year = g_year - gregorian_year_from_fixed(HEBREW_EPOCH);\n const last_month = last_month_of_hebrew_year(hebrew_year);\n return fixed_from_hebrew(hebrew_date(hebrew_year, last_month, 14));\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":141,"value":"function ta_anit_esther(g_year) {\n // \"\"\"Return fixed date of Ta’anit Esther occurring in Gregorian\n // year g_year.\"\"\"\n const purim_date = purim(g_year);\n return day_of_week_from_fixed(purim_date) == SUNDAY\n ? purim_date - 3\n : purim_date - 1;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":146,"value":"function tishah_be_av(g_year) {\n // \"\"\"Return fixed date of Tishah be_Av occurring in Gregorian year g_year.\"\"\"\n const hebrew_year = g_year - gregorian_year_from_fixed(HEBREW_EPOCH);\n const av9 = fixed_from_hebrew(hebrew_date(hebrew_year, AV, 9));\n return day_of_week_from_fixed(av9) == SATURDAY ? av9 + 1 : av9;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":151,"value":"function birkath_ha_hama(g_year) {\n // \"\"\"Return the list of fixed date of Birkath ha_Hama occurring in\n // Gregorian year g_year, if it occurs.\"\"\"\n // See https://en.wikipedia.org/wiki/Birkat_Hachama for occurrences\n const dates = coptic_in_gregorian(7, 30, g_year);\n return dates.length &&\n mod(standard_year(coptic_from_fixed(dates[0])), 28) == 17\n ? dates\n : [];\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":166,"value":"function sh_ela(g_year) {\n // \"\"\"Return the list of fixed dates of Sh’ela occurring in Gregorian year g_year.\"\"\"\n return coptic_in_gregorian(3, 26, g_year);\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":489,"value":"function sh_ela_israel(g_year) {\n // \"\"\"Return the date of Sh’ela for Israel occurring in Gregorian year g_year.\"\"\"\n const hebrew_year = g_year - gregorian_year_from_fixed(HEBREW_EPOCH);\n return hebrew_date(hebrew_year, MARHESHVAN, 7);\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":176,"value":"function tzom_tevet(g_year) {\n // \"\"\"Return the list of fixed dates for Tzom Tevet (Tevet 10) that\n // occur in Gregorian year g_year. It can occur 0, 1 or 2 times per\n // Gregorian year.\"\"\"\n const jan1 = gregorian_new_year(g_year);\n const y = standard_year(hebrew_from_fixed(jan1));\n let d1 = fixed_from_hebrew(hebrew_date(y, TEVET, 10));\n d1 = day_of_week_from_fixed(d1) == SATURDAY ? d1 + 1 : d1;\n let d2 = fixed_from_hebrew(hebrew_date(y + 1, TEVET, 10));\n d2 = day_of_week_from_fixed(d2) == SATURDAY ? d2 + 1 : d2;\n const dates = [d1, d2];\n return list_range(dates, gregorian_year_range(g_year));\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":181,"value":"function yom_ha_zikkaron(g_year) {\n // \"\"\"Return fixed date of Yom ha_Zikkaron occurring in Gregorian year g_year.\"\"\"\n const hebrew_year = g_year - gregorian_year_from_fixed(HEBREW_EPOCH);\n const iyyar4 = fixed_from_hebrew(hebrew_date(hebrew_year, IYYAR, 4));\n if ([THURSDAY, FRIDAY].includes(day_of_week_from_fixed(iyyar4)))\n return kday_before(WEDNESDAY, iyyar4);\n else if (SUNDAY == day_of_week_from_fixed(iyyar4)) return iyyar4 + 1;\n else return iyyar4;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":188,"value":"function hebrew_birthday(birthdate, h_year) {\n // \"\"\"Return fixed date of the anniversary of Hebrew birth date\n // birthdate occurring in Hebrew h_year.\"\"\"\n const birth_day = standard_day(birthdate);\n const birth_month = standard_month(birthdate);\n const birth_year = standard_year(birthdate);\n if (birth_month == last_month_of_hebrew_year(birth_year))\n return fixed_from_hebrew(\n hebrew_date(h_year, last_month_of_hebrew_year(h_year), birth_day)\n );\n else\n return (\n fixed_from_hebrew(hebrew_date(h_year, birth_month, 1)) + birth_day - 1\n );\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":191,"value":"function hebrew_birthday_in_gregorian(birthdate, g_year) {\n // \"\"\"Return the list of the fixed dates of Hebrew birthday\n // birthdate that occur in Gregorian g_year.\"\"\"\n const jan1 = gregorian_new_year(g_year);\n const y = standard_year(hebrew_from_fixed(jan1));\n const date1 = hebrew_birthday(birthdate, y);\n const date2 = hebrew_birthday(birthdate, y + 1);\n return list_range([date1, date2], gregorian_year_range(g_year));\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":194,"value":"$30","pinned":false,"hidden":false,"mode":"ojs"},{"id":197,"value":"function yahrzeit_in_gregorian(death_date, g_year) {\n // \"\"\"Return the list of the fixed dates of death date death_date (yahrzeit)\n // that occur in Gregorian year g_year.\"\"\"\n const jan1 = gregorian_new_year(g_year);\n const y = standard_year(hebrew_from_fixed(jan1));\n const date1 = yahrzeit(death_date, y);\n const date2 = yahrzeit(death_date, y + 1);\n return list_range([date1, date2], gregorian_year_range(g_year));\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":202,"value":"md`## Helper Functions`","pinned":false,"hidden":false,"mode":"ojs"},{"id":203,"value":"function shift_days(l, cap_Delta) {\n // \"\"\"Shift each weekday on list l by cap_Delta days.\"\"\"\n return l.map(x => day_of_week_from_fixed(x + cap_Delta));\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":8,"value":"md`## Constants`","pinned":false,"hidden":false,"mode":"ojs"},{"id":11,"value":"NISAN = 1","pinned":false,"hidden":false,"mode":"ojs"},{"id":14,"value":"IYYAR = 2","pinned":false,"hidden":false,"mode":"ojs"},{"id":17,"value":"SIVAN = 3","pinned":false,"hidden":false,"mode":"ojs"},{"id":20,"value":"TAMMUZ = 4","pinned":false,"hidden":false,"mode":"ojs"},{"id":23,"value":"AV = 5","pinned":false,"hidden":false,"mode":"ojs"},{"id":26,"value":"ELUL = 6","pinned":false,"hidden":false,"mode":"ojs"},{"id":29,"value":"TISHRI = 7","pinned":false,"hidden":false,"mode":"ojs"},{"id":32,"value":"MARHESHVAN = 8","pinned":false,"hidden":false,"mode":"ojs"},{"id":35,"value":"KISLEV = 9","pinned":false,"hidden":false,"mode":"ojs"},{"id":38,"value":"TEVET = 10","pinned":false,"hidden":false,"mode":"ojs"},{"id":41,"value":"SHEVAT = 11","pinned":false,"hidden":false,"mode":"ojs"},{"id":44,"value":"ADAR = 12","pinned":false,"hidden":false,"mode":"ojs"},{"id":47,"value":"ADARII = 13","pinned":false,"hidden":false,"mode":"ojs"},{"id":52,"value":"md`## Technical details`","pinned":false,"hidden":false,"mode":"ojs"},{"id":153,"value":"import {\n coptic_from_fixed,\n coptic_in_gregorian\n} from \"@espinielli/calcal-coptic\"","pinned":false,"hidden":false,"mode":"ojs"},{"id":58,"value":"import { bce, fixed_from_julian, julian_date } from \"@espinielli/calcal-julian\"","pinned":false,"hidden":false,"mode":"ojs"},{"id":55,"value":"import {\n gregorian_new_year,\n gregorian_year_from_fixed,\n gregorian_year_range,\n kday_before,\n OCTOBER\n} from \"@espinielli/calcal-gregorian\"","pinned":false,"hidden":false,"mode":"ojs"},{"id":83,"value":"import { days_from_hours } from \"@espinielli/calcal-astronomical\"","pinned":false,"hidden":false,"mode":"ojs"},{"id":65,"value":"import {\n credits,\n day_of_week_from_fixed,\n final,\n list_range,\n mod,\n next,\n quotient,\n standard_day,\n standard_month,\n standard_year,\n summa,\n SUNDAY,\n MONDAY,\n TUESDAY,\n WEDNESDAY,\n THURSDAY,\n FRIDAY,\n SATURDAY,\n BOGUS\n} from \"@espinielli/calcal-foundation\"","pinned":false,"hidden":false,"mode":"ojs"},{"id":208,"value":"mathjs = require(\"mathjs@7\")","pinned":false,"hidden":false,"mode":"ojs"}],"files":"$W31","stdlib":"1","titling":"auto"}