qfits_float.h

00001 /* $Id: qfits_float.h,v 1.1.1.1 2008/11/03 13:40:49 agabasch Exp $
00002  *
00003  * This file is part of the ESO QFITS Library
00004  * Copyright (C) 2001-2004 European Southern Observatory
00005  *
00006  * This program is free software; you can redistribute it and/or modify
00007  * it under the terms of the GNU General Public License as published by
00008  * the Free Software Foundation; either version 2 of the License, or
00009  * (at your option) any later version.
00010  *
00011  * This program is distributed in the hope that it will be useful,
00012  * but WITHOUT ANY WARRANTY; without even the implied warranty of
00013  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
00014  * GNU General Public License for more details.
00015  *
00016  * You should have received a copy of the GNU General Public License
00017  * along with this program; if not, write to the Free Software
00018  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
00019  */
00020 
00021 /*
00022  * $Author: agabasch $
00023  * $Date: 2008/11/03 13:40:49 $
00024  * $Revision: 1.1.1.1 $
00025  * $Name: midi-2_8_0 $
00026  */
00027 
00028 #ifndef QFITS_FLOAT_H
00029 #define QFITS_FLOAT_H
00030 
00031 /*-----------------------------------------------------------------------------
00032                                    Macros
00033  -----------------------------------------------------------------------------*/
00034 
00035 /*----------------------------------------------------------------------------*/
00051 /*----------------------------------------------------------------------------*/
00052 #define qfits_isnan(n) ((sizeof(n)==sizeof(float)) ? _qfits_isnanf(n) : \
00053                         (sizeof(n)==sizeof(double)) ? _qfits_isnand(n) : -1)
00054 
00055 /*----------------------------------------------------------------------------*/
00072 /*----------------------------------------------------------------------------*/
00073 #define qfits_isinf(n) ((sizeof(n)==sizeof(float)) ? _qfits_isinff(n) : \
00074                         (sizeof(n)==sizeof(double)) ? _qfits_isinfd(n) : -1)
00075 
00076 /*-----------------------------------------------------------------------------
00077                                Function prototypes
00078  -----------------------------------------------------------------------------*/
00079 
00080 int _qfits_isnanf(float) ;
00081 int _qfits_isinff(float) ;
00082 int _qfits_isnand(double) ;
00083 int _qfits_isinfd(double) ;
00084 
00085 #endif

Generated on 15 Mar 2012 for C Standard Library Extensions by  doxygen 1.6.1