00001 /*============================================================================ 00002 00003 WCSLIB 4.4 - an implementation of the FITS WCS standard. 00004 Copyright (C) 1995-2009, Mark Calabretta 00005 00006 This file is part of WCSLIB. 00007 00008 WCSLIB is free software: you can redistribute it and/or modify it under the 00009 terms of the GNU Lesser General Public License as published by the Free 00010 Software Foundation, either version 3 of the License, or (at your option) 00011 any later version. 00012 00013 WCSLIB is distributed in the hope that it will be useful, but WITHOUT ANY 00014 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS 00015 FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for 00016 more details. 00017 00018 You should have received a copy of the GNU Lesser General Public License 00019 along with WCSLIB. If not, see <http://www.gnu.org/licenses/>. 00020 00021 Correspondence concerning WCSLIB may be directed to: 00022 Internet email: mcalabre@atnf.csiro.au 00023 Postal address: Dr. Mark Calabretta 00024 Australia Telescope National Facility, CSIRO 00025 PO Box 76 00026 Epping NSW 1710 00027 AUSTRALIA 00028 00029 Author: Mark Calabretta, Australia Telescope National Facility 00030 http://www.atnf.csiro.au/~mcalabre/index.html 00031 $Id: wcsmath_8h-source.html,v 1.1 2009/09/14 20:25:25 irby Exp $ 00032 *============================================================================= 00033 * 00034 * Summary of wcsmath.h 00035 * -------------------- 00036 * Definition of mathematical constants used by WCSLIB. 00037 * 00038 *===========================================================================*/ 00039 00040 #ifndef WCSLIB_WCSMATH 00041 #define WCSLIB_WCSMATH 00042 00043 #ifdef PI 00044 #undef PI 00045 #endif 00046 00047 #ifdef D2R 00048 #undef D2R 00049 #endif 00050 00051 #ifdef R2D 00052 #undef R2D 00053 #endif 00054 00055 #ifdef SQRT2 00056 #undef SQRT2 00057 #endif 00058 00059 #ifdef SQRT2INV 00060 #undef SQRT2INV 00061 #endif 00062 00063 #define PI 3.141592653589793238462643 00064 #define D2R PI/180.0 00065 #define R2D 180.0/PI 00066 #define SQRT2 1.4142135623730950488 00067 #define SQRT2INV 1.0/SQRT2 00068 00069 #ifdef UNDEFINED 00070 #undef UNDEFINED 00071 #endif 00072 00073 #define UNDEFINED 987654321.0e99 00074 #define undefined(value) (value == UNDEFINED) 00075 00076 #endif /* WCSLIB_WCSMATH */
1.5.1