Calculer un calendrier avec LATEX, le dessiner en 3D avec PSTricks

NOVEMBREL M M J V S DAVRILL M M J V S D1 2 3 45 6 7 8 9 10 11 1112 13 14 15 16 17 1819 20 21 22 23 24 2526 27 28 29 302004200426 27 28 29 30 3119 20 21 22 23 24 2512 13 14 15 16 17 185 6 7 8 9 10 111 2 3 4JANVIERL M M J V S DMAIL M M J V S D1 23 4 5 6 7 8 910 11 12 13 14 15 1617 18 19 20 21 22 2324 25 26 27 28 29 30312004JUINL M M J V S D1 2 3 4 5 67 8 9 10 11 12 1314 15 16 17 18 19 2021 22 23 24 25 26 2728 29 302004JUILLETL M M J V S D1 2 3 45 6 7 8 9 10 1112 13 14 15 16 17 1819 20 21 22 23 24 2526 27 28 29 30 3120041 2 3 4 5 6 78 9 10 11 11 12 13 1415 16 17 18 19 20 2122 23 24 25 26 27 2829 3020043 Calcul de la date de PâquesOn trouve sur internet, à propos de ce sujet de nombreux sites. Á partir de la définition de la fête proprementdite, les formules « magiques » abondent. L’une d’elle a retenu mon attention, je l’ai retranscrite avec le packagefp. Dans l’ordre, un aperçu de la page, puis le codage des calculs avec fp.Le site : http://www.altcal.com/elmcal.html, et un extrait :Version 2.0 - 11 Nov 1998Copyright and disclaimer------------------------This document is Copyright (C) 1998 by Claus Tondering.E-mail: claus@tondering.dk.The document may be freely distributed, provided thiscopyright notice is included and no money is charged forthe document.This document is provided "as is". No warranties are made asto its correctness.G = year mod 19For the Julian calendar:I = (19*G + 15) mod 30J = (year + year/4 + I) mod 7For the Gregorian calendar:C = year/100H = (C - C/4 - (8*C+13)/25 + 19*G + 15) mod 30I = H - (H/28)*(1 - (H/28)*(29/(H + 1))*((21 - G)/11))J = (year + year/4 + I + 2 - C + C/4) mod 7Thereafter, for both calendars:L = I - JEasterMonth = 3 + (L + 40)/44EasterDay = L + 28 - 31*(EasterMonth/4)\FPset{\Year}{1981} % placer ici l’année\FPeval\GY{(\Year)-19*trunc((\Year)/19,0)}\FPeval{\Cent}{trunc((\Year)/100,0)}