86 lines
3.9 KiB
C
86 lines
3.9 KiB
C
|
|
||
|
|
/*********************************************************
|
||
|
|
$Header: /home/dieter/sweph/RCS/swedate.h,v 1.74 2008/06/16 10:07:20 dieter Exp $
|
||
|
|
version 15-feb-89 16:30
|
||
|
|
*********************************************************/
|
||
|
|
|
||
|
|
/* Copyright (C) 1997 - 2008 Astrodienst AG, Switzerland. All rights reserved.
|
||
|
|
|
||
|
|
License conditions
|
||
|
|
------------------
|
||
|
|
|
||
|
|
This file is part of Swiss Ephemeris.
|
||
|
|
|
||
|
|
Swiss Ephemeris is distributed with NO WARRANTY OF ANY KIND. No author
|
||
|
|
or distributor accepts any responsibility for the consequences of using it,
|
||
|
|
or for whether it serves any particular purpose or works at all, unless he
|
||
|
|
or she says so in writing.
|
||
|
|
|
||
|
|
Swiss Ephemeris is made available by its authors under a dual licensing
|
||
|
|
system. The software developer, who uses any part of Swiss Ephemeris
|
||
|
|
in his or her software, must choose between one of the two license models,
|
||
|
|
which are
|
||
|
|
a) GNU public license version 2 or later
|
||
|
|
b) Swiss Ephemeris Professional License
|
||
|
|
|
||
|
|
The choice must be made before the software developer distributes software
|
||
|
|
containing parts of Swiss Ephemeris to others, and before any public
|
||
|
|
service using the developed software is activated.
|
||
|
|
|
||
|
|
If the developer choses the GNU GPL software license, he or she must fulfill
|
||
|
|
the conditions of that license, which includes the obligation to place his
|
||
|
|
or her whole software project under the GNU GPL or a compatible license.
|
||
|
|
See http://www.gnu.org/licenses/old-licenses/gpl-2.0.html
|
||
|
|
|
||
|
|
If the developer choses the Swiss Ephemeris Professional license,
|
||
|
|
he must follow the instructions as found in http://www.astro.com/swisseph/
|
||
|
|
and purchase the Swiss Ephemeris Professional Edition from Astrodienst
|
||
|
|
and sign the corresponding license contract.
|
||
|
|
|
||
|
|
The License grants you the right to use, copy, modify and redistribute
|
||
|
|
Swiss Ephemeris, but only under certain conditions described in the License.
|
||
|
|
Among other things, the License requires that the copyright notices and
|
||
|
|
this notice be preserved on all copies.
|
||
|
|
|
||
|
|
Authors of the Swiss Ephemeris: Dieter Koch and Alois Treindl
|
||
|
|
|
||
|
|
The authors of Swiss Ephemeris have no control or influence over any of
|
||
|
|
the derived works, i.e. over software or services created by other
|
||
|
|
programmers which use Swiss Ephemeris functions.
|
||
|
|
|
||
|
|
The names of the authors or of the copyright holder (Astrodienst) must not
|
||
|
|
be used for promoting any software, product or service which uses or contains
|
||
|
|
the Swiss Ephemeris. This copyright notice is the ONLY place where the
|
||
|
|
names of the authors can legally appear, except in cases where they have
|
||
|
|
given special permission in writing.
|
||
|
|
|
||
|
|
The trademarks 'Swiss Ephemeris' and 'Swiss Ephemeris inside' may be used
|
||
|
|
for promoting such software, products or services.
|
||
|
|
*/
|
||
|
|
|
||
|
|
#ifdef __cplusplus
|
||
|
|
extern "C"
|
||
|
|
{
|
||
|
|
#endif
|
||
|
|
|
||
|
|
#ifndef _SWEDLL_H
|
||
|
|
extern EXP32 int FAR PASCAL_CONV EXP16 swe_date_conversion(int y, int m, int d, /* year, month, day */
|
||
|
|
double utime, /* universal time in hours (decimal) */
|
||
|
|
char c, /* calendar g[regorian]|j[ulian]|a[stro = greg] */
|
||
|
|
double *tgmt);
|
||
|
|
|
||
|
|
extern EXP32 double *FAR PASCAL_CONV EXP16 swe_julday(int year, int month,
|
||
|
|
int day,
|
||
|
|
double hour,
|
||
|
|
int gregflag);
|
||
|
|
|
||
|
|
extern EXP32 void FAR PASCAL_CONV EXP16 swe_revjul(double jd,
|
||
|
|
int gregflag,
|
||
|
|
int *jyear, int *jmon,
|
||
|
|
int *jday,
|
||
|
|
double *jut);
|
||
|
|
#endif
|
||
|
|
#ifdef __cplusplus
|
||
|
|
} /* extern C */
|
||
|
|
#endif
|