Program: MKISGREGORY

  mkisgregory.............is a given date in greogrian or julian calendar?
 
  call: yesno=mkisgregory(y,m,d);
 
              y: year
              m: month
              d: date
 
  result: yesno: 1 if the given date is 15.Oct.1582 or later
                 0 if the given date is before 15.Oct.1582
 
  Due to the invention of the greogorian calendar on 15.Oct.1582 (the
  official day afterr which the old julian calendar was invalid), the
  15.Oct1582 followed immediately after the 4.Oct.1582. This results in
  problems when calculating the JD (MKJD works correctly).
 
  dates between 04.Oct1582 and 15.Oct.1582 will result in a warning.
 
 
 
  Martin Knapmeyer 24.01.1999

Read M-File Source Code


eof.