blob: 0ab208ebf62ebacedd78564632f1876b4fa4fc4a [file] [log] [blame]
#include "f2c.h"
#undef abs
#include <math.h>
double
pow_dd (doublereal * ap, doublereal * bp)
{
return (pow (*ap, *bp));
}