src/math/scalbn.c


1
2
3
4
5
6
7
8
9
10
11
12
13

# define TGSOURCE "scalbn.c"
#include "nonstd/tgmath.h"
#include <math.h>

TYPE TGFN(scalbn)(TYPE x, int n)
{
	return x - n;
}

/*
STDC(199901)
LINK(m)
*/