1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
|
/*
* Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
* Copyright (C) 2006-2008 - INRIA - Arnaud Torset
*
* This file must be used under the terms of the CeCILL.
* This source file is licensed as described in the file COPYING, which
* you should have received as part of this distribution. The terms
* are also available at
* http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
*
*/
#ifndef __FIX_H__
#define __FIX_H__
#include "dynlib_elementaryfunctions.h"
#include "floatComplex.h"
#include "doubleComplex.h"
#include "types.h"
#include "floor.h"
#include "ceil.h"
#ifdef __cplusplus
extern "C" {
#endif
/*
fix(x) returns an integer matrix made of nearest rounded integers toward zero,i.e, y=sign(x).*floor(abs(x)). Same as int.
In these functions, I take the formula :
if x>=0 y=floor(x)
else y=ceil(x)
*/
EXTERN_ELEMFUNCT float sfixs(float in);
EXTERN_ELEMFUNCT double dfixs(double in);
EXTERN_ELEMFUNCT floatComplex cfixs(floatComplex in);
EXTERN_ELEMFUNCT doubleComplex zfixs(doubleComplex in);
EXTERN_ELEMFUNCT uint8 u8fixs(uint8 in);
EXTERN_ELEMFUNCT int8 i8fixs(int8 in);
EXTERN_ELEMFUNCT uint16 u16fixs(uint16 in);
EXTERN_ELEMFUNCT int16 i16fixs(int16 in);
EXTERN_ELEMFUNCT void sfixa(float* in, int size, float* out);
EXTERN_ELEMFUNCT void dfixa(double* in, int size, double* out);
EXTERN_ELEMFUNCT void cfixa(floatComplex* in, int size, floatComplex* out);
EXTERN_ELEMFUNCT void zfixa(doubleComplex* in, int size, doubleComplex* out);
EXTERN_ELEMFUNCT void u8fixa(uint8* in, int size, uint8* out);
EXTERN_ELEMFUNCT void i8fixa(int8* in, int size, int8* out);
EXTERN_ELEMFUNCT void u16fixa(uint16* in, int size, uint16* out);
EXTERN_ELEMFUNCT void i16fixa(int16* in, int size, int16* out);
#ifdef __cplusplus
} /* extern "C" */
#endif
#endif /* !__FIX_H__ */
|
