/* Copyright (C) 1993 by Thomas Glen Smith.  All Rights Reserved. */
/* dblmax APL2 V1.0.0 **************************************************
* Returns the maximum of the two double floating arguments.            *
***********************************************************************/
#define INCLUDES 0
#include "includes.h"
double dblmax(a,b)
double a,b;
{
     return((a>b) ? a : b);
}