paskha.c (15720) | paskha.c (15723) |
---|---|
1/* 2 * Copyright (C) 1993-1996 by Andrey A. Chernov, Moscow, Russia. 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright --- 36 unchanged lines hidden (view full) --- 45 static int y = 6; 46 extern int *cumdays; 47 48 a = R % 19; 49 b = R % 4; 50 c = R % 7; 51 d = (19*a + x) % 30; 52 e = (2*b + 4*c + 6*d + y) % 7; | 1/* 2 * Copyright (C) 1993-1996 by Andrey A. Chernov, Moscow, Russia. 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright --- 36 unchanged lines hidden (view full) --- 45 static int y = 6; 46 extern int *cumdays; 47 48 a = R % 19; 49 b = R % 4; 50 c = R % 7; 51 d = (19*a + x) % 30; 52 e = (2*b + 4*c + 6*d + y) % 7; |
53 return ((cumdays[2/*feb*/] + 22/*mar*/) + (d + e)); | 53 return (((cumdays[3] + 1) + 22) + (d + e)); |
54} 55 56/* return year day for Orthodox Easter depending days */ 57 58int 59getpaskha(s, year) 60 char *s; 61 int year; --- 31 unchanged lines hidden --- | 54} 55 56/* return year day for Orthodox Easter depending days */ 57 58int 59getpaskha(s, year) 60 char *s; 61 int year; --- 31 unchanged lines hidden --- |