# zmanim.pl -- a perl script to calculate zmanim (times) for various
# Jewish things
#
# Andrew Greene
# amgreene@mit.edu

# based on "sdate.c", part of "rise_set"
# which was by Marc T Kaufman

# we have some manifest constants
$pi = 3.14159265358979;
$asec_radian = (2 * $pi) / (360 * 60 * 60);

# Boston's lat/long in seconds (roughly)
$latitude  = 42*3600 + 22*60 + 0;
$longitude = 71*3600 +  6*60 + 0;

# "1 - Flattening of the earth"
$flattening = 1 - (1/298.25);

# apparent latitude depends on the shape of the planet:
$lf = atan($flattening * $flattening * tan($latitude * $asec_radian));

# for testing purposes, set the Gregorian date to 19.6.1995
$gdate  = 19;
$gmonth = 6;
$gyear  = 1995;

