Summary

###########################################################################

	File:     datefns.icn

	Subject:  Procedure for dates

	Author:   Charles Hethcoat

	Date:     August 14, 1995

###########################################################################

   This file is in the public domain.

###########################################################################

 datefns.icn - a collection of date functions

 Adaptor:  Charles L Hethcoat III
 June 12, 1995
 Taken from various sources as attributed below.
 
 All date and calendar functions use the "date_rec" structure defined
 below.

 Note:  I adapted the procedures "julian" and "unjulian" sometime in 1994
 from "Numerical Recipes in C."  Some time later I discovered them
 (under slightly different names) in Version 9 of the Icon Library
 (Ralph Griswold, author).  I am including mine for what they are worth.
 That'll teach me to wait!

###########################################################################

This file is part of the (main) package.

doy(year, month, day)

 doy - return day-of-year from (year, month, day)
 Adapted from K&R

initdate()

julian(date)

 julian - convert a date_rec to a Julian day number

today()

 today - obtain computationally-useful values for today's date

unjulian(julianday)

 unjulian - produce a date from the Julian day number

wrdate(leadin, date)

 wrdate - write out a basic date string with a leadin string

date_rec(year, month, day, yearday, monthname, dayname)