awlsim/tests/100-instructions/insn_ARITH_R.awl

	// Precalculate constants
	// MD 0 = PI
	// MD 4 = -PI
	// MD 8 = PI/2
	// MD 12 = -PI/2
	// MD 16 = PI/4
	// MD 20 = -PI/4
	L		__CNST_PI
	T		MD 0
	NEGR
	T		MD 4

	L		__CNST_PI
	L		2.0
	/R
	T		MD 8
	NEGR
	T		MD 12

	L		__CNST_PI
	L		4.0
	/R
	T		MD 16
	NEGR
	T		MD 20


	// Run tests


	__STWRST
	L		1.0
	L		1.0
	+R
	__ASSERT==	__ACCU 1,	2.0
	__ASSERT==	__ACCU 1,	DW#16#40000000
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	__STWRST
	L		1.0
	L		-1.0
	+R
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__ACCU 1,	0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	__STWRST
	L		-1.0
	L		-1.0
	+R
	__ASSERT==	__ACCU 1,	-2.0
	__ASSERT==	__ACCU 1,	DW#16#C0000000
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	__STWRST
	L		1.0
	L		1.0
	-R
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__ACCU 1,	DW#16#00000000
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	__STWRST
	L		1.0
	L		-1.0
	-R
	__ASSERT==	__ACCU 1,	2.0
	__ASSERT==	__ACCU 1,	DW#16#40000000
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	__STWRST
	L		-1.0
	L		-1.0
	-R
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__ACCU 1,	DW#16#00000000
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	__STWRST
	L		3.0
	L		2.0
	*R
	__ASSERT==	__ACCU 1,	6.0
	__ASSERT==	__ACCU 1,	DW#16#40C00000
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	__STWRST
	L		3.0
	L		-2.0
	*R
	__ASSERT==	__ACCU 1,	-6.0
	__ASSERT==	__ACCU 1,	DW#16#C0C00000
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	__STWRST
	L		-3.0
	L		-2.0
	*R
	__ASSERT==	__ACCU 1,	6.0
	__ASSERT==	__ACCU 1,	DW#16#40C00000
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	__STWRST
	L		3.0
	L		2.0
	/R
	__ASSERT==	__ACCU 1,	1.5
	__ASSERT==	__ACCU 1,	DW#16#3FC00000
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	__STWRST
	L		3.0
	L		-2.0
	/R
	__ASSERT==	__ACCU 1,	-1.5
	__ASSERT==	__ACCU 1,	DW#16#BFC00000
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	__STWRST
	L		-3.0
	L		-2.0
	/R
	__ASSERT==	__ACCU 1,	1.5
	__ASSERT==	__ACCU 1,	DW#16#3FC00000
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test:  Inf * 0.0 = NaN
	__STWRST
	L		__CNST_PINF
	L		0.0
	*R
	__ASSERT==	__ACCU 1,	__CNST_NNAN
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test:  -Inf * 0.0 = NaN
	__STWRST
	L		__CNST_NINF
	L		0.0
	*R
	__ASSERT==	__ACCU 1,	__CNST_NNAN
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test:  denormalized
	__STWRST
	L		DW#16#00000001
	L		2.0
	/R
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test:  pos / 0.0 = +inf
	__STWRST
	L		1.5
	L		0.0
	/R
	__ASSERT==	__ACCU 1,	__CNST_PINF
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test:  neg / 0.0 = -inf
	__STWRST
	L		-1.5
	L		0.0
	/R
	__ASSERT==	__ACCU 1,	__CNST_NINF
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: -pos
	__STWRST
	L		1.5
	NEGR
	__ASSERT==	__ACCU 1,	-1.5
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: -neg
	__STWRST
	L		-1.5
	NEGR
	__ASSERT==	__ACCU 1,	1.5
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: abs(pos)
	__STWRST
	L		1.5
	ABS
	__ASSERT==	__ACCU 1,	1.5


	// Test: abs(neg)
	__STWRST
	L		-1.5
	ABS
	__ASSERT==	__ACCU 1,	1.5


	// Test: pos^2
	__STWRST
	L		1.5
	SQR
	__ASSERT==	__ACCU 1,	2.25
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: neg^2
	__STWRST
	L		-1.5
	SQR
	__ASSERT==	__ACCU 1,	2.25
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: sqrt(pos)
	__STWRST
	L		9.0
	SQRT
	__ASSERT==	__ACCU 1,	3.0
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: sqrt(-0.0)
	__STWRST
	L		-0.0
	SQRT
	__ASSERT==	__ACCU 1,	-0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: sqrt(-0.5)
	__STWRST
	L		-0.5
	SQRT
	__ASSERT==	__ACCU 1,	__CNST_PNAN
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: sqrt(-1.5)
	__STWRST
	L		-1.5
	SQRT
	__ASSERT==	__ACCU 1,	__CNST_PNAN
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: exp(0.0)
	__STWRST
	L		0.0
	EXP
	__ASSERT==	__ACCU 1,	1.0
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: exp(1.5)
	__STWRST
	L		1.5
	EXP
	__ASSERT==	__ACCU 1,	DW#16#408F69FF
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: exp(-1.5)
	__STWRST
	L		-1.5
	EXP
	__ASSERT==	__ACCU 1,	DW#16#3E647C3C
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: ln(0.0)
	__STWRST
	L		0.0
	LN
	__ASSERT==	__ACCU 1,	__CNST_PNAN
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: ln(-0.0)
	__STWRST
	L		-0.0
	LN
	__ASSERT==	__ACCU 1,	__CNST_PNAN
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: ln(1.5)
	__STWRST
	L		1.5
	LN
	__ASSERT==	__ACCU 1,	DW#16#3ECF991F
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: ln(-1.5)
	__STWRST
	L		-1.5
	LN
	__ASSERT==	__ACCU 1,	__CNST_PNAN
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: sin(0.0 deg)
	__STWRST
	L		0.0
	SIN
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: sin(-0.0 deg)
	__STWRST
	L		-0.0
	SIN
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: sin(90.0 deg)
	__STWRST
	L		MD 8	// PI/2
	SIN
	__ASSERT==	__ACCU 1,	1.0
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: sin(180.0 deg)
	__STWRST
	L		MD 0	// PI
	SIN
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: sin(-90.0 deg)
	__STWRST
	L		MD 12	// -PI/2
	SIN
	__ASSERT==	__ACCU 1,	-1.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: sin(-180.0 deg)
	__STWRST
	L		MD 4	// -PI
	SIN
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: cos(0.0 deg)
	__STWRST
	L		0.0
	COS
	__ASSERT==	__ACCU 1,	1.0
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: cos(-0.0 deg)
	__STWRST
	L		-0.0
	COS
	__ASSERT==	__ACCU 1,	1.0
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: cos(90.0 deg)
	__STWRST
	L		MD 8	// PI/2
	COS
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: cos(180.0 deg)
	__STWRST
	L		MD 0	// PI
	COS
	__ASSERT==	__ACCU 1,	-1.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: cos(-90.0 deg)
	__STWRST
	L		MD 12	// -PI/2
	COS
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: cos(-180.0 deg)
	__STWRST
	L		MD 4	// -PI
	COS
	__ASSERT==	__ACCU 1,	-1.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: tan(0.0 deg)
	__STWRST
	L		0.0
	TAN
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: tan(-0.0 deg)
	__STWRST
	L		-0.0
	TAN
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: tan(45.0 deg)
	__STWRST
	L		MD 16	// PI/4
	TAN
	__ASSERT==	__ACCU 1,	1.0
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: tan(90.0 deg)
	__STWRST
	L		MD 8	// PI/2
	TAN
	__ASSERT==	__ACCU 1,	DW#16#7F800000
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: tan(180.0 deg)
	__STWRST
	L		MD 0	// PI
	TAN
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: tan(-45.0 deg)
	__STWRST
	L		MD 20	// -PI/4
	TAN
	__ASSERT==	__ACCU 1,	-1.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: tan(-90.0 deg)
	__STWRST
	L		MD 12	// -PI/2
	TAN
	__ASSERT==	__ACCU 1,	DW#16#FF800000
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: tan(-180.0 deg)
	__STWRST
	L		MD 4	// -PI
	TAN
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: asin(0.0)
	__STWRST
	L		0.0
	ASIN
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: asin(-0.0)
	__STWRST
	L		-0.0
	ASIN
	__ASSERT==	__ACCU 1,	-0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: asin(1.0)
	__STWRST
	L		1.0
	ASIN
	__ASSERT==	__ACCU 1,	MD 8	// PI/2
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: sin(-1.0)
	__STWRST
	L		-1.0
	ASIN
	__ASSERT==	__ACCU 1,	MD 12	// -PI/2
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: acos(1.0)
	__STWRST
	L		1.0
	ACOS
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: acos(0.0)
	__STWRST
	L		0.0
	ACOS
	__ASSERT==	__ACCU 1,	MD 8	// PI/2
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: acos(-1.0)
	__STWRST
	L		-1.0
	ACOS
	__ASSERT==	__ACCU 1,	MD 0	// PI
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: atan(0.0)
	__STWRST
	L		0.0
	ATAN
	__ASSERT==	__ACCU 1,	0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: atan(-0.0)
	__STWRST
	L		-0.0
	ATAN
	__ASSERT==	__ACCU 1,	-0.0
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: atan(1.0)
	__STWRST
	L		1.0
	ATAN
	__ASSERT==	__ACCU 1,	MD 16	// PI/4
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: atan(inf)
	__STWRST
	L		DW#16#7F800000
	ATAN
	__ASSERT==	__ACCU 1,	MD 8	// PI/2
	__ASSERT==	__STW A1,	1
	__ASSERT==	__STW A0,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: atan(-inf)
	__STWRST
	L		DW#16#FF800000
	ATAN
	__ASSERT==	__ACCU 1,	MD 12	// -PI/2
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: atan(-1.0)
	__STWRST
	L		-1.0
	ATAN
	__ASSERT==	__ACCU 1,	MD 20	// -PI/4
	__ASSERT==	__STW A1,	0
	__ASSERT==	__STW A0,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: 1 -> 1.0
	__STWRST
	L		1
	DTR
	__ASSERT==	__ACCU 1,	1.0


	// Test: -1 -> -1.0
	__STWRST
	L		L#-1
	DTR
	__ASSERT==	__ACCU 1,	-1.0


	// Test: RND(1.1)
	__STWRST
	L		1.1
	RND
	__ASSERT==	__ACCU 1,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND(1.5)
	__STWRST
	L		1.5
	RND
	__ASSERT==	__ACCU 1,	2
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND(2.5)
	__STWRST
	L		2.5
	RND
	__ASSERT==	__ACCU 1,	2
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND(-1.1)
	__STWRST
	L		-1.1
	RND
	__ASSERT==	__ACCU 1,	L#-1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND(-1.5)
	__STWRST
	L		-1.5
	RND
	__ASSERT==	__ACCU 1,	L#-2
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND(-2.5)
	__STWRST
	L		-2.5
	RND
	__ASSERT==	__ACCU 1,	L#-2
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND(3000000000.0)
	__STWRST
	L		3000000000.0
	RND
	__ASSERT==	__ACCU 1,	3000000000.0
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: RND(nNAN)
	__STWRST
	L		__CNST_NNAN
	RND
	__ASSERT==	__ACCU 1,	__CNST_NNAN
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: RND(pNAN)
	__STWRST
	L		__CNST_PNAN
	RND
	__ASSERT==	__ACCU 1,	__CNST_PNAN
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: RND(nINF)
	__STWRST
	L		__CNST_NINF
	RND
	__ASSERT==	__ACCU 1,	__CNST_NINF
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: RND(pINF)
	__STWRST
	L		__CNST_PINF
	RND
	__ASSERT==	__ACCU 1,	__CNST_PINF
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: TRUNC(1.1)
	__STWRST
	L		1.1
	TRUNC
	__ASSERT==	__ACCU 1,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: TRUNC(1.5)
	__STWRST
	L		1.5
	TRUNC
	__ASSERT==	__ACCU 1,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: TRUNC(2.5)
	__STWRST
	L		2.5
	TRUNC
	__ASSERT==	__ACCU 1,	2
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: TRUNC(-1.1)
	__STWRST
	L		-1.1
	TRUNC
	__ASSERT==	__ACCU 1,	L#-1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: TRUNC(-1.5)
	__STWRST
	L		-1.5
	TRUNC
	__ASSERT==	__ACCU 1,	L#-1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: TRUNC(-2.5)
	__STWRST
	L		-2.5
	TRUNC
	__ASSERT==	__ACCU 1,	L#-2
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: TRUNC(3000000000.0)
	__STWRST
	L		3000000000.0
	TRUNC
	__ASSERT==	__ACCU 1,	3000000000.0
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: TRUNC(nNAN)
	__STWRST
	L		__CNST_NNAN
	TRUNC
	__ASSERT==	__ACCU 1,	__CNST_NNAN
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: TRUNC(pNAN)
	__STWRST
	L		__CNST_PNAN
	TRUNC
	__ASSERT==	__ACCU 1,	__CNST_PNAN
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: TRUNC(nINF)
	__STWRST
	L		__CNST_NINF
	TRUNC
	__ASSERT==	__ACCU 1,	__CNST_NINF
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: TRUNC(pINF)
	__STWRST
	L		__CNST_PINF
	TRUNC
	__ASSERT==	__ACCU 1,	__CNST_PINF
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: RND+(0.0)
	__STWRST
	L		0.0
	RND+
	__ASSERT==	__ACCU 1,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND+(0.1)
	__STWRST
	L		0.1
	RND+
	__ASSERT==	__ACCU 1,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND+(0.5)
	__STWRST
	L		0.5
	RND+
	__ASSERT==	__ACCU 1,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND+(1.0)
	__STWRST
	L		1.0
	RND+
	__ASSERT==	__ACCU 1,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND+(1.5)
	__STWRST
	L		1.5
	RND+
	__ASSERT==	__ACCU 1,	2
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND+(2.5)
	__STWRST
	L		2.5
	RND+
	__ASSERT==	__ACCU 1,	3
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND+(-0.1)
	__STWRST
	L		-0.1
	RND+
	__ASSERT==	__ACCU 1,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND+(-0.5)
	__STWRST
	L		-0.5
	RND+
	__ASSERT==	__ACCU 1,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND+(-1.0)
	__STWRST
	L		-1.0
	RND+
	__ASSERT==	__ACCU 1,	L#-1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND+(-1.5)
	__STWRST
	L		-1.5
	RND+
	__ASSERT==	__ACCU 1,	L#-1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND+(-2.5)
	__STWRST
	L		-2.5
	RND+
	__ASSERT==	__ACCU 1,	L#-2
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND+(3000000000.0)
	__STWRST
	L		3000000000.0
	RND+
	__ASSERT==	__ACCU 1,	3000000000.0
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: RND+(nNAN)
	__STWRST
	L		__CNST_NNAN
	RND+
	__ASSERT==	__ACCU 1,	__CNST_NNAN
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: RND+(pNAN)
	__STWRST
	L		__CNST_PNAN
	RND+
	__ASSERT==	__ACCU 1,	__CNST_PNAN
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: RND+(nINF)
	__STWRST
	L		__CNST_NINF
	RND+
	__ASSERT==	__ACCU 1,	__CNST_NINF
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: RND+(pINF)
	__STWRST
	L		__CNST_PINF
	RND+
	__ASSERT==	__ACCU 1,	__CNST_PINF
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: RND-(0.0)
	__STWRST
	L		0.0
	RND-
	__ASSERT==	__ACCU 1,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND-(0.1)
	__STWRST
	L		0.1
	RND-
	__ASSERT==	__ACCU 1,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND-(0.5)
	__STWRST
	L		0.5
	RND-
	__ASSERT==	__ACCU 1,	0
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND-(1.0)
	__STWRST
	L		1.0
	RND-
	__ASSERT==	__ACCU 1,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND-(1.5)
	__STWRST
	L		1.5
	RND-
	__ASSERT==	__ACCU 1,	1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND-(2.5)
	__STWRST
	L		2.5
	RND-
	__ASSERT==	__ACCU 1,	2
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND-(-0.1)
	__STWRST
	L		-0.1
	RND-
	__ASSERT==	__ACCU 1,	L#-1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND-(-0.5)
	__STWRST
	L		-0.5
	RND-
	__ASSERT==	__ACCU 1,	L#-1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND-(-1.0)
	__STWRST
	L		-1.0
	RND-
	__ASSERT==	__ACCU 1,	L#-1
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND-(-1.5)
	__STWRST
	L		-1.5
	RND-
	__ASSERT==	__ACCU 1,	L#-2
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND-(-2.5)
	__STWRST
	L		-2.5
	RND-
	__ASSERT==	__ACCU 1,	L#-3
	__ASSERT==	__STW OV,	0
	__ASSERT==	__STW OS,	0


	// Test: RND-(3000000000.0)
	__STWRST
	L		3000000000.0
	RND-
	__ASSERT==	__ACCU 1,	3000000000.0
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: RND-(nNAN)
	__STWRST
	L		__CNST_NNAN
	RND-
	__ASSERT==	__ACCU 1,	__CNST_NNAN
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: RND-(pNAN)
	__STWRST
	L		__CNST_PNAN
	RND-
	__ASSERT==	__ACCU 1,	__CNST_PNAN
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: RND-(nINF)
	__STWRST
	L		__CNST_NINF
	RND-
	__ASSERT==	__ACCU 1,	__CNST_NINF
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	// Test: RND-(pINF)
	__STWRST
	L		__CNST_PINF
	RND-
	__ASSERT==	__ACCU 1,	__CNST_PINF
	__ASSERT==	__STW OV,	1
	__ASSERT==	__STW OS,	1


	CALL SFC 46 // STOP CPU