The R Project SVN R

Rev

Rev 5458 | Rev 42302 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5458 Rev 8431
Line 15... Line 15...
15 
 *  You should have received a copy of the GNU General Public License
 15 
 *  You should have received a copy of the GNU General Public License
16 
 *  along with this program; if not, write to the Free Software
 16 
 *  along with this program; if not, write to the Free Software
17 
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA.
 17 
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA.
18 
 */
 18 
 */
19 
 
 19 
 
20 
#include "Mathlib.h"
 20 
#include "nmath.h"
21 
 
 21 
 
22 
double fmax2(double x, double y)
 22 
double fmax2(double x, double y)
23 
{
 23 
{
24 
#ifdef IEEE_754
 24 
#ifdef IEEE_754
25 
	if (ISNAN(x) || ISNAN(y))
 25 
	if (ISNAN(x) || ISNAN(y))