1/*===--------------------------------------------------------------------------
2 *                   ROCm Device Libraries
3 *
4 * This file is distributed under the University of Illinois Open Source
5 * License. See LICENSE.TXT for details.
6 *===------------------------------------------------------------------------*/
7
8#include "mathD.h"
9
10CONSTATTR double
11MATH_MANGLE(nan)(ulong nancode)
12{
13    return AS_DOUBLE((nancode & MANTBITS_DP64) | QNANBITPATT_DP64);
14}
15
16