OpenXM_contrib2/asir2000/lib/defs.h - diff

Return to defs.h CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / lib

version 1.6, 2004/06/22 16:11:08

version 1.9, 2008/09/03 10:10:08

Line 45

* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,

* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.

* $OpenXM: OpenXM_contrib2/asir2000/lib/defs.h,v 1.5 2003/12/15 16:37:59 ohara Exp $

* $OpenXM: OpenXM_contrib2/asir2000/lib/defs.h,v 1.8 2004/06/30 08:36:06 ohara Exp $

/* some useful macros */

#define VOID -1

#define ZERO 0

#define NUM 1

#define POLY 2

Line 71

Line 72

#define V_PF 2

#define V_SR 3

#define isvoid(a) (type(a)==VOID)

#define isnum(a) (type(a)==NUM)

#define ispoly(a) (type(a)==POLY)

#define israt(a) (type(a)==RAT)

Line 81

Line 83

#define isstruct(A) (type(A)==STRUCT)

#define isdpoly(a) (type(a)==DPOLY)

#define isnum_int(a) (type((a))==NUM && ntype((a))==O_Q && dn((a))==1)

#define isnum_int(a) ((a)==0 || (type((a))==NUM && ntype((a))==N_Q && dn((a))==1))

#define FIRST(L) (car(L))

#define SECOND(L) (car(cdr(L)))