Thread: [pure-lang-svn] SF.net SVN: pure-lang:[456] pure/trunk/test
Status: Beta
Brought to you by:
agraef
Menu
▾
▴
pure-lang-svn
|
From: <ag...@us...> - 2008-08-09 10:52:23
|
Revision: 456
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=456&view=rev
Author: agraef
Date: 2008-08-09 10:52:33 +0000 (Sat, 09 Aug 2008)
Log Message:
-----------
Add regression test for nested 'with' environments.
Added Paths:
-----------
pure/trunk/test/test016.log
pure/trunk/test/test016.pure
Added: pure/trunk/test/test016.log
===================================================================
--- pure/trunk/test/test016.log (rev 0)
+++ pure/trunk/test/test016.log 2008-08-09 10:52:33 UTC (rev 456)
@@ -0,0 +1,44 @@
+(foo/*0*/ x with foo x/*0:1*/ = x/*0:1*/^3 {
+ rule #0: foo x = x^3
+ state 0: #0
+ <var> state 1
+ state 1: #0
+} end)+(foo/*0*/ x with foo x/*0:1*/ = 2*x/*0:1*/ {
+ rule #0: foo x = 2*x
+ state 0: #0
+ <var> state 1
+ state 1: #0
+} end);
+x^3+2*x
+(foo/*0*/ x with foo x/*0:1*/ = x/*0:1*/^3 {
+ rule #0: foo x = x^3
+ state 0: #0
+ <var> state 1
+ state 1: #0
+} end)+(foo/*0*/ x with foo = (+) 1 {
+ rule #0: foo = (+) 1
+ state 0: #0
+} end with foo x/*0:1*/ = 2*x/*0:1*/ {
+ rule #0: foo x = 2*x
+ state 0: #0
+ <var> state 1
+ state 1: #0
+} end);
+x^3+(1+x)
+(foo/*0*/ x with foo x/*0:1*/ = x/*0:1*/^3 {
+ rule #0: foo x = x^3
+ state 0: #0
+ <var> state 1
+ state 1: #0
+} end)+(foo/*0:*/ x when foo/*0:*/ = (+) 1 {
+ rule #0: foo = (+) 1
+ state 0: #0
+ <var> state 1
+ state 1: #0
+} end with foo x/*0:1*/ = 2*x/*0:1*/ {
+ rule #0: foo x = 2*x
+ state 0: #0
+ <var> state 1
+ state 1: #0
+} end);
+x^3+(1+x)
Added: pure/trunk/test/test016.pure
===================================================================
--- pure/trunk/test/test016.pure (rev 0)
+++ pure/trunk/test/test016.pure 2008-08-09 10:52:33 UTC (rev 456)
@@ -0,0 +1,5 @@
+// test handling of nested 'with' environments
+
+(foo x with foo x = x^3 end) + (foo x with foo x = 2*x end);
+(foo x with foo x = x^3 end) + (foo x with foo = (+) 1 end with foo x = 2*x end);
+(foo x with foo x = x^3 end) + (foo x when foo = (+) 1 end with foo x = 2*x end);
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-08-11 20:06:20
|
Revision: 466
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=466&view=rev
Author: agraef
Date: 2008-08-11 20:06:18 +0000 (Mon, 11 Aug 2008)
Log Message:
-----------
Add timex/catch/throw regression test.
Added Paths:
-----------
pure/trunk/test/test017.log
pure/trunk/test/test017.pure
Added: pure/trunk/test/test017.log
===================================================================
--- pure/trunk/test/test017.log (rev 0)
+++ pure/trunk/test/test017.log 2008-08-11 20:06:18 UTC (rev 466)
@@ -0,0 +1,45 @@
+timex f/*0:1*/ = (clock-t0/*1:*/)/1000000,res/*0:*/ when t0/*0:*/ = clock; res/*0:*/ = f/*1:1*/ () {
+ rule #0: res = f ()
+ state 0: #0
+ <var> state 1
+ state 1: #0
+} {
+ rule #0: t0 = clock
+ state 0: #0
+ <var> state 1
+ state 1: #0
+} end;
+foo n/*0:1*/ = if n/*0:1*/<=0 then n/*0:1*/ else foo (n/*0:1*/-1);
+bar x/*0:1*/ = catch id (throw x/*1:1*/);
+{
+ rule #0: timex f = (clock-t0)/1000000,res when t0 = clock; res = f () end
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+{
+ rule #0: foo n = if n<=0 then n else foo (n-1)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+{
+ rule #0: bar x = catch id (throw x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+timex (\_/*0:*/ -> foo 100000 {
+ rule #0: _ = foo 100000
+ state 0: #0
+ <var> state 1
+ state 1: #0
+});
+0.14,0
+timex (\_/*0:*/ -> bar 99 {
+ rule #0: _ = bar 99
+ state 0: #0
+ <var> state 1
+ state 1: #0
+});
+0.0,99
Added: pure/trunk/test/test017.pure
===================================================================
--- pure/trunk/test/test017.pure (rev 0)
+++ pure/trunk/test/test017.pure 2008-08-11 20:06:18 UTC (rev 466)
@@ -0,0 +1,10 @@
+
+using system;
+
+timex f = (clock-t0)/CLOCKS_PER_SEC, res when t0 = clock; res = f () end;
+
+foo n = if n<=0 then n else foo (n-1); // burn some cycles
+bar x = catch id (throw x);
+
+timex (\_->foo 100000);
+timex (\_->bar 99);
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-08-11 20:09:29
|
Revision: 467
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=467&view=rev
Author: agraef
Date: 2008-08-11 20:09:26 +0000 (Mon, 11 Aug 2008)
Log Message:
-----------
Fix timex/catch/throw regression test.
Modified Paths:
--------------
pure/trunk/test/test017.log
pure/trunk/test/test017.pure
Modified: pure/trunk/test/test017.log
===================================================================
--- pure/trunk/test/test017.log 2008-08-11 20:06:18 UTC (rev 466)
+++ pure/trunk/test/test017.log 2008-08-11 20:09:26 UTC (rev 467)
@@ -34,12 +34,12 @@
state 0: #0
<var> state 1
state 1: #0
-});
-0.14,0
+})!1;
+0
timex (\_/*0:*/ -> bar 99 {
rule #0: _ = bar 99
state 0: #0
<var> state 1
state 1: #0
-});
-0.0,99
+})!1;
+99
Modified: pure/trunk/test/test017.pure
===================================================================
--- pure/trunk/test/test017.pure 2008-08-11 20:06:18 UTC (rev 466)
+++ pure/trunk/test/test017.pure 2008-08-11 20:09:26 UTC (rev 467)
@@ -6,5 +6,5 @@
foo n = if n<=0 then n else foo (n-1); // burn some cycles
bar x = catch id (throw x);
-timex (\_->foo 100000);
-timex (\_->bar 99);
+timex (\_->foo 100000)!1;
+timex (\_->bar 99)!1;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-08-19 06:57:09
|
Revision: 537
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=537&view=rev
Author: agraef
Date: 2008-08-19 06:57:19 +0000 (Tue, 19 Aug 2008)
Log Message:
-----------
Remove CLOCKS_PER_SEC to eliminate platform dependencies.
Modified Paths:
--------------
pure/trunk/test/test017.log
pure/trunk/test/test017.pure
Modified: pure/trunk/test/test017.log
===================================================================
--- pure/trunk/test/test017.log 2008-08-19 06:23:50 UTC (rev 536)
+++ pure/trunk/test/test017.log 2008-08-19 06:57:19 UTC (rev 537)
@@ -1,4 +1,4 @@
-timex f/*0:1*/ = (clock-t0/*1:*/)/1000000,res/*0:*/ when t0/*0:*/ = clock; res/*0:*/ = f/*1:1*/ () {
+timex f/*0:1*/ = clock-t0/*1:*/,res/*0:*/ when t0/*0:*/ = clock; res/*0:*/ = f/*1:1*/ () {
rule #0: res = f ()
state 0: #0
<var> state 1
@@ -12,7 +12,7 @@
foo n/*0:1*/ = if n/*0:1*/<=0 then n/*0:1*/ else foo (n/*0:1*/-1);
bar x/*0:1*/ = catch id (throw x/*1:1*/);
{
- rule #0: timex f = (clock-t0)/1000000,res when t0 = clock; res = f () end
+ rule #0: timex f = clock-t0,res when t0 = clock; res = f () end
state 0: #0
<var> state 1
state 1: #0
Modified: pure/trunk/test/test017.pure
===================================================================
--- pure/trunk/test/test017.pure 2008-08-19 06:23:50 UTC (rev 536)
+++ pure/trunk/test/test017.pure 2008-08-19 06:57:19 UTC (rev 537)
@@ -1,7 +1,7 @@
using system;
-timex f = (clock-t0)/CLOCKS_PER_SEC, res when t0 = clock; res = f () end;
+timex f = clock-t0, res when t0 = clock; res = f () end;
foo n = if n<=0 then n else foo (n-1); // burn some cycles
bar x = catch id (throw x);
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-08-20 09:07:39
|
Revision: 549
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=549&view=rev
Author: agraef
Date: 2008-08-20 09:07:48 +0000 (Wed, 20 Aug 2008)
Log Message:
-----------
Windows compatibility fixes.
Modified Paths:
--------------
pure/trunk/test/test018.log
pure/trunk/test/test018.pure
Modified: pure/trunk/test/test018.log
===================================================================
--- pure/trunk/test/test018.log 2008-08-20 08:44:09 UTC (rev 548)
+++ pure/trunk/test/test018.log 2008-08-20 09:07:48 UTC (rev 549)
@@ -70,12 +70,8 @@
"80000000"
sprintf "%x" (-4294967295L);
"1"
-ord$sprintf "%c" 128;
-128
ord$sprintf "%c" 255;
255
-ord$sprintf "%c" 128L;
-128
ord$sprintf "%c" 255L;
255
sscanf "ffffffff" "%x";
Modified: pure/trunk/test/test018.pure
===================================================================
--- pure/trunk/test/test018.pure 2008-08-20 08:44:09 UTC (rev 548)
+++ pure/trunk/test/test018.pure 2008-08-20 09:07:48 UTC (rev 549)
@@ -54,9 +54,7 @@
// unsigned char
-ord $ sprintf "%c" 0x80;
ord $ sprintf "%c" 0xff;
-ord $ sprintf "%c" 0x80L;
ord $ sprintf "%c" 0xffL;
// unsigned return values
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-08-22 12:32:23
|
Revision: 570
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=570&view=rev
Author: agraef
Date: 2008-08-22 12:32:31 +0000 (Fri, 22 Aug 2008)
Log Message:
-----------
Round results to 6 digits, to prevent failing tests due to small rounding discrepancies.
Modified Paths:
--------------
pure/trunk/test/test020.log
pure/trunk/test/test020.pure
Modified: pure/trunk/test/test020.log
===================================================================
--- pure/trunk/test/test020.log 2008-08-22 11:37:41 UTC (rev 569)
+++ pure/trunk/test/test020.log 2008-08-22 12:32:31 UTC (rev 570)
@@ -36,84 +36,89 @@
<var> state 1
state 1: #0
}) x;
-test f/*0:01*/ (x/*0:101*/,y/*0:11*/) = puts$str (f/*0:01*/,x/*0:101*/,y/*0:11*/,check f/*0:01*/ (x/*0:101*/,y/*0:11*/) (catch __error__ (f/*1:01*/ x/*1:101*/ y/*1:11*/)));
-test f/*0:01*/ x/*0:1*/ = puts$str (f/*0:01*/,x/*0:1*/,check f/*0:01*/ x/*0:1*/ (catch __error__ (f/*1:01*/ x/*1:1*/)));
-check f/*0:001*/ (x/*0:0101*/,y/*0:011*/) z@(f1@_/*0:100*/ x1/*0:101*/ y1/*0:11*/) = __failed__ z/*0:1*/ if f/*0:001*/===f1/*0:100*/&&x/*0:0101*/===x1/*0:101*/&&y/*0:011*/===y1/*0:11*/;
-check f/*0:001*/ x/*0:01*/ z@(f1@_/*0:10*/ x1/*0:11*/) = __failed__ z/*0:1*/ if f/*0:001*/===f1/*0:10*/&&x/*0:01*/===x1/*0:11*/;
+test f/*0:01*/ (x/*0:101*/,y/*0:11*/) = puts$format (f/*0:01*/,x/*0:101*/,y/*0:11*/,check f/*0:01*/ (x/*0:101*/,y/*0:11*/) (catch __error__ (f/*1:01*/ x/*1:101*/ y/*1:11*/)));
+test f/*0:01*/ x/*0:1*/ = puts$format (f/*0:01*/,x/*0:1*/,check f/*0:01*/ x/*0:1*/ (catch __error__ (f/*1:01*/ x/*1:1*/)));
+check f/*0:001*/ _/*0:01*/ (g@_/*0:100*/ _/*0:101*/ _/*0:11*/) = __failed__ if f/*0:001*/===g/*0:100*/;
+check f/*0:001*/ _/*0:01*/ (g@_/*0:10*/ _/*0:11*/) = __failed__ if f/*0:001*/===g/*0:10*/;
check _/*0:001*/ _/*0:01*/ z/*0:1*/ = z/*0:1*/;
+format (f/*0:101*/,x/*0:1101*/,y/*0:11101*/,z/*0:1111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show y/*0:11101*/+","+show z/*0:1111*/;
+format (f/*0:101*/,x/*0:1101*/,z/*0:111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show z/*0:111*/;
+show x/*0:1*/::double = sprintf "%#0.6g" x/*0:1*/;
+show (x/*0:101*/+:y/*0:11*/) = show x/*0:101*/+"+:"+show y/*0:11*/;
+show (x/*0:101*/<:y/*0:11*/) = show x/*0:101*/+"<:"+show y/*0:11*/;
+show x/*0:1*/ = str x/*0:1*/;
{
- rule #0: check f (x,y) z@(f1@_ x1 y1) = __failed__ z if f===f1&&x===x1&&y===y1
- rule #1: check f x z@(f1@_ x1) = __failed__ z if f===f1&&x===x1
+ rule #0: check f _ (g@_ _ _) = __failed__ if f===g
+ rule #1: check f _ (g@_ _) = __failed__ if f===g
rule #2: check _ _ z = z
state 0: #0 #1 #2
<var> state 1
state 1: #0 #1 #2
<var> state 2
- <app> state 7
- state 2: #1 #2
+ state 2: #0 #1 #2
<var> state 3
<app> state 4
state 3: #2
- state 4: #1 #2
+ state 4: #0 #1 #2
<var> state 5
+ <app> state 7
state 5: #1 #2
<var> state 6
state 6: #1 #2
state 7: #0 #1 #2
<var> state 8
- <app> state 14
- state 8: #1 #2
+ state 8: #0 #1 #2
<var> state 9
- state 9: #1 #2
+ state 9: #0 #1 #2
<var> state 10
- <app> state 11
- state 10: #2
- state 11: #1 #2
+ state 10: #0 #1 #2
+}
+{
+ rule #0: format (f,x,y,z) = str f+","+show x+","+show y+","+show z
+ rule #1: format (f,x,z) = str f+","+show x+","+show z
+ state 0: #0 #1
+ <app> state 1
+ state 1: #0 #1
+ <app> state 2
+ state 2: #0 #1
+ , state 3
+ state 3: #0 #1
+ <var> state 4
+ state 4: #0 #1
+ <app> state 5
+ state 5: #0 #1
+ <app> state 6
+ state 6: #0 #1
+ , state 7
+ state 7: #0 #1
+ <var> state 8
+ state 8: #0 #1
+ <var> state 9
+ <app> state 10
+ state 9: #1
+ state 10: #0 #1
+ <var> state 11
+ <app> state 13
+ state 11: #1
<var> state 12
- state 12: #1 #2
- <var> state 13
- state 13: #1 #2
- state 14: #0 #1 #2
+ state 12: #1
+ state 13: #0 #1
+ <var> state 14
+ , state 17
+ state 14: #1
<var> state 15
- , state 22
- state 15: #1 #2
+ state 15: #1
<var> state 16
- state 16: #1 #2
- <var> state 17
- state 17: #1 #2
+ state 16: #1
+ state 17: #0 #1
<var> state 18
- <app> state 19
- state 18: #2
- state 19: #1 #2
- <var> state 20
- state 20: #1 #2
- <var> state 21
- state 21: #1 #2
- state 22: #0 #1 #2
- <var> state 23
- state 23: #0 #1 #2
- <var> state 24
- state 24: #0 #1 #2
- <var> state 25
- <app> state 26
- state 25: #2
- state 26: #0 #1 #2
- <var> state 27
- <app> state 29
- state 27: #1 #2
- <var> state 28
- state 28: #1 #2
- state 29: #0 #1 #2
- <var> state 30
- state 30: #0 #1 #2
- <var> state 31
- state 31: #0 #1 #2
- <var> state 32
- state 32: #0 #1 #2
+ state 18: #0 #1
+ <var> state 19
+ state 19: #0 #1
}
{
- rule #0: test f (x,y) = puts$str (f,x,y,check f (x,y) (catch __error__ (f x y)))
- rule #1: test f x = puts$str (f,x,check f x (catch __error__ (f x)))
+ rule #0: test f (x,y) = puts$format (f,x,y,check f (x,y) (catch __error__ (f x y)))
+ rule #1: test f x = puts$format (f,x,check f x (catch __error__ (f x)))
state 0: #0 #1
<var> state 1
state 1: #0 #1
@@ -140,394 +145,431 @@
<var> state 12
state 12: #0 #1
}
+{
+ rule #0: show x::double = sprintf "%#0.6g" x
+ rule #1: show (x+:y) = show x+"+:"+show y
+ rule #2: show (x<:y) = show x+"<:"+show y
+ rule #3: show x = str x
+ state 0: #0 #1 #2 #3
+ <var> state 1
+ <var>::double state 2
+ <app> state 3
+ state 1: #3
+ state 2: #0 #3
+ state 3: #1 #2 #3
+ <var> state 4
+ <app> state 6
+ state 4: #3
+ <var> state 5
+ state 5: #3
+ state 6: #1 #2 #3
+ <var> state 7
+ +: state 10
+ <: state 13
+ state 7: #3
+ <var> state 8
+ state 8: #3
+ <var> state 9
+ state 9: #3
+ state 10: #1 #3
+ <var> state 11
+ state 11: #1 #3
+ <var> state 12
+ state 12: #1 #3
+ state 13: #2 #3
+ <var> state 14
+ state 14: #2 #3
+ <var> state 15
+ state 15: #2 #3
+}
*** UNARY ***
-sqrt,1,1.0
-sqrt,-1,0.0+:1.0
-sqrt,0,0.0
-sqrt,0.0,0.0
-sqrt,1.2,1.09544511501033
-sqrt,-1.2,0.0+:1.09544511501033
-sqrt,1L%3L,0.577350269189626
-sqrt,(-1L)%4L,0.0+:0.5
-sqrt,1+:2,1.27201964951407+:0.786151377757423
-sqrt,-1+:2,0.786151377757423+:1.27201964951407
-sqrt,1+:-2,1.27201964951407+:0.786151377757423
-sqrt,-1.2+:4.3,1.27755682008863+:1.68289970840659
-sqrt,1.2+:-4.3,1.68289970840659+:1.27755682008863
-sqrt,1L%2L+:1,0.899453719973934+:0.555892970251421
-sqrt,1L%2L+:3L%4L,0.83707461401777+:0.447988738064919
-sqrt,3<:1,1.73205080756888<:0.5
-sqrt,3<:-2.14159265358979,1.73205080756888<:-1.0707963267949
-sqrt,3.0<:-3,1.73205080756888<:-1.5
-sqrt,3.1<:2.5,1.7606816861659<:1.25
-sqrt,2L%3L<:2,0.816496580927726<:1.0
-sqrt,1L%2L<:3L%4L,0.707106781186548<:0.375
-sqrt,-inf,0.0+:inf
+sqrt,1,1.00000
+sqrt,-1,0.00000+:1.00000
+sqrt,0,0.00000
+sqrt,0.00000,0.00000
+sqrt,1.20000,1.09545
+sqrt,-1.20000,0.00000+:1.09545
+sqrt,1L%3L,0.577350
+sqrt,(-1L)%4L,0.00000+:0.500000
+sqrt,1+:2,1.27202+:0.786151
+sqrt,-1+:2,0.786151+:1.27202
+sqrt,1+:-2,1.27202+:0.786151
+sqrt,-1.20000+:4.30000,1.27756+:1.68290
+sqrt,1.20000+:-4.30000,1.68290+:1.27756
+sqrt,1L%2L+:1,0.899454+:0.555893
+sqrt,1L%2L+:3L%4L,0.837075+:0.447989
+sqrt,3<:1,1.73205<:0.500000
+sqrt,3<:-2.14159,1.73205<:-1.07080
+sqrt,3.00000<:-3,1.73205<:-1.50000
+sqrt,3.10000<:2.50000,1.76068<:1.25000
+sqrt,2L%3L<:2,0.816497<:1.00000
+sqrt,1L%2L<:3L%4L,0.707107<:0.375000
+sqrt,-inf,0.00000+:inf
sqrt,nan,nan
-sin,1,0.841470984807897
-sin,-1,-0.841470984807897
-sin,0,0.0
-sin,0.0,0.0
-sin,1.2,0.932039085967226
-sin,-1.2,-0.932039085967226
-sin,1L%3L,0.327194696796152
-sin,(-1L)%4L,-0.247403959254523
-sin,1+:2,3.16577851321617+:1.95960104142161
-sin,-1+:2,-3.16577851321617+:1.95960104142161
-sin,1+:-2,3.16577851321617+:-1.95960104142161
-sin,-1.2+:4.3,-34.351867391542+:13.3503875389022
-sin,1.2+:-4.3,34.351867391542+:-13.3503875389022
-sin,1L%2L+:1,0.739792264456014+:1.03133607425455
-sin,1L%2L+:3L%4L,0.620704231078055+:0.721650824297564
-sin,3<:1,6.28163530398568<:-0.0494726344890117
-sin,3<:-2.14159265358979,6.28163530398567<:3.09212001910078
-sin,3.0<:-3,0.468364088212104<:1.97989764678311
-sin,3.1<:2.5,3.17788867786845<:-2.25266146393774
-sin,2L%3L<:2,0.699833695459732<:2.05499060924475
-sin,1L%2L<:3L%4L,0.498700404819053<:0.708394123409847
+sin,1,0.841471
+sin,-1,-0.841471
+sin,0,0.00000
+sin,0.00000,0.00000
+sin,1.20000,0.932039
+sin,-1.20000,-0.932039
+sin,1L%3L,0.327195
+sin,(-1L)%4L,-0.247404
+sin,1+:2,3.16578+:1.95960
+sin,-1+:2,-3.16578+:1.95960
+sin,1+:-2,3.16578+:-1.95960
+sin,-1.20000+:4.30000,-34.3519+:13.3504
+sin,1.20000+:-4.30000,34.3519+:-13.3504
+sin,1L%2L+:1,0.739792+:1.03134
+sin,1L%2L+:3L%4L,0.620704+:0.721651
+sin,3<:1,6.28164<:-0.0494726
+sin,3<:-2.14159,6.28164<:3.09212
+sin,3.00000<:-3,0.468364<:1.97990
+sin,3.10000<:2.50000,3.17789<:-2.25266
+sin,2L%3L<:2,0.699834<:2.05499
+sin,1L%2L<:3L%4L,0.498700<:0.708394
sin,-inf,nan
sin,nan,nan
-cos,1,0.54030230586814
-cos,-1,0.54030230586814
-cos,0,1.0
-cos,0.0,1.0
-cos,1.2,0.362357754476674
-cos,-1.2,0.362357754476674
-cos,1L%3L,0.944956946314738
-cos,(-1L)%4L,0.968912421710645
-cos,1+:2,2.03272300701967+:-3.0518977991518
-cos,-1+:2,2.03272300701967+:3.0518977991518
-cos,1+:-2,2.03272300701967+:3.0518977991518
-cos,-1.2+:4.3,13.3553042114774+:34.3392209642024
-cos,1.2+:-4.3,13.3553042114774+:34.3392209642024
-cos,1L%2L+:1,1.35418065670458+:-0.563421465230982
-cos,1L%2L+:3L%4L,1.13619147380335+:-0.394239642111583
-cos,3<:1,6.20193195969258<:-1.62155307254104
-cos,3<:-2.14159265358979,6.20193195969257<:-1.62155307254104
-cos,3.0<:-3,1.07751445241005<:-3.07241725532314
-cos,3.1<:2.5,3.21728657985303<:2.50707118166099
-cos,2L%3L<:2,1.15747143172116<:0.152985430170633
-cos,1L%2L<:3L%4L,0.996367993542271<:-0.125077153297551
+cos,1,0.540302
+cos,-1,0.540302
+cos,0,1.00000
+cos,0.00000,1.00000
+cos,1.20000,0.362358
+cos,-1.20000,0.362358
+cos,1L%3L,0.944957
+cos,(-1L)%4L,0.968912
+cos,1+:2,2.03272+:-3.05190
+cos,-1+:2,2.03272+:3.05190
+cos,1+:-2,2.03272+:3.05190
+cos,-1.20000+:4.30000,13.3553+:34.3392
+cos,1.20000+:-4.30000,13.3553+:34.3392
+cos,1L%2L+:1,1.35418+:-0.563421
+cos,1L%2L+:3L%4L,1.13619+:-0.394240
+cos,3<:1,6.20193<:-1.62155
+cos,3<:-2.14159,6.20193<:-1.62155
+cos,3.00000<:-3,1.07751<:-3.07242
+cos,3.10000<:2.50000,3.21729<:2.50707
+cos,2L%3L<:2,1.15747<:0.152985
+cos,1L%2L<:3L%4L,0.996368<:-0.125077
cos,-inf,nan
cos,nan,nan
-tan,1,1.5574077246549
-tan,-1,-1.5574077246549
-tan,0,0.0
-tan,0.0,0.0
-tan,1.2,2.57215162212632
-tan,-1.2,-2.57215162212632
-tan,1L%3L,0.346253549510575
-tan,(-1L)%4L,-0.255341921221036
-tan,1+:2,0.0338128260798967+:1.01479361614663
-tan,-1+:2,-0.0338128260798967+:1.01479361614663
-tan,1+:-2,0.0338128260798967+:-1.01479361614663
-tan,-1.2+:4.3,-0.000248780909688767+:1.00027152283444
-tan,1.2+:-4.3,0.000248780909688767+:-1.00027152283444
-tan,1L%2L+:1,0.195577310065934+:0.842966204845783
-tan,1L%2L+:3L%4L,0.290893461829618+:0.736084170551191
-tan,3<:1,1.01285137354152<:1.57208043805203
-tan,3<:-2.14159265358979,1.01285137354152<:-1.56951221553776
-tan,3.0<:-3,0.434670817792307<:-1.23087040507334
-tan,3.1<:2.5,0.987754307548699<:1.52345266158086
-tan,2L%3L<:2,0.604622866949795<:1.90200517907412
-tan,1L%2L<:3L%4L,0.500518290482296<:0.833471276707398
+tan,1,1.55741
+tan,-1,-1.55741
+tan,0,0.00000
+tan,0.00000,0.00000
+tan,1.20000,2.57215
+tan,-1.20000,-2.57215
+tan,1L%3L,0.346254
+tan,(-1L)%4L,-0.255342
+tan,1+:2,0.0338128+:1.01479
+tan,-1+:2,-0.0338128+:1.01479
+tan,1+:-2,0.0338128+:-1.01479
+tan,-1.20000+:4.30000,-0.000248781+:1.00027
+tan,1.20000+:-4.30000,0.000248781+:-1.00027
+tan,1L%2L+:1,0.195577+:0.842966
+tan,1L%2L+:3L%4L,0.290893+:0.736084
+tan,3<:1,1.01285<:1.57208
+tan,3<:-2.14159,1.01285<:-1.56951
+tan,3.00000<:-3,0.434671<:-1.23087
+tan,3.10000<:2.50000,0.987754<:1.52345
+tan,2L%3L<:2,0.604623<:1.90201
+tan,1L%2L<:3L%4L,0.500518<:0.833471
tan,-inf,nan
tan,nan,nan
-ln,1,0.0
-ln,-1,0.0+:3.14159265358979
+ln,1,0.00000
+ln,-1,0.00000+:3.14159
ln,0,-inf
-ln,0.0,-inf
-ln,1.2,0.182321556793955
-ln,-1.2,0.182321556793955+:3.14159265358979
-ln,1L%3L,-1.09861228866811
-ln,(-1L)%4L,-1.38629436111989+:3.14159265358979
-ln,1+:2,0.80471895621705+:1.10714871779409
-ln,-1+:2,0.80471895621705+:2.0344439357957
-ln,1+:-2,0.80471895621705+:-1.10714871779409
-ln,-1.2+:4.3,1.49611306711235+:1.84294221732608
-ln,1.2+:-4.3,1.49611306711235+:-1.29865043626371
-ln,1L%2L+:1,0.111571775657105+:1.10714871779409
-ln,1L%2L+:3L%4L,-0.103819682389122+:0.982793723247329
-ln,3<:1,1.48558034478536<:0.738443417734099
-ln,3<:-2.14159265358979,2.40694163924312<:-1.09681203355936
-ln,3.0<:-3,3.19483160132308<:-1.21975934437627
-ln,3.1<:2.5,2.74409743593163<:1.14581484226141
-ln,2L%3L<:2,2.04068663784844<:1.77081795644967
-ln,1L%2L<:3L%4L,1.02125071060842<:2.31681982604851
-ln,-inf,inf+:3.14159265358979
+ln,0.00000,-inf
+ln,1.20000,0.182322
+ln,-1.20000,0.182322+:3.14159
+ln,1L%3L,-1.09861
+ln,(-1L)%4L,-1.38629+:3.14159
+ln,1+:2,0.804719+:1.10715
+ln,-1+:2,0.804719+:2.03444
+ln,1+:-2,0.804719+:-1.10715
+ln,-1.20000+:4.30000,1.49611+:1.84294
+ln,1.20000+:-4.30000,1.49611+:-1.29865
+ln,1L%2L+:1,0.111572+:1.10715
+ln,1L%2L+:3L%4L,-0.103820+:0.982794
+ln,3<:1,1.48558<:0.738443
+ln,3<:-2.14159,2.40694<:-1.09681
+ln,3.00000<:-3,3.19483<:-1.21976
+ln,3.10000<:2.50000,2.74410<:1.14581
+ln,2L%3L<:2,2.04069<:1.77082
+ln,1L%2L<:3L%4L,1.02125<:2.31682
+ln,-inf,inf+:3.14159
ln,nan,nan
-log,1,0.0
-log,-1,0.0+:1.36437635384184
+log,1,0.00000
+log,-1,0.00000+:1.36438
log,0,-inf
-log,0.0,-inf
-log,1.2,0.0791812460476248
-log,-1.2,0.0791812460476248+:1.36437635384184
-log,1L%3L,-0.477121254719662
-log,(-1L)%4L,-0.602059991327962+:1.36437635384184
-log,1+:2,0.349485002168009+:0.480828578784234
-log,-1+:2,0.349485002168009+:0.883547775057607
-log,1+:-2,0.349485002168009+:-0.480828578784234
-log,-1.2+:4.3,0.649753649350244+:0.800379635451262
-log,1.2+:-4.3,0.649753649350244+:-0.56399671839058
-log,1L%2L+:1,0.0484550065040282+:0.480828578784234
-log,1L%2L+:3L%4L,-0.045088315174544+:0.426821890855467
-log,3<:1,0.645179346164211<:0.738443417734099
-log,3<:-2.14159265358979,1.04532147218645<:-1.09681203355936
-log,3.0<:-3,1.38749773506474<:-1.21975934437627
-log,3.1<:2.5,1.19174637422997<:1.14581484226141
-log,2L%3L<:2,0.886258946111277<:1.77081795644967
-log,1L%2L<:3L%4L,0.443523548257011<:2.31681982604851
-log,-inf,inf+:1.36437635384184
+log,0.00000,-inf
+log,1.20000,0.0791812
+log,-1.20000,0.0791812+:1.36438
+log,1L%3L,-0.477121
+log,(-1L)%4L,-0.602060+:1.36438
+log,1+:2,0.349485+:0.480829
+log,-1+:2,0.349485+:0.883548
+log,1+:-2,0.349485+:-0.480829
+log,-1.20000+:4.30000,0.649754+:0.800380
+log,1.20000+:-4.30000,0.649754+:-0.563997
+log,1L%2L+:1,0.0484550+:0.480829
+log,1L%2L+:3L%4L,-0.0450883+:0.426822
+log,3<:1,0.645179<:0.738443
+log,3<:-2.14159,1.04532<:-1.09681
+log,3.00000<:-3,1.38750<:-1.21976
+log,3.10000<:2.50000,1.19175<:1.14581
+log,2L%3L<:2,0.886259<:1.77082
+log,1L%2L<:3L%4L,0.443524<:2.31682
+log,-inf,inf+:1.36438
log,nan,nan
-exp,1,2.71828182845905
-exp,-1,0.367879441171442
-exp,0,1.0
-exp,0.0,1.0
-exp,1.2,3.32011692273655
-exp,-1.2,0.301194211912202
-exp,1L%3L,1.39561242508609
-exp,(-1L)%4L,0.778800783071405
-exp,1+:2,-1.13120438375681+:2.47172667200482
-exp,-1+:2,-0.153091865674226+:0.334511829239262
-exp,1+:-2,-1.13120438375681+:-2.47172667200482
-exp,-1.2+:4.3,-0.120718390769691+:-0.275943877300056
-exp,1.2+:-4.3,-1.33070011384152+:3.04177803063665
-exp,1L%2L+:1,0.890807904293129+:1.38735111132976
-exp,1L%2L+:3L%4L,1.20635100164679+:1.12383232258413
-exp,3<:1,5.05767513183927<:2.52441295442369
-exp,3<:-2.14159265358979,0.197719302630721<:-2.52441295442369
-exp,3.0<:-3,0.0513044651926248<:-0.423360024179602
-exp,3.1<:2.5,0.0834468640645693<:1.85526364672227
-exp,2L%3L<:2,0.757727676013212<:0.606198284550454
-exp,1L%2L<:3L%4L,1.44173094152246<:0.340819380011667
-exp,-inf,0.0
+exp,1,2.71828
+exp,-1,0.367879
+exp,0,1.00000
+exp,0.00000,1.00000
+exp,1.20000,3.32012
+exp,-1.20000,0.301194
+exp,1L%3L,1.39561
+exp,(-1L)%4L,0.778801
+exp,1+:2,-1.13120+:2.47173
+exp,-1+:2,-0.153092+:0.334512
+exp,1+:-2,-1.13120+:-2.47173
+exp,-1.20000+:4.30000,-0.120718+:-0.275944
+exp,1.20000+:-4.30000,-1.33070+:3.04178
+exp,1L%2L+:1,0.890808+:1.38735
+exp,1L%2L+:3L%4L,1.20635+:1.12383
+exp,3<:1,5.05768<:2.52441
+exp,3<:-2.14159,0.197719<:-2.52441
+exp,3.00000<:-3,0.0513045<:-0.423360
+exp,3.10000<:2.50000,0.0834469<:1.85526
+exp,2L%3L<:2,0.757728<:0.606198
+exp,1L%2L<:3L%4L,1.44173<:0.340819
+exp,-inf,0.00000
exp,nan,nan
-atan,1,0.785398163397448
-atan,-1,-0.785398163397448
-atan,0,0.0
-atan,0.0,0.0
-atan,1.2,0.876058050598193
-atan,-1.2,-0.876058050598193
-atan,1L%3L,0.321750554396642
-atan,(-1L)%4L,-0.244978663126864
-atan,1+:2,1.33897252229449+:0.402359478108525
-atan,-1+:2,-1.33897252229449+:0.402359478108525
-atan,1+:-2,1.33897252229449+:-0.402359478108525
-atan,-1.2+:4.3,-1.50774129532113+:0.218342844644895
-atan,1.2+:-4.3,1.50774129532113+:-0.218342844644895
-atan,1L%2L+:1,0.90788749496088+:0.708303336014054
-atan,1L%2L+:3L%4L,0.692724188399601+:0.590213500279505
-atan,3<:1,1.37829430594262+:0.277918809215814
-atan,3<:-2.14159265358979,-1.37829430594262+:-0.277918809215814
-atan,3.0<:-3,-1.2514562387973+:-0.0424376137199477
-atan,3.1<:2.5,-1.30916663257012+:0.182562248419793
-atan,2L%3L<:2,-0.392386988985284+:0.609487349380993
-atan,1L%2L<:3L%4L,0.386520254485461+:0.305841704408549
-atan,-inf,-1.5707963267949
+atan,1,0.785398
+atan,-1,-0.785398
+atan,0,0.00000
+atan,0.00000,0.00000
+atan,1.20000,0.876058
+atan,-1.20000,-0.876058
+atan,1L%3L,0.321751
+atan,(-1L)%4L,-0.244979
+atan,1+:2,1.33897+:0.402359
+atan,-1+:2,-1.33897+:0.402359
+atan,1+:-2,1.33897+:-0.402359
+atan,-1.20000+:4.30000,-1.50774+:0.218343
+atan,1.20000+:-4.30000,1.50774+:-0.218343
+atan,1L%2L+:1,0.907887+:0.708303
+atan,1L%2L+:3L%4L,0.692724+:0.590214
+atan,3<:1,1.37829+:0.277919
+atan,3<:-2.14159,-1.37829+:-0.277919
+atan,3.00000<:-3,-1.25146+:-0.0424376
+atan,3.10000<:2.50000,-1.30917+:0.182562
+atan,2L%3L<:2,-0.392387+:0.609487
+atan,1L%2L<:3L%4L,0.386520+:0.305842
+atan,-inf,-1.57080
atan,nan,nan
-asin,1,1.5707963267949
-asin,-1,-1.5707963267949
-asin,0,0.0
-asin,0.0,0.0
-asin,1.2,nan
-asin,-1.2,nan
-asin,1L%3L,0.339836909454122
-asin,(-1L)%4L,-0.252680255142079
-asin,1+:2,1.46783725642233+:-0.652507008444884
-asin,-1+:2,-0.427078586392475+:1.528570919481
-asin,1+:-2,0.427078586392476+:-1.528570919481
-asin,-1.2+:4.3,-0.265853221247092+:2.19988173922994
-asin,1.2+:-4.3,0.26585322124709+:-2.19988173922993
-asin,1L%2L+:1,1.16425299086589+:0.0607070375665663
-asin,1L%2L+:3L%4L,1.07765608825196+:0.0769964640772277
-asin,3<:1,1.52625913130154+:-1.15038039260516
-asin,3<:-2.14159265358979,-0.0164841832973784+:-1.64677129011767
-asin,3.0<:-3,-0.191829829869345+:0.118072277108134
-asin,3.1<:2.5,-0.90374717342567+:1.81806436268745
-asin,2L%3L<:2,-0.23762596948846+:0.589062385533765
-asin,1L%2L<:3L%4L,0.640642731202035+:0.197350122856685
+asin,1,1.57080
+asin,-1,-1.57080
+asin,0,0.00000
+asin,0.00000,0.00000
+asin,1.20000,nan
+asin,-1.20000,nan
+asin,1L%3L,0.339837
+asin,(-1L)%4L,-0.252680
+asin,1+:2,1.46784+:-0.652507
+asin,-1+:2,-0.427079+:1.52857
+asin,1+:-2,0.427079+:-1.52857
+asin,-1.20000+:4.30000,-0.265853+:2.19988
+asin,1.20000+:-4.30000,0.265853+:-2.19988
+asin,1L%2L+:1,1.16425+:0.0607070
+asin,1L%2L+:3L%4L,1.07766+:0.0769965
+asin,3<:1,1.52626+:-1.15038
+asin,3<:-2.14159,-0.0164842+:-1.64677
+asin,3.00000<:-3,-0.191830+:0.118072
+asin,3.10000<:2.50000,-0.903747+:1.81806
+asin,2L%3L<:2,-0.237626+:0.589062
+asin,1L%2L<:3L%4L,0.640643+:0.197350
asin,-inf,nan
asin,nan,nan
-acos,1,0.0
-acos,-1,3.14159265358979
-acos,0,1.5707963267949
-acos,0.0,1.5707963267949
-acos,1.2,nan
-acos,-1.2,nan
-acos,1L%3L,1.23095941734077
-acos,(-1L)%4L,1.82347658193698
-acos,1+:2,1.14371774040242+:-1.528570919481
-acos,-1+:2,1.59219225096909+:-1.43468662650293
-acos,1+:-2,0.102959070372571+:-0.652507008444884
-acos,-1.2+:4.3,1.57414021038985+:-2.16412406339493
-acos,1.2+:-4.3,0.0450678724709049+:-0.864279184310815
-acos,1L%2L+:1,1.22135726393768+:-0.926133031350183
-acos,1L%2L+:3L%4L,1.17251845325659+:-0.743320426325279
-acos,3<:1,1.02436728160651+:-1.80400811392948
-acos,3<:-2.14159265358979,2.11722537198328+:1.80400811392947
-acos,3.0<:-3,2.9915586031129+:1.76406194521987
-acos,3.1<:2.5,1.6042510533514+:-1.33844137461137
-acos,2L%3L<:2,1.64522180739974+:-0.56333169914685
-acos,1L%2L<:3L%4L,1.21973646993134+:-0.355425797099242
+acos,1,0.00000
+acos,-1,3.14159
+acos,0,1.57080
+acos,0.00000,1.57080
+acos,1.20000,nan
+acos,-1.20000,nan
+acos,1L%3L,1.23096
+acos,(-1L)%4L,1.82348
+acos,1+:2,1.14372+:-1.52857
+acos,-1+:2,1.59219+:-1.43469
+acos,1+:-2,0.102959+:-0.652507
+acos,-1.20000+:4.30000,1.57414+:-2.16412
+acos,1.20000+:-4.30000,0.0450679+:-0.864279
+acos,1L%2L+:1,1.22136+:-0.926133
+acos,1L%2L+:3L%4L,1.17252+:-0.743320
+acos,3<:1,1.02437+:-1.80401
+acos,3<:-2.14159,2.11723+:1.80401
+acos,3.00000<:-3,2.99156+:1.76406
+acos,3.10000<:2.50000,1.60425+:-1.33844
+acos,2L%3L<:2,1.64522+:-0.563332
+acos,1L%2L<:3L%4L,1.21974+:-0.355426
acos,-inf,nan
acos,nan,nan
-sinh,1,1.1752011936438
-sinh,-1,-1.1752011936438
-sinh,0,0.0
-sinh,0.0,0.0
-sinh,1.2,1.50946135541217
-sinh,-1.2,-1.50946135541217
-sinh,1L%3L,0.33954055725615
-sinh,(-1L)%4L,-0.252612316808168
-sinh,1+:2,-0.489056259041294+:1.40311925062204
-sinh,-1+:2,0.489056259041294+:1.40311925062204
-sinh,1+:-2,-0.489056259041294+:-1.40311925062204
-sinh,-1.2+:4.3,0.604990861535916+:-1.65886095396835
-sinh,1.2+:-4.3,-0.604990861535916+:1.65886095396835
-sinh,1L%2L+:1,0.281548995135334+:0.948864531437168
-sinh,1L%2L+:3L%4L,0.381279634652178+:0.768633564693393
-sinh,3<:1,2.49794510056597<:2.48704664338341
-sinh,3<:-2.14159265358979,2.49794510056597<:-0.654546010206382
-sinh,3.0<:-3,9.72876623396115<:-2.71625741503569
-sinh,3.1<:2.5,6.02702978942574<:1.29005852510914
-sinh,2L%3L<:2,0.635275606273034<:1.94283855664387
-sinh,1L%2L<:3L%4L,0.501647644053453<:0.791507934297849
+sinh,1,1.17520
+sinh,-1,-1.17520
+sinh,0,0.00000
+sinh,0.00000,0.00000
+sinh,1.20000,1.50946
+sinh,-1.20000,-1.50946
+sinh,1L%3L,0.339541
+sinh,(-1L)%4L,-0.252612
+sinh,1+:2,-0.489056+:1.40312
+sinh,-1+:2,0.489056+:1.40312
+sinh,1+:-2,-0.489056+:-1.40312
+sinh,-1.20000+:4.30000,0.604991+:-1.65886
+sinh,1.20000+:-4.30000,-0.604991+:1.65886
+sinh,1L%2L+:1,0.281549+:0.948865
+sinh,1L%2L+:3L%4L,0.381280+:0.768634
+sinh,3<:1,2.49795<:2.48705
+sinh,3<:-2.14159,2.49795<:-0.654546
+sinh,3.00000<:-3,9.72877<:-2.71626
+sinh,3.10000<:2.50000,6.02703<:1.29006
+sinh,2L%3L<:2,0.635276<:1.94284
+sinh,1L%2L<:3L%4L,0.501648<:0.791508
sinh,-inf,-inf
sinh,nan,nan
-cosh,1,1.54308063481524
-cosh,-1,1.54308063481524
-cosh,0,1.0
-cosh,0.0,1.0
-cosh,1.2,1.81065556732437
-cosh,-1.2,1.81065556732437
-cosh,1L%3L,1.05607186782994
-cosh,(-1L)%4L,1.03141309987957
-cosh,1+:2,-0.64214812471552+:1.06860742138278
-cosh,-1+:2,-0.64214812471552+:-1.06860742138278
-cosh,1+:-2,-0.64214812471552+:-1.06860742138278
-cosh,-1.2+:4.3,-0.725709252305608+:1.38291707666829
-cosh,1.2+:-4.3,-0.725709252305608+:1.38291707666829
-cosh,1L%2L+:1,0.609258909157794+:0.438486579892595
-cosh,1L%2L+:3L%4L,0.825071366994607+:0.355198757890738
-cosh,3<:1,2.56317295660819<:2.56082793818154
-cosh,3<:-2.14159265358979,2.56317295660819<:2.56082793818154
-cosh,3.0<:-3,9.76275249045336<:0.421391685963163
-cosh,3.1<:2.5,5.95672835395987<:-1.85903718102565
-cosh,2L%3L<:2,0.86853394700555<:-0.185395179123782
-cosh,1L%2L<:3L%4L,1.01399782693401<:0.12362173219921
+cosh,1,1.54308
+cosh,-1,1.54308
+cosh,0,1.00000
+cosh,0.00000,1.00000
+cosh,1.20000,1.81066
+cosh,-1.20000,1.81066
+cosh,1L%3L,1.05607
+cosh,(-1L)%4L,1.03141
+cosh,1+:2,-0.642148+:1.06861
+cosh,-1+:2,-0.642148+:-1.06861
+cosh,1+:-2,-0.642148+:-1.06861
+cosh,-1.20000+:4.30000,-0.725709+:1.38292
+cosh,1.20000+:-4.30000,-0.725709+:1.38292
+cosh,1L%2L+:1,0.609259+:0.438487
+cosh,1L%2L+:3L%4L,0.825071+:0.355199
+cosh,3<:1,2.56317<:2.56083
+cosh,3<:-2.14159,2.56317<:2.56083
+cosh,3.00000<:-3,9.76275<:0.421392
+cosh,3.10000<:2.50000,5.95673<:-1.85904
+cosh,2L%3L<:2,0.868534<:-0.185395
+cosh,1L%2L<:3L%4L,1.01400<:0.123622
cosh,-inf,inf
cosh,nan,nan
-tanh,1,0.761594155955765
-tanh,-1,-0.761594155955765
-tanh,0,0.0
-tanh,0.0,0.0
-tanh,1.2,0.833654607012155
-tanh,-1.2,-0.833654607012155
-tanh,1L%3L,0.321512737531634
-tanh,(-1L)%4L,-0.244918662403709
-tanh,1+:2,1.16673625724092+:-0.243458201185725
-tanh,-1+:2,-1.16673625724092+:-0.243458201185725
-tanh,1+:-2,1.16673625724092+:0.243458201185725
-tanh,-1.2+:4.3,-1.12053602253626+:0.150545901177205
-tanh,1.2+:-4.3,1.12053602253626+:-0.150545901177205
-tanh,1L%2L+:1,1.04283072834436+:0.806877412163085
-tanh,1L%2L+:3L%4L,0.728211801280472+:0.618096394806202
-tanh,3<:1,0.974551910016818<:-0.0737812947981276
-tanh,3<:-2.14159265358979,0.974551910016818<:3.06781135879167
-tanh,3.0<:-3,0.996518783352805<:-3.13764910099886
-tanh,3.1<:2.5,1.01180202139302<:-3.1340896010448
-tanh,2L%3L<:2,0.731434399845024<:2.12823373576766
-tanh,1L%2L<:3L%4L,0.494722602680784<:0.667886202098639
-tanh,-inf,-1.0
+tanh,1,0.761594
+tanh,-1,-0.761594
+tanh,0,0.00000
+tanh,0.00000,0.00000
+tanh,1.20000,0.833655
+tanh,-1.20000,-0.833655
+tanh,1L%3L,0.321513
+tanh,(-1L)%4L,-0.244919
+tanh,1+:2,1.16674+:-0.243458
+tanh,-1+:2,-1.16674+:-0.243458
+tanh,1+:-2,1.16674+:0.243458
+tanh,-1.20000+:4.30000,-1.12054+:0.150546
+tanh,1.20000+:-4.30000,1.12054+:-0.150546
+tanh,1L%2L+:1,1.04283+:0.806877
+tanh,1L%2L+:3L%4L,0.728212+:0.618096
+tanh,3<:1,0.974552<:-0.0737813
+tanh,3<:-2.14159,0.974552<:3.06781
+tanh,3.00000<:-3,0.996519<:-3.13765
+tanh,3.10000<:2.50000,1.01180<:-3.13409
+tanh,2L%3L<:2,0.731434<:2.12823
+tanh,1L%2L<:3L%4L,0.494723<:0.667886
+tanh,-inf,-1.00000
tanh,nan,nan
-asinh,1,0.881373587019543
-asinh,-1,-0.881373587019543
-asinh,0,0.0
-asinh,0.0,0.0
-asinh,1.2,1.01597313417969
-asinh,-1.2,-1.01597313417969
-asinh,1L%3L,0.327450150237258
-asinh,(-1L)%4L,-0.247466461547263
-asinh,1+:2,1.46935174436819+:1.06344002357775
-asinh,-1+:2,1.33514626150007+:1.54137900229449
-asinh,1+:-2,0.752047373447746+:-0.0949376700463558
-asinh,-1.2+:4.3,2.13903157554736+:1.56712608995557
-asinh,1.2+:-4.3,0.889371672158385+:-0.0447415192265362
-asinh,1L%2L+:1,0.732857675973645+:0.89590748120889
-asinh,1L%2L+:3L%4L,0.606334999887351+:0.682203965583432
-asinh,3<:1,1.78102534527989+:0.973891130816354
-asinh,3<:-2.14159265358979,-1.78102534527989+:-0.973891130816354
-asinh,3.0<:-3,-1.81749921747243+:-0.13440282951171
-asinh,3.1<:2.5,1.28655350979512+:1.53475346270792
-asinh,2L%3L<:2,-0.00714161261602409+:0.938171779746577
-asinh,1L%2L<:3L%4L,0.376884772780086+:0.323585858402972
+asinh,1,0.881374
+asinh,-1,-0.881374
+asinh,0,0.00000
+asinh,0.00000,0.00000
+asinh,1.20000,1.01597
+asinh,-1.20000,-1.01597
+asinh,1L%3L,0.327450
+asinh,(-1L)%4L,-0.247466
+asinh,1+:2,1.46935+:1.06344
+asinh,-1+:2,1.33515+:1.54138
+asinh,1+:-2,0.752047+:-0.0949377
+asinh,-1.20000+:4.30000,2.13903+:1.56713
+asinh,1.20000+:-4.30000,0.889372+:-0.0447415
+asinh,1L%2L+:1,0.732858+:0.895907
+asinh,1L%2L+:3L%4L,0.606335+:0.682204
+asinh,3<:1,1.78103+:0.973891
+asinh,3<:-2.14159,-1.78103+:-0.973891
+asinh,3.00000<:-3,-1.81750+:-0.134403
+asinh,3.10000<:2.50000,1.28655+:1.53475
+asinh,2L%3L<:2,-0.00714161+:0.938172
+asinh,1L%2L<:3L%4L,0.376885+:0.323586
asinh,-inf,-inf
asinh,nan,nan
-acosh,1,0.0
-acosh,-1,0.0+:3.14159265358979
-acosh,0,0.0+:1.5707963267949
-acosh,0.0,0.0+:1.5707963267949
-acosh,1.2,0.622362503714779
-acosh,-1.2,-0.622362503714779+:3.14159265358979
-acosh,1L%3L,0.0+:1.23095941734077
-acosh,(-1L)%4L,0.0+:1.82347658193698
-acosh,1+:2,1.528570919481+:1.14371774040242
-acosh,-1+:2,1.43468662650293+:1.59219225096909
-acosh,1+:-2,0.652507008444884+:0.102959070372571
-acosh,-1.2+:4.3,2.16412406339493+:1.57414021038985
-acosh,1.2+:-4.3,0.864279184310815+:0.0450678724709049
-acosh,1L%2L+:1,0.926133031350183+:1.22135726393768
-acosh,1L%2L+:3L%4L,0.743320426325279+:1.17251845325659
-acosh,3<:1,1.80400811392948+:1.02436728160651
-acosh,3<:-2.14159265358979,-1.80400811392947+:2.11722537198328
-acosh,3.0<:-3,-1.76406194521987+:2.9915586031129
-acosh,3.1<:2.5,1.33844137461137+:1.6042510533514
-acosh,2L%3L<:2,0.56333169914685+:1.64522180739974
-acosh,1L%2L<:3L%4L,0.355425797099242+:1.21973646993134
+acosh,1,0.00000
+acosh,-1,0.00000+:3.14159
+acosh,0,0.00000+:1.57080
+acosh,0.00000,0.00000+:1.57080
+acosh,1.20000,0.622363
+acosh,-1.20000,-0.622363+:3.14159
+acosh,1L%3L,0.00000+:1.23096
+acosh,(-1L)%4L,0.00000+:1.82348
+acosh,1+:2,1.52857+:1.14372
+acosh,-1+:2,1.43469+:1.59219
+acosh,1+:-2,0.652507+:0.102959
+acosh,-1.20000+:4.30000,2.16412+:1.57414
+acosh,1.20000+:-4.30000,0.864279+:0.0450679
+acosh,1L%2L+:1,0.926133+:1.22136
+acosh,1L%2L+:3L%4L,0.743320+:1.17252
+acosh,3<:1,1.80401+:1.02437
+acosh,3<:-2.14159,-1.80401+:2.11723
+acosh,3.00000<:-3,-1.76406+:2.99156
+acosh,3.10000<:2.50000,1.33844+:1.60425
+acosh,2L%3L<:2,0.563332+:1.64522
+acosh,1L%2L<:3L%4L,0.355426+:1.21974
acosh,-inf,nan+:nan
acosh,nan,nan
atanh,1,inf
atanh,-1,-inf
-atanh,0,0.0
-atanh,0.0,0.0
-atanh,1.2,1.19894763639919+:-1.5707963267949
-atanh,-1.2,-1.19894763639919+:1.5707963267949
-atanh,1L%3L,0.346573590279973
-atanh,(-1L)%4L,-0.255412811882995
-atanh,1+:2,0.173286795139986+:1.17809724509617
-atanh,-1+:2,-0.173286795139986+:1.17809724509617
-atanh,1+:-2,0.173286795139986+:-1.17809724509617
-atanh,-1.2+:4.3,-0.0575872614340175+:1.35758209063893
-atanh,1.2+:-4.3,0.0575872614340176+:-1.35758209063893
-atanh,1L%2L+:1,0.238877861256859+:0.847575660670829
-atanh,1L%2L+:3L%4L,0.310428283077196+:0.723220666124068
-atanh,3<:1,0.1681562506274+:1.28930826312627
-atanh,3<:-2.14159265358979,-0.168156250627401+:-1.28930826312627
-atanh,3.0<:-3,-0.341908696667975+:-1.518072611328
-atanh,3.1<:2.5,-0.253850363925408+:1.36734421742892
-atanh,2L%3L<:2,-0.202451040350963+:0.570560037832821
-atanh,1L%2L<:3L%4L,0.335282255752869+:0.368842031953307
+atanh,0,0.00000
+atanh,0.00000,0.00000
+atanh,1.20000,1.19895+:-1.57080
+atanh,-1.20000,-1.19895+:1.57080
+atanh,1L%3L,0.346574
+atanh,(-1L)%4L,-0.255413
+atanh,1+:2,0.173287+:1.17810
+atanh,-1+:2,-0.173287+:1.17810
+atanh,1+:-2,0.173287+:-1.17810
+atanh,-1.20000+:4.30000,-0.0575873+:1.35758
+atanh,1.20000+:-4.30000,0.0575873+:-1.35758
+atanh,1L%2L+:1,0.238878+:0.847576
+atanh,1L%2L+:3L%4L,0.310428+:0.723221
+atanh,3<:1,0.168156+:1.28931
+atanh,3<:-2.14159,-0.168156+:-1.28931
+atanh,3.00000<:-3,-0.341909+:-1.51807
+atanh,3.10000<:2.50000,-0.253850+:1.36734
+atanh,2L%3L<:2,-0.202451+:0.570560
+atanh,1L%2L<:3L%4L,0.335282+:0.368842
atanh,-inf,nan+:nan
atanh,nan,nan
abs,1,1
abs,-1,1
abs,0,0
-abs,0.0,0.0
-abs,1.2,1.2
-abs,-1.2,1.2...
[truncated message content] |
|
From: <ag...@us...> - 2008-08-22 12:45:37
|
Revision: 573
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=573&view=rev
Author: agraef
Date: 2008-08-22 12:45:47 +0000 (Fri, 22 Aug 2008)
Log Message:
-----------
Round results to 3 digits, to prevent failing tests due to small rounding discrepancies.
Modified Paths:
--------------
pure/trunk/test/test020.log
pure/trunk/test/test020.pure
Modified: pure/trunk/test/test020.log
===================================================================
--- pure/trunk/test/test020.log 2008-08-22 12:39:25 UTC (rev 572)
+++ pure/trunk/test/test020.log 2008-08-22 12:45:47 UTC (rev 573)
@@ -43,7 +43,7 @@
check _/*0:001*/ _/*0:01*/ z/*0:1*/ = z/*0:1*/;
format (f/*0:101*/,x/*0:1101*/,y/*0:11101*/,z/*0:1111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show y/*0:11101*/+","+show z/*0:1111*/;
format (f/*0:101*/,x/*0:1101*/,z/*0:111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show z/*0:111*/;
-show x/*0:1*/::double = sprintf "%#0.4g" x/*0:1*/;
+show x/*0:1*/::double = sprintf "%#0.3g" x/*0:1*/;
show (x/*0:101*/+:y/*0:11*/) = show x/*0:101*/+"+:"+show y/*0:11*/;
show (x/*0:101*/<:y/*0:11*/) = show x/*0:101*/+"<:"+show y/*0:11*/;
show x/*0:1*/ = str x/*0:1*/;
@@ -146,7 +146,7 @@
state 12: #0 #1
}
{
- rule #0: show x::double = sprintf "%#0.4g" x
+ rule #0: show x::double = sprintf "%#0.3g" x
rule #1: show (x+:y) = show x+"+:"+show y
rule #2: show (x<:y) = show x+"<:"+show y
rule #3: show x = str x
@@ -183,393 +183,393 @@
state 15: #2 #3
}
*** UNARY ***
-sqrt,1,1.000
-sqrt,-1,0.000+:1.000
-sqrt,0,0.000
-sqrt,0.000,0.000
-sqrt,1.200,1.095
-sqrt,-1.200,0.000+:1.095
-sqrt,1L%3L,0.5774
-sqrt,(-1L)%4L,0.000+:0.5000
-sqrt,1+:2,1.272+:0.7862
-sqrt,-1+:2,0.7862+:1.272
-sqrt,1+:-2,1.272+:0.7862
-sqrt,-1.200+:4.300,1.278+:1.683
-sqrt,1.200+:-4.300,1.683+:1.278
-sqrt,1L%2L+:1,0.8995+:0.5559
-sqrt,1L%2L+:3L%4L,0.8371+:0.4480
-sqrt,3<:1,1.732<:0.5000
-sqrt,3<:-2.142,1.732<:-1.071
-sqrt,3.000<:-3,1.732<:-1.500
-sqrt,3.100<:2.500,1.761<:1.250
-sqrt,2L%3L<:2,0.8165<:1.000
-sqrt,1L%2L<:3L%4L,0.7071<:0.3750
-sqrt,-inf,0.000+:inf
+sqrt,1,1.00
+sqrt,-1,0.00+:1.00
+sqrt,0,0.00
+sqrt,0.00,0.00
+sqrt,1.20,1.10
+sqrt,-1.20,0.00+:1.10
+sqrt,1L%3L,0.577
+sqrt,(-1L)%4L,0.00+:0.500
+sqrt,1+:2,1.27+:0.786
+sqrt,-1+:2,0.786+:1.27
+sqrt,1+:-2,1.27+:0.786
+sqrt,-1.20+:4.30,1.28+:1.68
+sqrt,1.20+:-4.30,1.68+:1.28
+sqrt,1L%2L+:1,0.899+:0.556
+sqrt,1L%2L+:3L%4L,0.837+:0.448
+sqrt,3<:1,1.73<:0.500
+sqrt,3<:-2.14,1.73<:-1.07
+sqrt,3.00<:-3,1.73<:-1.50
+sqrt,3.10<:2.50,1.76<:1.25
+sqrt,2L%3L<:2,0.816<:1.00
+sqrt,1L%2L<:3L%4L,0.707<:0.375
+sqrt,-inf,0.00+:inf
sqrt,nan,nan
-sin,1,0.8415
-sin,-1,-0.8415
-sin,0,0.000
-sin,0.000,0.000
-sin,1.200,0.9320
-sin,-1.200,-0.9320
-sin,1L%3L,0.3272
-sin,(-1L)%4L,-0.2474
-sin,1+:2,3.166+:1.960
-sin,-1+:2,-3.166+:1.960
-sin,1+:-2,3.166+:-1.960
-sin,-1.200+:4.300,-34.35+:13.35
-sin,1.200+:-4.300,34.35+:-13.35
-sin,1L%2L+:1,0.7398+:1.031
-sin,1L%2L+:3L%4L,0.6207+:0.7217
-sin,3<:1,6.282<:-0.04947
-sin,3<:-2.142,6.282<:3.092
-sin,3.000<:-3,0.4684<:1.980
-sin,3.100<:2.500,3.178<:-2.253
-sin,2L%3L<:2,0.6998<:2.055
-sin,1L%2L<:3L%4L,0.4987<:0.7084
+sin,1,0.841
+sin,-1,-0.841
+sin,0,0.00
+sin,0.00,0.00
+sin,1.20,0.932
+sin,-1.20,-0.932
+sin,1L%3L,0.327
+sin,(-1L)%4L,-0.247
+sin,1+:2,3.17+:1.96
+sin,-1+:2,-3.17+:1.96
+sin,1+:-2,3.17+:-1.96
+sin,-1.20+:4.30,-34.4+:13.4
+sin,1.20+:-4.30,34.4+:-13.4
+sin,1L%2L+:1,0.740+:1.03
+sin,1L%2L+:3L%4L,0.621+:0.722
+sin,3<:1,6.28<:-0.0495
+sin,3<:-2.14,6.28<:3.09
+sin,3.00<:-3,0.468<:1.98
+sin,3.10<:2.50,3.18<:-2.25
+sin,2L%3L<:2,0.700<:2.05
+sin,1L%2L<:3L%4L,0.499<:0.708
sin,-inf,nan
sin,nan,nan
-cos,1,0.5403
-cos,-1,0.5403
-cos,0,1.000
-cos,0.000,1.000
-cos,1.200,0.3624
-cos,-1.200,0.3624
-cos,1L%3L,0.9450
-cos,(-1L)%4L,0.9689
-cos,1+:2,2.033+:-3.052
-cos,-1+:2,2.033+:3.052
-cos,1+:-2,2.033+:3.052
-cos,-1.200+:4.300,13.36+:34.34
-cos,1.200+:-4.300,13.36+:34.34
-cos,1L%2L+:1,1.354+:-0.5634
-cos,1L%2L+:3L%4L,1.136+:-0.3942
-cos,3<:1,6.202<:-1.622
-cos,3<:-2.142,6.202<:-1.622
-cos,3.000<:-3,1.078<:-3.072
-cos,3.100<:2.500,3.217<:2.507
-cos,2L%3L<:2,1.157<:0.1530
-cos,1L%2L<:3L%4L,0.9964<:-0.1251
+cos,1,0.540
+cos,-1,0.540
+cos,0,1.00
+cos,0.00,1.00
+cos,1.20,0.362
+cos,-1.20,0.362
+cos,1L%3L,0.945
+cos,(-1L)%4L,0.969
+cos,1+:2,2.03+:-3.05
+cos,-1+:2,2.03+:3.05
+cos,1+:-2,2.03+:3.05
+cos,-1.20+:4.30,13.4+:34.3
+cos,1.20+:-4.30,13.4+:34.3
+cos,1L%2L+:1,1.35+:-0.563
+cos,1L%2L+:3L%4L,1.14+:-0.394
+cos,3<:1,6.20<:-1.62
+cos,3<:-2.14,6.20<:-1.62
+cos,3.00<:-3,1.08<:-3.07
+cos,3.10<:2.50,3.22<:2.51
+cos,2L%3L<:2,1.16<:0.153
+cos,1L%2L<:3L%4L,0.996<:-0.125
cos,-inf,nan
cos,nan,nan
-tan,1,1.557
-tan,-1,-1.557
-tan,0,0.000
-tan,0.000,0.000
-tan,1.200,2.572
-tan,-1.200,-2.572
-tan,1L%3L,0.3463
-tan,(-1L)%4L,-0.2553
-tan,1+:2,0.03381+:1.015
-tan,-1+:2,-0.03381+:1.015
-tan,1+:-2,0.03381+:-1.015
-tan,-1.200+:4.300,-0.0002488+:1.000
-tan,1.200+:-4.300,0.0002488+:-1.000
-tan,1L%2L+:1,0.1956+:0.8430
-tan,1L%2L+:3L%4L,0.2909+:0.7361
-tan,3<:1,1.013<:1.572
-tan,3<:-2.142,1.013<:-1.570
-tan,3.000<:-3,0.4347<:-1.231
-tan,3.100<:2.500,0.9878<:1.523
-tan,2L%3L<:2,0.6046<:1.902
-tan,1L%2L<:3L%4L,0.5005<:0.8335
+tan,1,1.56
+tan,-1,-1.56
+tan,0,0.00
+tan,0.00,0.00
+tan,1.20,2.57
+tan,-1.20,-2.57
+tan,1L%3L,0.346
+tan,(-1L)%4L,-0.255
+tan,1+:2,0.0338+:1.01
+tan,-1+:2,-0.0338+:1.01
+tan,1+:-2,0.0338+:-1.01
+tan,-1.20+:4.30,-0.000249+:1.00
+tan,1.20+:-4.30,0.000249+:-1.00
+tan,1L%2L+:1,0.196+:0.843
+tan,1L%2L+:3L%4L,0.291+:0.736
+tan,3<:1,1.01<:1.57
+tan,3<:-2.14,1.01<:-1.57
+tan,3.00<:-3,0.435<:-1.23
+tan,3.10<:2.50,0.988<:1.52
+tan,2L%3L<:2,0.605<:1.90
+tan,1L%2L<:3L%4L,0.501<:0.833
tan,-inf,nan
tan,nan,nan
-ln,1,0.000
-ln,-1,0.000+:3.142
+ln,1,0.00
+ln,-1,0.00+:3.14
ln,0,-inf
-ln,0.000,-inf
-ln,1.200,0.1823
-ln,-1.200,0.1823+:3.142
-ln,1L%3L,-1.099
-ln,(-1L)%4L,-1.386+:3.142
-ln,1+:2,0.8047+:1.107
-ln,-1+:2,0.8047+:2.034
-ln,1+:-2,0.8047+:-1.107
-ln,-1.200+:4.300,1.496+:1.843
-ln,1.200+:-4.300,1.496+:-1.299
-ln,1L%2L+:1,0.1116+:1.107
-ln,1L%2L+:3L%4L,-0.1038+:0.9828
-ln,3<:1,1.486<:0.7384
-ln,3<:-2.142,2.407<:-1.097
-ln,3.000<:-3,3.195<:-1.220
-ln,3.100<:2.500,2.744<:1.146
-ln,2L%3L<:2,2.041<:1.771
-ln,1L%2L<:3L%4L,1.021<:2.317
-ln,-inf,inf+:3.142
+ln,0.00,-inf
+ln,1.20,0.182
+ln,-1.20,0.182+:3.14
+ln,1L%3L,-1.10
+ln,(-1L)%4L,-1.39+:3.14
+ln,1+:2,0.805+:1.11
+ln,-1+:2,0.805+:2.03
+ln,1+:-2,0.805+:-1.11
+ln,-1.20+:4.30,1.50+:1.84
+ln,1.20+:-4.30,1.50+:-1.30
+ln,1L%2L+:1,0.112+:1.11
+ln,1L%2L+:3L%4L,-0.104+:0.983
+ln,3<:1,1.49<:0.738
+ln,3<:-2.14,2.41<:-1.10
+ln,3.00<:-3,3.19<:-1.22
+ln,3.10<:2.50,2.74<:1.15
+ln,2L%3L<:2,2.04<:1.77
+ln,1L%2L<:3L%4L,1.02<:2.32
+ln,-inf,inf+:3.14
ln,nan,nan
-log,1,0.000
-log,-1,0.000+:1.364
+log,1,0.00
+log,-1,0.00+:1.36
log,0,-inf
-log,0.000,-inf
-log,1.200,0.07918
-log,-1.200,0.07918+:1.364
-log,1L%3L,-0.4771
-log,(-1L)%4L,-0.6021+:1.364
-log,1+:2,0.3495+:0.4808
-log,-1+:2,0.3495+:0.8835
-log,1+:-2,0.3495+:-0.4808
-log,-1.200+:4.300,0.6498+:0.8004
-log,1.200+:-4.300,0.6498+:-0.5640
-log,1L%2L+:1,0.04846+:0.4808
-log,1L%2L+:3L%4L,-0.04509+:0.4268
-log,3<:1,0.6452<:0.7384
-log,3<:-2.142,1.045<:-1.097
-log,3.000<:-3,1.387<:-1.220
-log,3.100<:2.500,1.192<:1.146
-log,2L%3L<:2,0.8863<:1.771
-log,1L%2L<:3L%4L,0.4435<:2.317
-log,-inf,inf+:1.364
+log,0.00,-inf
+log,1.20,0.0792
+log,-1.20,0.0792+:1.36
+log,1L%3L,-0.477
+log,(-1L)%4L,-0.602+:1.36
+log,1+:2,0.349+:0.481
+log,-1+:2,0.349+:0.884
+log,1+:-2,0.349+:-0.481
+log,-1.20+:4.30,0.650+:0.800
+log,1.20+:-4.30,0.650+:-0.564
+log,1L%2L+:1,0.0485+:0.481
+log,1L%2L+:3L%4L,-0.0451+:0.427
+log,3<:1,0.645<:0.738
+log,3<:-2.14,1.05<:-1.10
+log,3.00<:-3,1.39<:-1.22
+log,3.10<:2.50,1.19<:1.15
+log,2L%3L<:2,0.886<:1.77
+log,1L%2L<:3L%4L,0.444<:2.32
+log,-inf,inf+:1.36
log,nan,nan
-exp,1,2.718
-exp,-1,0.3679
-exp,0,1.000
-exp,0.000,1.000
-exp,1.200,3.320
-exp,-1.200,0.3012
-exp,1L%3L,1.396
-exp,(-1L)%4L,0.7788
-exp,1+:2,-1.131+:2.472
-exp,-1+:2,-0.1531+:0.3345
-exp,1+:-2,-1.131+:-2.472
-exp,-1.200+:4.300,-0.1207+:-0.2759
-exp,1.200+:-4.300,-1.331+:3.042
-exp,1L%2L+:1,0.8908+:1.387
-exp,1L%2L+:3L%4L,1.206+:1.124
-exp,3<:1,5.058<:2.524
-exp,3<:-2.142,0.1977<:-2.524
-exp,3.000<:-3,0.05130<:-0.4234
-exp,3.100<:2.500,0.08345<:1.855
-exp,2L%3L<:2,0.7577<:0.6062
-exp,1L%2L<:3L%4L,1.442<:0.3408
-exp,-inf,0.000
+exp,1,2.72
+exp,-1,0.368
+exp,0,1.00
+exp,0.00,1.00
+exp,1.20,3.32
+exp,-1.20,0.301
+exp,1L%3L,1.40
+exp,(-1L)%4L,0.779
+exp,1+:2,-1.13+:2.47
+exp,-1+:2,-0.153+:0.335
+exp,1+:-2,-1.13+:-2.47
+exp,-1.20+:4.30,-0.121+:-0.276
+exp,1.20+:-4.30,-1.33+:3.04
+exp,1L%2L+:1,0.891+:1.39
+exp,1L%2L+:3L%4L,1.21+:1.12
+exp,3<:1,5.06<:2.52
+exp,3<:-2.14,0.198<:-2.52
+exp,3.00<:-3,0.0513<:-0.423
+exp,3.10<:2.50,0.0834<:1.86
+exp,2L%3L<:2,0.758<:0.606
+exp,1L%2L<:3L%4L,1.44<:0.341
+exp,-inf,0.00
exp,nan,nan
-atan,1,0.7854
-atan,-1,-0.7854
-atan,0,0.000
-atan,0.000,0.000
-atan,1.200,0.8761
-atan,-1.200,-0.8761
-atan,1L%3L,0.3218
-atan,(-1L)%4L,-0.2450
-atan,1+:2,1.339+:0.4024
-atan,-1+:2,-1.339+:0.4024
-atan,1+:-2,1.339+:-0.4024
-atan,-1.200+:4.300,-1.508+:0.2183
-atan,1.200+:-4.300,1.508+:-0.2183
-atan,1L%2L+:1,0.9079+:0.7083
-atan,1L%2L+:3L%4L,0.6927+:0.5902
-atan,3<:1,1.378+:0.2779
-atan,3<:-2.142,-1.378+:-0.2779
-atan,3.000<:-3,-1.251+:-0.04244
-atan,3.100<:2.500,-1.309+:0.1826
-atan,2L%3L<:2,-0.3924+:0.6095
-atan,1L%2L<:3L%4L,0.3865+:0.3058
-atan,-inf,-1.571
+atan,1,0.785
+atan,-1,-0.785
+atan,0,0.00
+atan,0.00,0.00
+atan,1.20,0.876
+atan,-1.20,-0.876
+atan,1L%3L,0.322
+atan,(-1L)%4L,-0.245
+atan,1+:2,1.34+:0.402
+atan,-1+:2,-1.34+:0.402
+atan,1+:-2,1.34+:-0.402
+atan,-1.20+:4.30,-1.51+:0.218
+atan,1.20+:-4.30,1.51+:-0.218
+atan,1L%2L+:1,0.908+:0.708
+atan,1L%2L+:3L%4L,0.693+:0.590
+atan,3<:1,1.38+:0.278
+atan,3<:-2.14,-1.38+:-0.278
+atan,3.00<:-3,-1.25+:-0.0424
+atan,3.10<:2.50,-1.31+:0.183
+atan,2L%3L<:2,-0.392+:0.609
+atan,1L%2L<:3L%4L,0.387+:0.306
+atan,-inf,-1.57
atan,nan,nan
-asin,1,1.571
-asin,-1,-1.571
-asin,0,0.000
-asin,0.000,0.000
-asin,1.200,nan
-asin,-1.200,nan
-asin,1L%3L,0.3398
-asin,(-1L)%4L,-0.2527
-asin,1+:2,1.468+:-0.6525
-asin,-1+:2,-0.4271+:1.529
-asin,1+:-2,0.4271+:-1.529
-asin,-1.200+:4.300,-0.2659+:2.200
-asin,1.200+:-4.300,0.2659+:-2.200
-asin,1L%2L+:1,1.164+:0.06071
-asin,1L%2L+:3L%4L,1.078+:0.07700
-asin,3<:1,1.526+:-1.150
-asin,3<:-2.142,-0.01648+:-1.647
-asin,3.000<:-3,-0.1918+:0.1181
-asin,3.100<:2.500,-0.9037+:1.818
-asin,2L%3L<:2,-0.2376+:0.5891
-asin,1L%2L<:3L%4L,0.6406+:0.1974
+asin,1,1.57
+asin,-1,-1.57
+asin,0,0.00
+asin,0.00,0.00
+asin,1.20,nan
+asin,-1.20,nan
+asin,1L%3L,0.340
+asin,(-1L)%4L,-0.253
+asin,1+:2,1.47+:-0.653
+asin,-1+:2,-0.427+:1.53
+asin,1+:-2,0.427+:-1.53
+asin,-1.20+:4.30,-0.266+:2.20
+asin,1.20+:-4.30,0.266+:-2.20
+asin,1L%2L+:1,1.16+:0.0607
+asin,1L%2L+:3L%4L,1.08+:0.0770
+asin,3<:1,1.53+:-1.15
+asin,3<:-2.14,-0.0165+:-1.65
+asin,3.00<:-3,-0.192+:0.118
+asin,3.10<:2.50,-0.904+:1.82
+asin,2L%3L<:2,-0.238+:0.589
+asin,1L%2L<:3L%4L,0.641+:0.197
asin,-inf,nan
asin,nan,nan
-acos,1,0.000
-acos,-1,3.142
-acos,0,1.571
-acos,0.000,1.571
-acos,1.200,nan
-acos,-1.200,nan
-acos,1L%3L,1.231
-acos,(-1L)%4L,1.823
-acos,1+:2,1.144+:-1.529
-acos,-1+:2,1.592+:-1.435
-acos,1+:-2,0.1030+:-0.6525
-acos,-1.200+:4.300,1.574+:-2.164
-acos,1.200+:-4.300,0.04507+:-0.8643
-acos,1L%2L+:1,1.221+:-0.9261
-acos,1L%2L+:3L%4L,1.173+:-0.7433
-acos,3<:1,1.024+:-1.804
-acos,3<:-2.142,2.117+:1.804
-acos,3.000<:-3,2.992+:1.764
-acos,3.100<:2.500,1.604+:-1.338
-acos,2L%3L<:2,1.645+:-0.5633
-acos,1L%2L<:3L%4L,1.220+:-0.3554
+acos,1,0.00
+acos,-1,3.14
+acos,0,1.57
+acos,0.00,1.57
+acos,1.20,nan
+acos,-1.20,nan
+acos,1L%3L,1.23
+acos,(-1L)%4L,1.82
+acos,1+:2,1.14+:-1.53
+acos,-1+:2,1.59+:-1.43
+acos,1+:-2,0.103+:-0.653
+acos,-1.20+:4.30,1.57+:-2.16
+acos,1.20+:-4.30,0.0451+:-0.864
+acos,1L%2L+:1,1.22+:-0.926
+acos,1L%2L+:3L%4L,1.17+:-0.743
+acos,3<:1,1.02+:-1.80
+acos,3<:-2.14,2.12+:1.80
+acos,3.00<:-3,2.99+:1.76
+acos,3.10<:2.50,1.60+:-1.34
+acos,2L%3L<:2,1.65+:-0.563
+acos,1L%2L<:3L%4L,1.22+:-0.355
acos,-inf,nan
acos,nan,nan
-sinh,1,1.175
-sinh,-1,-1.175
-sinh,0,0.000
-sinh,0.000,0.000
-sinh,1.200,1.509
-sinh,-1.200,-1.509
-sinh,1L%3L,0.3395
-sinh,(-1L)%4L,-0.2526
-sinh,1+:2,-0.4891+:1.403
-sinh,-1+:2,0.4891+:1.403
-sinh,1+:-2,-0.4891+:-1.403
-sinh,-1.200+:4.300,0.6050+:-1.659
-sinh,1.200+:-4.300,-0.6050+:1.659
-sinh,1L%2L+:1,0.2815+:0.9489
-sinh,1L%2L+:3L%4L,0.3813+:0.7686
-sinh,3<:1,2.498<:2.487
-sinh,3<:-2.142,2.498<:-0.6545
-sinh,3.000<:-3,9.729<:-2.716
-sinh,3.100<:2.500,6.027<:1.290
-sinh,2L%3L<:2,0.6353<:1.943
-sinh,1L%2L<:3L%4L,0.5016<:0.7915
+sinh,1,1.18
+sinh,-1,-1.18
+sinh,0,0.00
+sinh,0.00,0.00
+sinh,1.20,1.51
+sinh,-1.20,-1.51
+sinh,1L%3L,0.340
+sinh,(-1L)%4L,-0.253
+sinh,1+:2,-0.489+:1.40
+sinh,-1+:2,0.489+:1.40
+sinh,1+:-2,-0.489+:-1.40
+sinh,-1.20+:4.30,0.605+:-1.66
+sinh,1.20+:-4.30,-0.605+:1.66
+sinh,1L%2L+:1,0.282+:0.949
+sinh,1L%2L+:3L%4L,0.381+:0.769
+sinh,3<:1,2.50<:2.49
+sinh,3<:-2.14,2.50<:-0.655
+sinh,3.00<:-3,9.73<:-2.72
+sinh,3.10<:2.50,6.03<:1.29
+sinh,2L%3L<:2,0.635<:1.94
+sinh,1L%2L<:3L%4L,0.502<:0.792
sinh,-inf,-inf
sinh,nan,nan
-cosh,1,1.543
-cosh,-1,1.543
-cosh,0,1.000
-cosh,0.000,1.000
-cosh,1.200,1.811
-cosh,-1.200,1.811
-cosh,1L%3L,1.056
-cosh,(-1L)%4L,1.031
-cosh,1+:2,-0.6421+:1.069
-cosh,-1+:2,-0.6421+:-1.069
-cosh,1+:-2,-0.6421+:-1.069
-cosh,-1.200+:4.300,-0.7257+:1.383
-cosh,1.200+:-4.300,-0.7257+:1.383
-cosh,1L%2L+:1,0.6093+:0.4385
-cosh,1L%2L+:3L%4L,0.8251+:0.3552
-cosh,3<:1,2.563<:2.561
-cosh,3<:-2.142,2.563<:2.561
-cosh,3.000<:-3,9.763<:0.4214
-cosh,3.100<:2.500,5.957<:-1.859
-cosh,2L%3L<:2,0.8685<:-0.1854
-cosh,1L%2L<:3L%4L,1.014<:0.1236
+cosh,1,1.54
+cosh,-1,1.54
+cosh,0,1.00
+cosh,0.00,1.00
+cosh,1.20,1.81
+cosh,-1.20,1.81
+cosh,1L%3L,1.06
+cosh,(-1L)%4L,1.03
+cosh,1+:2,-0.642+:1.07
+cosh,-1+:2,-0.642+:-1.07
+cosh,1+:-2,-0.642+:-1.07
+cosh,-1.20+:4.30,-0.726+:1.38
+cosh,1.20+:-4.30,-0.726+:1.38
+cosh,1L%2L+:1,0.609+:0.438
+cosh,1L%2L+:3L%4L,0.825+:0.355
+cosh,3<:1,2.56<:2.56
+cosh,3<:-2.14,2.56<:2.56
+cosh,3.00<:-3,9.76<:0.421
+cosh,3.10<:2.50,5.96<:-1.86
+cosh,2L%3L<:2,0.869<:-0.185
+cosh,1L%2L<:3L%4L,1.01<:0.124
cosh,-inf,inf
cosh,nan,nan
-tanh,1,0.7616
-tanh,-1,-0.7616
-tanh,0,0.000
-tanh,0.000,0.000
-tanh,1.200,0.8337
-tanh,-1.200,-0.8337
-tanh,1L%3L,0.3215
-tanh,(-1L)%4L,-0.2449
-tanh,1+:2,1.167+:-0.2435
-tanh,-1+:2,-1.167+:-0.2435
-tanh,1+:-2,1.167+:0.2435
-tanh,-1.200+:4.300,-1.121+:0.1505
-tanh,1.200+:-4.300,1.121+:-0.1505
-tanh,1L%2L+:1,1.043+:0.8069
-tanh,1L%2L+:3L%4L,0.7282+:0.6181
-tanh,3<:1,0.9746<:-0.07378
-tanh,3<:-2.142,0.9746<:3.068
-tanh,3.000<:-3,0.9965<:-3.138
-tanh,3.100<:2.500,1.012<:-3.134
-tanh,2L%3L<:2,0.7314<:2.128
-tanh,1L%2L<:3L%4L,0.4947<:0.6679
-tanh,-inf,-1.000
+tanh,1,0.762
+tanh,-1,-0.762
+tanh,0,0.00
+tanh,0.00,0.00
+tanh,1.20,0.834
+tanh,-1.20,-0.834
+tanh,1L%3L,0.322
+tanh,(-1L)%4L,-0.245
+tanh,1+:2,1.17+:-0.243
+tanh,-1+:2,-1.17+:-0.243
+tanh,1+:-2,1.17+:0.243
+tanh,-1.20+:4.30,-1.12+:0.151
+tanh,1.20+:-4.30,1.12+:-0.151
+tanh,1L%2L+:1,1.04+:0.807
+tanh,1L%2L+:3L%4L,0.728+:0.618
+tanh,3<:1,0.975<:-0.0738
+tanh,3<:-2.14,0.975<:3.07
+tanh,3.00<:-3,0.997<:-3.14
+tanh,3.10<:2.50,1.01<:-3.13
+tanh,2L%3L<:2,0.731<:2.13
+tanh,1L%2L<:3L%4L,0.495<:0.668
+tanh,-inf,-1.00
tanh,nan,nan
-asinh,1,0.8814
-asinh,-1,-0.8814
-asinh,0,0.000
-asinh,0.000,0.000
-asinh,1.200,1.016
-asinh,-1.200,-1.016
-asinh,1L%3L,0.3275
-asinh,(-1L)%4L,-0.2475
-asinh,1+:2,1.469+:1.063
-asinh,-1+:2,1.335+:1.541
-asinh,1+:-2,0.7520+:-0.09494
-asinh,-1.200+:4.300,2.139+:1.567
-asinh,1.200+:-4.300,0.8894+:-0.04474
-asinh,1L%2L+:1,0.7329+:0.8959
-asinh,1L%2L+:3L%4L,0.6063+:0.6822
-asinh,3<:1,1.781+:0.9739
-asinh,3<:-2.142,-1.781+:-0.9739
-asinh,3.000<:-3,-1.817+:-0.1344
-asinh,3.100<:2.500,1.287+:1.535
-asinh,2L%3L<:2,-0.007142+:0.9382
-asinh,1L%2L<:3L%4L,0.3769+:0.3236
+asinh,1,0.881
+asinh,-1,-0.881
+asinh,0,0.00
+asinh,0.00,0.00
+asinh,1.20,1.02
+asinh,-1.20,-1.02
+asinh,1L%3L,0.327
+asinh,(-1L)%4L,-0.247
+asinh,1+:2,1.47+:1.06
+asinh,-1+:2,1.34+:1.54
+asinh,1+:-2,0.752+:-0.0949
+asinh,-1.20+:4.30,2.14+:1.57
+asinh,1.20+:-4.30,0.889+:-0.0447
+asinh,1L%2L+:1,0.733+:0.896
+asinh,1L%2L+:3L%4L,0.606+:0.682
+asinh,3<:1,1.78+:0.974
+asinh,3<:-2.14,-1.78+:-0.974
+asinh,3.00<:-3,-1.82+:-0.134
+asinh,3.10<:2.50,1.29+:1.53
+asinh,2L%3L<:2,-0.00714+:0.938
+asinh,1L%2L<:3L%4L,0.377+:0.324
asinh,-inf,-inf
asinh,nan,nan
-acosh,1,0.000
-acosh,-1,0.000+:3.142
-acosh,0,0.000+:1.571
-acosh,0.000,0.000+:1.571
-acosh,1.200,0.6224
-acosh,-1.200,-0.6224+:3.142
-acosh,1L%3L,0.000+:1.231
-acosh,(-1L)%4L,0.000+:1.823
-acosh,1+:2,1.529+:1.144
-acosh,-1+:2,1.435+:1.592
-acosh,1+:-2,0.6525+:0.1030
-acosh,-1.200+:4.300,2.164+:1.574
-acosh,1.200+:-4.300,0.8643+:0.04507
-acosh,1L%2L+:1,0.9261+:1.221
-acosh,1L%2L+:3L%4L,0.7433+:1.173
-acosh,3<:1,1.804+:1.024
-acosh,3<:-2.142,-1.804+:2.117
-acosh,3.000<:-3,-1.764+:2.992
-acosh,3.100<:2.500,1.338+:1.604
-acosh,2L%3L<:2,0.5633+:1.645
-acosh,1L%2L<:3L%4L,0.3554+:1.220
+acosh,1,0.00
+acosh,-1,0.00+:3.14
+acosh,0,0.00+:1.57
+acosh,0.00,0.00+:1.57
+acosh,1.20,0.622
+acosh,-1.20,-0.622+:3.14
+acosh,1L%3L,0.00+:1.23
+acosh,(-1L)%4L,0.00+:1.82
+acosh,1+:2,1.53+:1.14
+acosh,-1+:2,1.43+:1.59
+acosh,1+:-2,0.653+:0.103
+acosh,-1.20+:4.30,2.16+:1.57
+acosh,1.20+:-4.30,0.864+:0.0451
+acosh,1L%2L+:1,0.926+:1.22
+acosh,1L%2L+:3L%4L,0.743+:1.17
+acosh,3<:1,1.80+:1.02
+acosh,3<:-2.14,-1.80+:2.12
+acosh,3.00<:-3,-1.76+:2.99
+acosh,3.10<:2.50,1.34+:1.60
+acosh,2L%3L<:2,0.563+:1.65
+acosh,1L%2L<:3L%4L,0.355+:1.22
acosh,-inf,nan+:nan
acosh,nan,nan
atanh,1,inf
atanh,-1,-inf
-atanh,0,0.000
-atanh,0.000,0.000
-atanh,1.200,1.199+:-1.571
-atanh,-1.200,-1.199+:1.571
-atanh,1L%3L,0.3466
-atanh,(-1L)%4L,-0.2554
-atanh,1+:2,0.1733+:1.178
-atanh,-1+:2,-0.1733+:1.178
-atanh,1+:-2,0.1733+:-1.178
-atanh,-1.200+:4.300,-0.05759+:1.358
-atanh,1.200+:-4.300,0.05759+:-1.358
-atanh,1L%2L+:1,0.2389+:0.8476
-atanh,1L%2L+:3L%4L,0.3104+:0.7232
-atanh,3<:1,0.1682+:1.289
-atanh,3<:-2.142,-0.1682+:-1.289
-atanh,3.000<:-3,-0.3419+:-1.518
-atanh,3.100<:2.500,-0.2539+:1.367
-atanh,2L%3L<:2,-0.2025+:0.5706
-atanh,1L%2L<:3L%4L,0.3353+:0.3688
+atanh,0,0.00
+atanh,0.00,0.00
+atanh,1.20,1.20+:-1.57
+atanh,-1.20,-1.20+:1.57
+atanh,1L%3L,0.347
+atanh,(-1L)%4L,-0.255
+atanh,1+:2,0.173+:1.18
+atanh,-1+:2,-0.173+:1.18
+atanh,1+:-2,0.173+:-1.18
+atanh,-1.20+:4.30,-0.0576+:1.36
+atanh,1.20+:-4.30,0.0576+:-1.36
+atanh,1L%2L+:1,0.239+:0.848
+atanh,1L%2L+:3L%4L,0.310+:0.723
+atanh,3<:1,0.168+:1.29
+atanh,3<:-2.14,-0.168+:-1.29
+atanh,3.00<:-3,-0.342+:-1.52
+atanh,3.10<:2.50,-0.254+:1.37
+atanh,2L%3L<:2,-0.202+:0.571
+atanh,1L%2L<:3L%4L,0.335+:0.369
atanh,-inf,nan+:nan
atanh,nan,nan
abs,1,1
abs,-1,1
abs,0,0
-abs,0.000,0.000
-abs,1.200,1.200
-abs,-1.200,1.200
+abs,0.00,0.00
+abs,1.20,1.20
+abs,-1.20,1.20
abs,1L%3L,1L%3L
abs,(-1L)%4L,1L%4L
-abs,1+:2,2.236
-abs,-1+:2,2.236
-abs,1+:-2,2.236
-abs,-1.200+:4.300,4.464
-abs,1.200+:-4.300,4.464
-abs,1L%2L+:1,1.118
-abs,1L%2L+:3L%4L,0.9014
+abs,1+:2,2.24
+abs,-1+:2,2.24
+abs,1+:-2,2.24
+abs,-1.20+:4.30,4.46
+abs,1.20+:-4.30,4.46
+abs,1L%2L+:1,1.12
+abs,1L%2L+:3L%4L,0.901
abs,3<:1,3
-abs,3<:-2.142,3
-abs,3.000<:-3,3.000
-abs,3.100<:2.500,3.100
+abs,3<:-2.14,3
+abs,3.00<:-3,3.00
+abs,3.10<:2.50,3.10
abs,2L%3L<:2,2L%3L
abs,1L%2L<:3L%4L,1L%2L
abs,-inf,inf
@@ -577,91 +577,91 @@
re,1,1
re,-1,-1
re,0,0
-re,0.000,0.000
-re,1.200,1.200
-re,-1.200,-1.200
+re,0.00,0.00
+re,1.20,1.20
+re,-1.20,-1.20
re,1L%3L,1L%3L
re,(-1L)%4L,(-1L)%4L
re,1+:2,1
re,-1+:2,-1
re,1+:-2,1
-re,-1.200+:4.300,-1.200
-re,1.200+:-4.300,1.200
+re,-1.20+:4.30,-1.20
+re,1.20+:-4.30,1.20
re,1L%2L+:1,1L%2L
re,1L%2L+:3L%4L,1L%2L
-re,3<:1,2.524
-re,3<:-2.142,-2.524
-re,3.000<:-3,-0.4234
-re,3.100<:2.500,1.855
-re,2L%3L<:2,0.6062
-re,1L%2L<:3L%4L,0.3408
+re,3<:1,2.52
+re,3<:-2.14,-2.52
+re,3.00<:-3,-0.423
+re,3.10<:2.50,1.86
+re,2L%3L<:2,0.606
+re,1L%2L<:3L%4L,0.341
re,-inf,-inf
re,nan,nan
im,1,0
im,-1,0
im,0,0
-im,0.000,0.000
-im,1.200,0.000
-im,-1.200,0.000
+im,0.00,0.00
+im,1.20,0.00
+im,-1.20,0.00
im,1L%3L,0L%1L
im,(-1L)%4L,0L%1L
im,1+:2,2
im,-1+:2,2
im,1+:-2,-2
-im,-1.200+:4.300,4.300
-im,1.200+:-4.300,-4.300
+im,-1.20+:4.30,4.30
+im,1.20+:-4.30,-4.30
im,1L%2L+:1,1
im,1L%2L+:3L%4L,3L%4L
-im,3<:1,1.621
-im,3<:-2.142,-1.621
-im,3.000<:-3,-2.970
-im,3.100<:2.500,-2.484
-im,2L%3L<:2,-0.2774
-im,1L%2L<:3L%4L,0.3658
-im,-inf,0.000
-im,nan,0.000
-arg,1,0.000
-arg,-1,3.142
-arg,0,0.000
-arg,0.000,0.000
-arg,1.200,0.000
-arg,-1.200,3.142
-arg,1L%3L,0.000
-arg,(-1L)%4L,3.142
-arg,1+:2,1.107
-arg,-1+:2,2.034
-arg,1+:-2,-1.107
-arg,-1.200+:4.300,1.843
-arg,1.200+:-4.300,-1.299
-arg,1L%2L+:1,1.107
-arg,1L%2L+:3L%4L,0.9828
+im,3<:1,1.62
+im,3<:-2.14,-1.62
+im,3.00<:-3,-2.97
+im,3.10<:2.50,-2.48
+im,2L%3L<:2,-0.277
+im,1L%2L<:3L%4L,0.366
+im,-inf,0.00
+im,nan,0.00
+arg,1,0.00
+arg,-1,3.14
+arg,0,0.00
+arg,0.00,0.00
+arg,1.20,0.00
+arg,-1.20,3.14
+arg,1L%3L,0.00
+arg,(-1L)%4L,3.14
+arg,1+:2,1.11
+arg,-1+:2,2.03
+arg,1+:-2,-1.11
+arg,-1.20+:4.30,1.84
+arg,1.20+:-4.30,-1.30
+arg,1L%2L+:1,1.11
+arg,1L%2L+:3L%4L,0.983
arg,3<:1,1
-arg,3<:-2.142,-2.142
-arg,3.000<:-3,-3
-arg,3.100<:2.500,2.500
+arg,3<:-2.14,-2.14
+arg,3.00<:-3,-3
+arg,3.10<:2.50,2.50
arg,2L%3L<:2,2
arg,1L%2L<:3L%4L,3L%4L
-arg,-inf,3.142
+arg,-inf,3.14
arg,nan,nan
conj,1,1
conj,-1,-1
conj,0,0
-conj,0.000,0.000
-conj,1.200,1.200
-conj,-1.200,-1.200
+conj,0.00,0.00
+conj,1.20,1.20
+conj,-1.20,-1.20
conj,1L%3L,1L%3L
conj,(-1L)%4L,(-1L)%4L
conj,1+:2,1+:-2
conj,-1+:2,-1+:-2
conj,1+:-2,1+:2
-conj,-1.200+:4.300,-1.200+:-4.300
-conj,1.200+:-4.300,1.200+:4.300
+conj,-1.20+:4.30,-1.20+:-4.30
+conj,1.20+:-4.30,1.20+:4.30
conj,1L%2L+:1,1L%2L+:-1
conj,1L%2L+:3L%4L,1L%2L+:(-3L)%4L
conj,3<:1,3<:-1
-conj,3<:-2.142,3<:2.142
-conj,3.000<:-3,3.000<:3
-conj,3.100<:2.500,3.100<:-2.500
+conj,3<:-2.14,3<:2.14
+conj,3.00<:-3,3.00<:3
+conj,3.10<:2.50,3.10<:-2.50
conj,2L%3L<:2,2L%3L<:-2
conj,1L%2L<:3L%4L,1L%2L<:(-3L)%4L
conj,-inf,-inf
@@ -669,68 +669,68 @@
rect,1,1+:0
rect,-1,-1+:0
rect,0,0+:0
-rect,0.000,0.000+:0.000
-rect,1.200,1.200+:0.000
-rect,-1.200,-1.200+:0.000
+rect,0.00,0.00+:0.00
+rect,1.20,1.20+:0.00
+rect,-1.20,-1.20+:0.00
rect,1L%3L,1L%3L+:0L%1L
rect,(-1L)%4L,(-1L)%4L+:0L%1L
rect,1+:2,1+:2
rect,-1+:2,-1+:2
rect,1+:-2,1+:-2
-rect,-1.200+:4.300,-1.200+:4.300
-rect,1.200+:-4.300,1.200+:-4.300
+rect,-1.20+:4.30,-1.20+:4.30
+rect,1.20+:-4.30,1.20+:-4.30
rect,1L%2L+:1,1L%2L+:1
rect,1L%2L+:3L%4L,1L%2L+:3L%4L
-rect,3<:1,1.621+:2.524
-rect,3<:-2.142,-1.621+:-2.524
-rect,3.000<:-3,-2.970+:-0.4234
-rect,3.100<:2.500,-2.484+:1.855
-rect,2L%3L<:2,-0.2774+:0.6062
-rect,1L%2L<:3L%4L,0.3658+:0.3408
-rect,-inf,-inf+:0.000
-rect,nan,nan+:0.000
+rect,3<:1,1.62+:2.52
+rect,3<:-2.14,-1.62+:-2.52
+rect,3.00<:-3,-2.97+:-0.423
+rect,3.10<:2.50,-2.48+:1.86
+rect,2L%3L<:2,-0.277+:0.606
+rect,1L%2L<:3L%4L,0.366+:0.341
+rect,-inf,-inf+:0.00
+rect,nan,nan+:0.00
polar,1,1<:0
-polar,-1,1<:3.142
+polar,-1,1<:3.14
polar,0,0<:0
-polar,0.000,0.000<:0.000
-polar,1.200,1.200<:0.000
-polar,-1.200,1.200<:3.142
+polar,0.00,0.00<:0.00
+polar,1.20,1.20<:0.00
+polar,-1.20,1.20<:3.14
polar,1L%3L,1L%3L<:0L%1L
-polar,(-1L)%4L,1L%4L<:3.142
-polar,1+:2,2.236<:1.107
-polar,-1+:2,2.236<:2.034
-polar,1+:-2,2.236<:-1.107
-polar,-1.200+:4.300,4.464<:1.843
-polar,1.200+:-4.300,4.464<:-1.299
-polar,1L%2L+:1,1.118<:1.107
-polar,1L%2L+:3L%4L,0.9014<:0.9828
+polar,(-1L)%4L,1L%4L<:3.14
+polar,1+:2,2.24<:1.11
+polar,-1+:2,2.24<:2.03
+polar,1+:-2,2.24<:-1.11
+polar,-1.20+:4.30,4.46<:1.84
+polar,1.20+:-4.30,4.46<:-1.30
+polar,1L%2L+:1,1.12<:1.11
+polar,1L%2L+:3L%4L,0.901<:0.983
polar,3<:1,3<:1
-polar,3<:-2.142,3<:-2.142
-polar,3.000<:-3,3.000<:-3
-polar,3.100<:2.500,3.100<:2.500
+polar,3<:-2.14,3<:-2.14
+polar,3.00<:-3,3.00<:-3
+polar,3.10<:2.50,3.10<:2.50
polar,2L%3L<:2,2L%3L<:2
polar,1L%2L<:3L%4L,1L%2L<:3L%4L
-polar,-inf,inf<:3.142
-polar,nan,nan<:0.000
-cis,1,0.5403+:0.8415
-cis,-1,0.5403+:-0.8415
-cis,0,1.000+:0.000
-cis,0.000,1.000+:0.000
-cis,1.200,0.3624+:0.9320
-cis,-1.200,0.3624+:-0.9320
-cis,1L%3L,0.9450+:0.3272
-cis,(-1L)%4L,0.9689+:-0.2474
+polar,-inf,inf<:3.14
+polar,nan,nan<:0.00
+cis,1,0.540+:0.841
+cis,-1,0.540+:-0.841
+cis,0,1.00+:0.00
+cis,0.00,1.00+:0.00
+cis,1.20,0.362+:0.932
+cis,-1.20,0.362+:-0.932
+cis,1L%3L,0.945+:0.327
+cis,(-1L)%4L,0.969+:-0.247
cis,1+:2,__failed__
cis,-1+:2,__failed__
cis,1+:-2,__failed__
-cis,-1.200+:4.300,__failed__
-cis,1.200+:-4.300,__failed__
+cis,-1.20+:4.30,__failed__
+cis,1.20+:-4.30,__failed__
cis,1L%2L+:1,__failed__
cis,1L%2L+:3L%4L,__failed__
cis,3<:1,__failed__
-cis,3<:-2.142,__failed__
-cis,3.000<:-3,__failed__
-cis,3.100<:2.500,__failed__
+cis,3<:-2.14,__failed__
+cis,3.00<:-3,__failed__
+cis,3.10<:2.50,__failed__
cis,2L%3L<:2,__failed__
cis,1L%2L<:3L%4L,__failed__
cis,-inf,nan+:nan
@@ -738,22 +738,22 @@
ceil,1,1
ceil,-1,-1
ceil,0,0
-ceil,0.000,0.000
-ceil,1.200,2.000
-ceil,-1.200,-1.000
+ceil,0.00,0.00
+ceil,1.20,2.00
+ceil,-1.20,-1.00
ceil,1L%3L,1L
ceil,(-1L)%4L,0L
ceil,1+:2,__failed__
ceil,-1+:2,__failed__
ceil,1+:-2,__failed__
-ceil,-1.200+:4.300,__failed__
-ceil,1.200+:-4.300,__failed__
+ceil,-1.20+:4.30,__failed__
+ceil,1.20+:-4.30,__failed__
ceil,1L%2L+:1,__failed__
ceil,1L%2L+:3L%4L,__failed__
ceil,3<:1,__failed__
-ceil,3<:-2.142,__failed__
-ceil,3.000<:-3,__failed__
-ceil,3.100<:2.500,__failed__
+ceil,3<:-2.14,__failed__
+ceil,3.00<:-3,__failed__
+ceil,3.10<:2.50,__failed__
ceil,2L%3L<:2,__failed__
ceil,1L%2L<:3L%4L,__failed__
ceil,-inf,-inf
@@ -761,22 +761,22 @@
floor,1,1
floor,-1,-1
floor,0,0
-floor,0.000,0.000
-floor,1.200,1.000
-floor,-1.200,-2.000
+floor,0.00,0.00
+floor,1.20,1.00
+floor,-1.20,-2.00
floor,1L%3L,0L
floor,(-1L)%4L,-1L
floor,1+:2,__failed__
floor,-1+:2,__failed__
floor,1+:-2,__failed__
-floor,-1.200+:4.300,__failed__
-floor,1.200+:-4.300,__failed__
+floor,-1.20+:4.30,__failed__
+floor,1.20+:-4.30,__failed__
floor,1L%2L+:1,__failed__
floor,1L%2L+:3L%4L,__failed__
floor,3<:1,__failed__
-floor,3<:-2.142,__failed__
-floor,3.000<:-3,__failed__
-floor,3.100<:2.500,__failed__
+floor,3<:-2.14,__failed__
+floor,3.00<:-3,__failed__
+floor,3.10<:2.50,__failed__
floor,2L%3L<:2,__failed__
floor,1L%2L<:3L%4L,__failed__
floor,-inf,-inf
@@ -784,22 +784,22 @@
round,1,1
round,-1,-1
round,0,0
-round,0.000,0.000
-round,1.200,1.000
-round,-1.200,-1.000
+round,0.00,0.00
+round,1.20,1.00
+round,-1.20,-1.00
round,1L%3L,0L
round,(-1L)%4L,0L
round,1+:2,__failed__
round,-1+:2,__failed__
round,1+:-2,__failed__
-round,-1.200+:4.300,__failed__
-round,1.200+:-4.300,__failed__
+round,-1.20+:4.30,__failed__
+round,1.20+:-4.30,__failed__
round,1L%2L+:1,__failed__
round,1L%2L+:3L%4L,__failed__
round,3<:1,__failed__
-round,3<:-2.142,__failed__
-round,3.000<:-3,__failed__
-round,3.100<:2.500,__failed__
+round,3<:-2.14,__failed__
+round,3.00<:-3,__failed__
+round,3.10<:2.50,__failed__
round,2L%3L<:2,__failed__
round,1L%2L<:3L%4L,__failed__
round,-inf,-inf
@@ -807,22 +807,22 @@
frac,1,0
frac,-1,0
frac,0,0
-frac,0.000,0.000
-frac,1.200,0.2000
-frac,-1.200,-0.2000
+frac,0.00,0.00
+frac,1.20,0.200
+frac,-1.20,-0.200
frac,1L%3L,1L%3L
frac,(-1L)%4L,(-1L)%4L
frac,1+:2,__failed__
frac,-1+:2,__failed__
frac,1+:-2,__failed__
-frac,-1.200+:4.300,__failed__
-frac,1.200+:-4.300,__failed__
+frac,-1.20+:4.30,__failed__
+frac,1.20+:-4.30,__failed__
frac,1L%2L+:1,__failed__
frac,1L%2L+:3L%4L,__failed__
frac,3<:1,__failed__
-frac,3<:-2.142,__failed__
-frac,3.000<:-3,__failed__
-frac,3.100<:2.500,__failed__
+frac,3<:-2.14,__failed__
+frac,3.00<:-3,__failed__
+frac,3.10<:2.50,__failed__
frac,2L%3L<:2,__failed__
frac,1L%2L<:3L%4L,__failed__
frac,-inf,nan
@@ -830,22 +830,22 @@
complexp,1,0
complexp,-1,0
complexp,0,0
-complexp,0.000,0
-complexp,1.200,0
-complexp,-1.200,0
+complexp,0.00,0
+complexp,1.20,0
+complexp,-1.20,0
complexp,1L%3L,0
complexp,(-1L)%4L,0
complexp,1+:2,1
complexp,-1+:2,1
complexp,1+:-2,1
-complexp,-1.200+:4.300,1
-complexp,1.200+:-4.300,1
+complexp,-1.20+:4.30,1
+complexp,1.20+:-4.30,1
complexp,1L%2L+:1,1
complexp,1L%2L+:3L%4L,1
complexp,3<:1,1
-complexp,3<:-2.142,1
-complexp,3.000<:-3,1
-complexp,3.100<:2.500,1
+complexp,3<:-2.14,1
+complexp,3.00<:-3,1
+complexp,3.10<:2.50,1
complexp,2L%3L<:2,1
complexp,1L%2L<:3L%4L,1
complexp,-inf,0
@@ -853,22 +853,22 @@
realp,1,1
realp,-1,1
realp,0,1
-realp,0.000,1
-realp,1.200,1
-realp,-1.200,1
+realp,0.00,1
+realp,1.20,1
+realp,-1.20,1
realp,1L%3L,1
realp,(-1L)%4L,1
realp,1+:2,0
realp,-1+:2,0
realp,1+:-2,0
-realp,-1.200+:4.300,0
-realp,1.200+:-4.300,0
+realp,-1.20+:4.30,0
+realp,1.20+:-4.30,0
realp,1L%2L+:1,0
realp,1L%2L+:3L%4L,0
realp,3<:1,0
-realp,3<:-2.142,0
-realp,3.000<:-3,0
-realp,3.100<:2.500,0
+realp,3<:-2.14,0
+realp,3.00<:-3,0
+realp,3.10<:2.50,0
realp,2L%3L<:2,0
realp,1L%2L<:3L%4L,0
realp,-inf,1
@@ -876,22 +876,22 @@
rationalp,1,0
rationalp,-1,0
rationalp,0,0
-rationalp,0.000,0
-rationalp,1.200,0
-rationalp,-1.200,0
+rationalp,0.00,0
+rationalp,1.20,0
+rationalp,-1.20,0
rationalp,1L%3L,1
rationalp,(-1L)%4L,1
rationalp,1+:2,0
rationalp,-1+:2,0
rationalp,1+:-2,0
-rationalp,-1.200+:4.300,0
-rationalp,1.200+:-4.300,0
+rationalp,-1.20+:4.30,0
+rationalp,1.20+:-4.30,0
rationalp,1L%2L+:1,0
rationalp,1L%2L+:3L%4L,0
rationalp,3<:1,0
-rationalp,3<:-2.142,0
-rationalp,3.000<:-3,0
-rationalp,3.100<:2.500,0
+rationalp,3<:-2.14,0
+rationalp,3.00<:-3,0
+rationalp,3.10<:2.50,0
rationalp,2L%3L<:2,0
rationalp,1L%2L<:3L%4L,0
rationalp,-inf,0
@@ -899,22 +899,22 @@
numberp,1,1
numberp,-1,1
numberp,0,1
-numberp,0.000,1
-numberp,1.200,1
-numberp,-1.200,1
+numberp,0.00,1
+numberp,1.20,1
+numberp,-1.20,1
numberp,1L%3L,1
numberp,(-1L)%4L,1
numberp,1+:2,1
numberp,-1+:2,1
numberp,1+:-2,1
-numberp,-1.200+:4.300,1
-numberp,1.200+:-4.300,1
+numberp,-1.20+:4.30,1
+numberp,1.20+:-4.30,1
numberp,1L%2L+:1,1
numberp,1L%2L+:3L%4L,1
numberp,3<:1,1
-numberp,3<:-2.142,1
-numberp,3.000<:-3,1
-numberp,3.100<:2.500,1
+numberp,3<:-2.14,1
+numberp,3.00<:-3,1
+numberp,3.10<:2.50,1
numberp,2L%3L<:2,1
numberp,1L%2L<:3L%4L,1
numberp,-inf,1
@@ -922,22 +922,22 @@
exactp,1,1
exactp,-1,1
exactp,0,1
-exactp,0.000,0
-exactp,1.200,0
-exactp,-1.200,0
+exactp,0.00,0
+exactp,1.20,0
+exactp,-1.20,0
exactp,1L%3L,1
exactp,(-1L)%4L,1
exactp,1+:2,1
exactp,-1+:2,1
exactp,1+:-2,1
-exactp,-1.200+:4.300,0
-exactp,1.200+:-4.300,0
+exactp,-1.20+:4.30,0
+exactp,1.20+:-4.30,0
exactp,1L%2L+:1,1
exactp,1L%2L+:3L%4L,1
exactp,3<:1,0
-exactp,3<:-2.142,0
-exactp,3...
[truncated message content] |
|
From: <ag...@us...> - 2008-08-23 12:56:38
|
Revision: 582
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=582&view=rev
Author: agraef
Date: 2008-08-23 12:56:48 +0000 (Sat, 23 Aug 2008)
Log Message:
-----------
Define double format as a variable, so that it can be changed more easily.
Modified Paths:
--------------
pure/trunk/test/test020.log
pure/trunk/test/test020.pure
Modified: pure/trunk/test/test020.log
===================================================================
--- pure/trunk/test/test020.log 2008-08-23 12:49:38 UTC (rev 581)
+++ pure/trunk/test/test020.log 2008-08-23 12:56:48 UTC (rev 582)
@@ -36,6 +36,7 @@
<var> state 1
state 1: #0
}) x;
+let double_format = "%#0.3g";
test f/*0:01*/ (x/*0:101*/,y/*0:11*/) = puts$format (f/*0:01*/,x/*0:101*/,y/*0:11*/,check f/*0:01*/ (x/*0:101*/,y/*0:11*/) (catch __error__ (f/*1:01*/ x/*1:101*/ y/*1:11*/)));
test f/*0:01*/ x/*0:1*/ = puts$format (f/*0:01*/,x/*0:1*/,check f/*0:01*/ x/*0:1*/ (catch __error__ (f/*1:01*/ x/*1:1*/)));
check f/*0:001*/ _/*0:01*/ (g@_/*0:100*/ _/*0:101*/ _/*0:11*/) = __failed__ if f/*0:001*/===g/*0:100*/;
@@ -43,7 +44,7 @@
check _/*0:001*/ _/*0:01*/ z/*0:1*/ = z/*0:1*/;
format (f/*0:101*/,x/*0:1101*/,y/*0:11101*/,z/*0:1111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show y/*0:11101*/+","+show z/*0:1111*/;
format (f/*0:101*/,x/*0:1101*/,z/*0:111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show z/*0:111*/;
-show x/*0:1*/::double = sprintf "%#0.3g" x/*0:1*/;
+show x/*0:1*/::double = sprintf double_format x/*0:1*/;
show (x/*0:101*/+:y/*0:11*/) = show x/*0:101*/+"+:"+show y/*0:11*/;
show (x/*0:101*/<:y/*0:11*/) = show x/*0:101*/+"<:"+show y/*0:11*/;
show x/*0:1*/ = str x/*0:1*/;
@@ -146,7 +147,7 @@
state 12: #0 #1
}
{
- rule #0: show x::double = sprintf "%#0.3g" x
+ rule #0: show x::double = sprintf double_format x
rule #1: show (x+:y) = show x+"+:"+show y
rule #2: show (x<:y) = show x+"<:"+show y
rule #3: show x = str x
Modified: pure/trunk/test/test020.pure
===================================================================
--- pure/trunk/test/test020.pure 2008-08-23 12:49:38 UTC (rev 581)
+++ pure/trunk/test/test020.pure 2008-08-23 12:56:48 UTC (rev 582)
@@ -24,9 +24,11 @@
/* This will print out each operation, arguments and result as a single
line. Exceptions are flagged with '__error__', evaluation failures with
'__failed__'. Floating point values are rounded in the output to 3
- significant digits, to prevent 'make check' from failing due to small
+ significant digits by default, to prevent 'make check' from failing due to
rounding discrepancies. */
+let double_format = "%#0.3g"; // modify as needed, to get more accuracy
+
test f (x,y) = puts $ format (f,x,y,check f (x,y) (catch __error__ (f x y)));
test f x = puts $ format (f,x,check f x (catch __error__ (f x)));
@@ -36,7 +38,7 @@
format (f,x,y,z) = str f+","+show x+","+show y+","+show z;
format (f,x,z) = str f+","+show x+","+show z;
-show x::double = sprintf "%#0.3g" x;
+show x::double = sprintf double_format x;
show (x+:y) = show x+"+:"+show y;
show (x<:y) = show x+"<:"+show y;
show x = str x otherwise;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-08-23 20:58:25
|
Revision: 584
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=584&view=rev
Author: agraef
Date: 2008-08-23 20:58:35 +0000 (Sat, 23 Aug 2008)
Log Message:
-----------
Cosmetic changes.
Modified Paths:
--------------
pure/trunk/test/test020.log
pure/trunk/test/test020.pure
Modified: pure/trunk/test/test020.log
===================================================================
--- pure/trunk/test/test020.log 2008-08-23 20:50:22 UTC (rev 583)
+++ pure/trunk/test/test020.log 2008-08-23 20:58:35 UTC (rev 584)
@@ -4716,23 +4716,23 @@
pow,nan,1L%2L<:3L%4L,__failed__
pow,nan,-inf,__failed__
pow,nan,nan,__failed__
-puts "*** UNARY ***"$$void (catmap (\f/*0:*/ -> catmap (\x/*0:*/ -> [(f/*1:*/,x/*0:*/,test f/*1:*/ x/*0:*/)] {
- rule #0: x = [(f,x,test f x)]
+puts "*** UNARY ***"$$void (catmap (\f/*0:*/ -> catmap (\x/*0:*/ -> [test f/*1:*/ x/*0:*/] {
+ rule #0: x = [test f x]
state 0: #0
<var> state 1
state 1: #0
}) x {
- rule #0: f = catmap (\x -> [(f,x,test f x)]) x
+ rule #0: f = catmap (\x -> [test f x]) x
state 0: #0
<var> state 1
state 1: #0
-}) f)$$puts "*** BINARY ***"$$void (catmap (\f/*0:*/ -> catmap (\x/*0:*/ -> [(f/*1:*/,x/*0:*/,test f/*1:*/ x/*0:*/)] {
- rule #0: x = [(f,x,test f x)]
+}) f)$$puts "*** BINARY ***"$$void (catmap (\f/*0:*/ -> catmap (\x/*0:*/ -> [test f/*1:*/ x/*0:*/] {
+ rule #0: x = [test f x]
state 0: #0
<var> state 1
state 1: #0
}) x2 {
- rule #0: f = catmap (\x -> [(f,x,test f x)]) x2
+ rule #0: f = catmap (\x -> [test f x]) x2
state 0: #0
<var> state 1
state 1: #0
Modified: pure/trunk/test/test020.pure
===================================================================
--- pure/trunk/test/test020.pure 2008-08-23 20:50:22 UTC (rev 583)
+++ pure/trunk/test/test020.pure 2008-08-23 20:58:35 UTC (rev 584)
@@ -43,5 +43,5 @@
show (x<:y) = show x+"<:"+show y;
show x = str x otherwise;
-puts "*** UNARY ***" $$ void [f,x,test f x; f=f; x=x] $$
-puts "*** BINARY ***" $$ void [f,x,test f x; f=f2; x=x2];
+puts "*** UNARY ***" $$ void [test f x; f=f; x=x] $$
+puts "*** BINARY ***" $$ void [test f x; f=f2; x=x2];
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-08-23 22:06:11
|
Revision: 586
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=586&view=rev
Author: agraef
Date: 2008-08-23 22:06:21 +0000 (Sat, 23 Aug 2008)
Log Message:
-----------
Cosmetic changes.
Modified Paths:
--------------
pure/trunk/test/test020.log
pure/trunk/test/test020.pure
Modified: pure/trunk/test/test020.log
===================================================================
--- pure/trunk/test/test020.log 2008-08-23 21:46:12 UTC (rev 585)
+++ pure/trunk/test/test020.log 2008-08-23 22:06:21 UTC (rev 586)
@@ -37,11 +37,12 @@
state 1: #0
}) x;
let double_format = "%#0.3g";
-test f/*0:01*/ (x/*0:101*/,y/*0:11*/) = puts$format (f/*0:01*/,x/*0:101*/,y/*0:11*/,check f/*0:01*/ (x/*0:101*/,y/*0:11*/) (catch __error__ (f/*1:01*/ x/*1:101*/ y/*1:11*/)));
-test f/*0:01*/ x/*0:1*/ = puts$format (f/*0:01*/,x/*0:1*/,check f/*0:01*/ x/*0:1*/ (catch __error__ (f/*1:01*/ x/*1:1*/)));
-check f/*0:001*/ _/*0:01*/ (g@_/*0:100*/ _/*0:101*/ _/*0:11*/) = __failed__ if f/*0:001*/===g/*0:100*/;
-check f/*0:001*/ _/*0:01*/ (g@_/*0:10*/ _/*0:11*/) = __failed__ if f/*0:001*/===g/*0:10*/;
-check _/*0:001*/ _/*0:01*/ z/*0:1*/ = z/*0:1*/;
+test (f/*0:101*/,x/*0:1101*/,y/*0:111*/) = puts$format (f/*0:101*/,x/*0:1101*/,y/*0:111*/,check (f/*0:101*/,x/*0:1101*/,y/*0:111*/) (catch __error__ (f/*1:101*/ x/*1:1101*/ y/*1:111*/)));
+test (f/*0:101*/,x/*0:11*/) = puts$format (f/*0:101*/,x/*0:11*/,check (f/*0:101*/,x/*0:11*/) (catch __error__ (f/*1:101*/ x/*1:11*/)));
+check _/*0:01*/ z/*0:1*/ = z/*0:1*/ if numberp z/*0:1*/;
+check (f/*0:0101*/,_/*0:011*/) (g@_/*0:100*/ _/*0:101*/ _/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:100*/;
+check (f/*0:0101*/,_/*0:011*/) (g@_/*0:10*/ _/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:10*/;
+check _/*0:01*/ z/*0:1*/ = z/*0:1*/;
format (f/*0:101*/,x/*0:1101*/,y/*0:11101*/,z/*0:1111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show y/*0:11101*/+","+show z/*0:1111*/;
format (f/*0:101*/,x/*0:1101*/,z/*0:111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show z/*0:111*/;
show x/*0:1*/::double = sprintf double_format x/*0:1*/;
@@ -49,30 +50,55 @@
show (x/*0:101*/<:y/*0:11*/) = show x/*0:101*/+"<:"+show y/*0:11*/;
show x/*0:1*/ = str x/*0:1*/;
{
- rule #0: check f _ (g@_ _ _) = __failed__ if f===g
- rule #1: check f _ (g@_ _) = __failed__ if f===g
- rule #2: check _ _ z = z
- state 0: #0 #1 #2
+ rule #0: check _ z = z if numberp z
+ rule #1: check (f,_) (g@_ _ _) = __failed__ if f===g
+ rule #2: check (f,_) (g@_ _) = __failed__ if f===g
+ rule #3: check _ z = z
+ state 0: #0 #1 #2 #3
<var> state 1
- state 1: #0 #1 #2
+ <app> state 3
+ state 1: #0 #3
<var> state 2
- state 2: #0 #1 #2
- <var> state 3
- <app> state 4
- state 3: #2
- state 4: #0 #1 #2
+ state 2: #0 #3
+ state 3: #0 #1 #2 #3
+ <var> state 4
+ <app> state 7
+ state 4: #0 #3
<var> state 5
- <app> state 7
- state 5: #1 #2
+ state 5: #0 #3
<var> state 6
- state 6: #1 #2
- state 7: #0 #1 #2
+ state 6: #0 #3
+ state 7: #0 #1 #2 #3
<var> state 8
- state 8: #0 #1 #2
+ , state 12
+ state 8: #0 #3
<var> state 9
- state 9: #0 #1 #2
+ state 9: #0 #3
<var> state 10
- state 10: #0 #1 #2
+ state 10: #0 #3
+ <var> state 11
+ state 11: #0 #3
+ state 12: #0 #1 #2 #3
+ <var> state 13
+ state 13: #0 #1 #2 #3
+ <var> state 14
+ state 14: #0 #1 #2 #3
+ <var> state 15
+ <app> state 16
+ state 15: #0 #3
+ state 16: #0 #1 #2 #3
+ <var> state 17
+ <app> state 19
+ state 17: #0 #2 #3
+ <var> state 18
+ state 18: #0 #2 #3
+ state 19: #0 #1 #2 #3
+ <var> state 20
+ state 20: #0 #1 #2 #3
+ <var> state 21
+ state 21: #0 #1 #2 #3
+ <var> state 22
+ state 22: #0 #1 #2 #3
}
{
rule #0: format (f,x,y,z) = str f+","+show x+","+show y+","+show z
@@ -118,33 +144,39 @@
state 19: #0 #1
}
{
- rule #0: test f (x,y) = puts$format (f,x,y,check f (x,y) (catch __error__ (f x y)))
- rule #1: test f x = puts$format (f,x,check f x (catch __error__ (f x)))
+ rule #0: test (f,x,y) = puts$format (f,x,y,check (f,x,y) (catch __error__ (f x y)))
+ rule #1: test (f,x) = puts$format (f,x,check (f,x) (catch __error__ (f x)))
state 0: #0 #1
- <var> state 1
+ <app> state 1
state 1: #0 #1
- <var> state 2
- <app> state 3
- state 2: #1
+ <app> state 2
+ state 2: #0 #1
+ , state 3
state 3: #0 #1
<var> state 4
+ state 4: #0 #1
+ <var> state 5
<app> state 6
- state 4: #1
- <var> state 5
state 5: #1
state 6: #0 #1
<var> state 7
- , state 10
+ <app> state 9
state 7: #1
<var> state 8
state 8: #1
- <var> state 9
- state 9: #1
- state 10: #0 #1
+ state 9: #0 #1
+ <var> state 10
+ , state 13
+ state 10: #1
<var> state 11
- state 11: #0 #1
+ state 11: #1
<var> state 12
- state 12: #0 #1
+ state 12: #1
+ state 13: #0 #1
+ <var> state 14
+ state 14: #0 #1
+ <var> state 15
+ state 15: #0 #1
}
{
rule #0: show x::double = sprintf double_format x
@@ -4716,23 +4748,23 @@
pow,nan,1L%2L<:3L%4L,__failed__
pow,nan,-inf,__failed__
pow,nan,nan,__failed__
-puts "*** UNARY ***"$$void (catmap (\f/*0:*/ -> catmap (\x/*0:*/ -> [test f/*1:*/ x/*0:*/] {
- rule #0: x = [test f x]
+puts "*** UNARY ***"$$void (catmap (\f/*0:*/ -> catmap (\x/*0:*/ -> [test (f/*1:*/,x/*0:*/)] {
+ rule #0: x = [test (f,x)]
state 0: #0
<var> state 1
state 1: #0
}) x {
- rule #0: f = catmap (\x -> [test f x]) x
+ rule #0: f = catmap (\x -> [test (f,x)]) x
state 0: #0
<var> state 1
state 1: #0
-}) f)$$puts "*** BINARY ***"$$void (catmap (\f/*0:*/ -> catmap (\x/*0:*/ -> [test f/*1:*/ x/*0:*/] {
- rule #0: x = [test f x]
+}) f)$$puts "*** BINARY ***"$$void (catmap (\f/*0:*/ -> catmap (\x/*0:*/ -> [test (f/*1:*/,x/*0:*/)] {
+ rule #0: x = [test (f,x)]
state 0: #0
<var> state 1
state 1: #0
}) x2 {
- rule #0: f = catmap (\x -> [test f x]) x2
+ rule #0: f = catmap (\x -> [test (f,x)]) x2
state 0: #0
<var> state 1
state 1: #0
Modified: pure/trunk/test/test020.pure
===================================================================
--- pure/trunk/test/test020.pure 2008-08-23 21:46:12 UTC (rev 585)
+++ pure/trunk/test/test020.pure 2008-08-23 22:06:21 UTC (rev 586)
@@ -29,11 +29,13 @@
let double_format = "%#0.3g"; // modify as needed, to get more accuracy
-test f (x,y) = puts $ format (f,x,y,check f (x,y) (catch __error__ (f x y)));
-test f x = puts $ format (f,x,check f x (catch __error__ (f x)));
+test (f,x,y) = puts $ format (f,x,y,check (f,x,y) (catch __error__ (f x y)));
+test (f,x) = puts $ format (f,x,check (f,x) (catch __error__ (f x)));
-check f _ (g@_ _ _) | check f _ (g@_ _) = __failed__ if f===g;
-check _ _ z = z otherwise;
+check _ z = z if numberp z;
+check (f,_) (g@_ _ _) |
+check (f,_) (g@_ _) = __failed__ if f===g;
+check _ z = z otherwise;
format (f,x,y,z) = str f+","+show x+","+show y+","+show z;
format (f,x,z) = str f+","+show x+","+show z;
@@ -43,5 +45,5 @@
show (x<:y) = show x+"<:"+show y;
show x = str x otherwise;
-puts "*** UNARY ***" $$ void [test f x; f=f; x=x] $$
-puts "*** BINARY ***" $$ void [test f x; f=f2; x=x2];
+puts "*** UNARY ***" $$ void [test (f,x); f=f; x=x] $$
+puts "*** BINARY ***" $$ void [test (f,x); f=f2; x=x2];
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-08-23 22:10:06
|
Revision: 587
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=587&view=rev
Author: agraef
Date: 2008-08-23 22:10:16 +0000 (Sat, 23 Aug 2008)
Log Message:
-----------
Add math.pure exact/inexact/symbolic tests.
Added Paths:
-----------
pure/trunk/test/test021.log
pure/trunk/test/test021.pure
Added: pure/trunk/test/test021.log
===================================================================
--- pure/trunk/test/test021.log (rev 0)
+++ pure/trunk/test/test021.log 2008-08-23 22:10:16 UTC (rev 587)
@@ -0,0 +1,295 @@
+let double_format = "%#0.3g";
+test (f/*0:101*/,x/*0:1101*/,y/*0:111*/) = puts$format (f/*0:101*/,x/*0:1101*/,y/*0:111*/,check (f/*0:101*/,x/*0:1101*/,y/*0:111*/) (catch __error__ (f/*1:101*/ x/*1:1101*/ y/*1:111*/)));
+test (f/*0:101*/,x/*0:11*/) = puts$format (f/*0:101*/,x/*0:11*/,check (f/*0:101*/,x/*0:11*/) (catch __error__ (f/*1:101*/ x/*1:11*/)));
+check _/*0:01*/ z/*0:1*/ = z/*0:1*/ if numberp z/*0:1*/;
+check (f/*0:0101*/,_/*0:011*/) (g@_/*0:100*/ _/*0:101*/ _/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:100*/;
+check (f/*0:0101*/,_/*0:011*/) (g@_/*0:10*/ _/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:10*/;
+check _/*0:01*/ z/*0:1*/ = z/*0:1*/;
+format (f/*0:101*/,x/*0:1101*/,y/*0:11101*/,z/*0:1111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show y/*0:11101*/+","+show z/*0:1111*/;
+format (f/*0:101*/,x/*0:1101*/,z/*0:111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show z/*0:111*/;
+show x/*0:1*/::double = sprintf double_format x/*0:1*/;
+show (x/*0:101*/+:y/*0:11*/) = show x/*0:101*/+"+:"+show y/*0:11*/;
+show (x/*0:101*/<:y/*0:11*/) = show x/*0:101*/+"<:"+show y/*0:11*/;
+show x/*0:1*/ = str x/*0:1*/;
+{
+ rule #0: check _ z = z if numberp z
+ rule #1: check (f,_) (g@_ _ _) = __failed__ if f===g
+ rule #2: check (f,_) (g@_ _) = __failed__ if f===g
+ rule #3: check _ z = z
+ state 0: #0 #1 #2 #3
+ <var> state 1
+ <app> state 3
+ state 1: #0 #3
+ <var> state 2
+ state 2: #0 #3
+ state 3: #0 #1 #2 #3
+ <var> state 4
+ <app> state 7
+ state 4: #0 #3
+ <var> state 5
+ state 5: #0 #3
+ <var> state 6
+ state 6: #0 #3
+ state 7: #0 #1 #2 #3
+ <var> state 8
+ , state 12
+ state 8: #0 #3
+ <var> state 9
+ state 9: #0 #3
+ <var> state 10
+ state 10: #0 #3
+ <var> state 11
+ state 11: #0 #3
+ state 12: #0 #1 #2 #3
+ <var> state 13
+ state 13: #0 #1 #2 #3
+ <var> state 14
+ state 14: #0 #1 #2 #3
+ <var> state 15
+ <app> state 16
+ state 15: #0 #3
+ state 16: #0 #1 #2 #3
+ <var> state 17
+ <app> state 19
+ state 17: #0 #2 #3
+ <var> state 18
+ state 18: #0 #2 #3
+ state 19: #0 #1 #2 #3
+ <var> state 20
+ state 20: #0 #1 #2 #3
+ <var> state 21
+ state 21: #0 #1 #2 #3
+ <var> state 22
+ state 22: #0 #1 #2 #3
+}
+{
+ rule #0: format (f,x,y,z) = str f+","+show x+","+show y+","+show z
+ rule #1: format (f,x,z) = str f+","+show x+","+show z
+ state 0: #0 #1
+ <app> state 1
+ state 1: #0 #1
+ <app> state 2
+ state 2: #0 #1
+ , state 3
+ state 3: #0 #1
+ <var> state 4
+ state 4: #0 #1
+ <app> state 5
+ state 5: #0 #1
+ <app> state 6
+ state 6: #0 #1
+ , state 7
+ state 7: #0 #1
+ <var> state 8
+ state 8: #0 #1
+ <var> state 9
+ <app> state 10
+ state 9: #1
+ state 10: #0 #1
+ <var> state 11
+ <app> state 13
+ state 11: #1
+ <var> state 12
+ state 12: #1
+ state 13: #0 #1
+ <var> state 14
+ , state 17
+ state 14: #1
+ <var> state 15
+ state 15: #1
+ <var> state 16
+ state 16: #1
+ state 17: #0 #1
+ <var> state 18
+ state 18: #0 #1
+ <var> state 19
+ state 19: #0 #1
+}
+{
+ rule #0: test (f,x,y) = puts$format (f,x,y,check (f,x,y) (catch __error__ (f x y)))
+ rule #1: test (f,x) = puts$format (f,x,check (f,x) (catch __error__ (f x)))
+ state 0: #0 #1
+ <app> state 1
+ state 1: #0 #1
+ <app> state 2
+ state 2: #0 #1
+ , state 3
+ state 3: #0 #1
+ <var> state 4
+ state 4: #0 #1
+ <var> state 5
+ <app> state 6
+ state 5: #1
+ state 6: #0 #1
+ <var> state 7
+ <app> state 9
+ state 7: #1
+ <var> state 8
+ state 8: #1
+ state 9: #0 #1
+ <var> state 10
+ , state 13
+ state 10: #1
+ <var> state 11
+ state 11: #1
+ <var> state 12
+ state 12: #1
+ state 13: #0 #1
+ <var> state 14
+ state 14: #0 #1
+ <var> state 15
+ state 15: #0 #1
+}
+{
+ rule #0: show x::double = sprintf double_format x
+ rule #1: show (x+:y) = show x+"+:"+show y
+ rule #2: show (x<:y) = show x+"<:"+show y
+ rule #3: show x = str x
+ state 0: #0 #1 #2 #3
+ <var> state 1
+ <var>::double state 2
+ <app> state 3
+ state 1: #3
+ state 2: #0 #3
+ state 3: #1 #2 #3
+ <var> state 4
+ <app> state 6
+ state 4: #3
+ <var> state 5
+ state 5: #3
+ state 6: #1 #2 #3
+ <var> state 7
+ +: state 10
+ <: state 13
+ state 7: #3
+ <var> state 8
+ state 8: #3
+ <var> state 9
+ state 9: #3
+ state 10: #1 #3
+ <var> state 11
+ state 11: #1 #3
+ <var> state 12
+ state 12: #1 #3
+ state 13: #2 #3
+ <var> state 14
+ state 14: #2 #3
+ <var> state 15
+ state 15: #2 #3
+}
+*** EXACT/INEXACT ***
+(+),2,2+:3,4+:3
+(+),2,2<:3,0.0200+:0.282
+(+),2,2L%3L,8L%3L
+(-),2,2+:3,0+:-3
+(-),2,2<:3,3.98+:-0.282
+(-),2,2L%3L,4L%3L
+(*),2,2+:3,4+:6
+(*),2,2<:3,4<:3
+(*),2,2L%3L,4L%3L
+(%),2,2+:3,4L%13L+:(-6L)%13L
+(%),2,2<:3,1L%1L<:-3
+(%),2,2L%3L,3L%1L
+(/),2,2+:3,0.308+:-0.462
+(/),2,2<:3,1.00<:-3
+(/),2,2L%3L,3.00
+(^),2,2+:3,-1.95+:3.49
+(^),2,2<:3,0.253<:0.196
+(^),2,2L%3L,1.59
+(+),2+:3,2,4+:3
+(+),2<:3,2,0.0200+:0.282
+(+),2L%3L,2,8L%3L
+(-),2+:3,2,0+:3
+(-),2<:3,2,-3.98+:0.282
+(-),2L%3L,2,(-4L)%3L
+(*),2+:3,2,4+:6
+(*),2<:3,2,4<:3
+(*),2L%3L,2,4L%3L
+(%),2+:3,2,1L%1L+:3L%2L
+(%),2<:3,2,1L%1L<:3
+(%),2L%3L,2,1L%3L
+(/),2+:3,2,1.00+:1.50
+(/),2<:3,2,1.00<:3
+(/),2L%3L,2,0.333
+(^),2+:3,2,-5.00+:12.0
+(^),2<:3,2,4.00<:-0.283
+(^),2L%3L,2,0.444
+*** SYMBOLIC ***
+(+),x,2+:3,__failed__
+(+),x,2<:3,__failed__
+(+),x,2L%3L,__failed__
+(-),x,2+:3,__failed__
+(-),x,2<:3,__failed__
+(-),x,2L%3L,__failed__
+(*),x,2+:3,__failed__
+(*),x,2<:3,__failed__
+(*),x,2L%3L,__failed__
+(%),x,2+:3,__failed__
+(%),x,2<:3,__failed__
+(%),x,2L%3L,__failed__
+(/),x,2+:3,__failed__
+(/),x,2<:3,__failed__
+(/),x,2L%3L,__failed__
+(^),x,2+:3,__failed__
+(^),x,2<:3,__failed__
+(^),x,2L%3L,__failed__
+(+),2+:3,x,__failed__
+(+),2<:3,x,__failed__
+(+),2L%3L,x,__failed__
+(-),2+:3,x,__failed__
+(-),2<:3,x,__failed__
+(-),2L%3L,x,__failed__
+(*),2+:3,x,__failed__
+(*),2<:3,x,__failed__
+(*),2L%3L,x,__failed__
+(%),2+:3,x,__failed__
+(%),2<:3,x,__failed__
+(%),2L%3L,x,__failed__
+(/),2+:3,x,__failed__
+(/),2<:3,x,__failed__
+(/),2L%3L,x,__failed__
+(^),2+:3,x,__failed__
+(^),2<:3,x,__failed__
+(^),2L%3L,x,__failed__
+puts "*** EXACT/INEXACT ***"$$do test (catmap (\op/*0:*/ -> catmap (\a/*0:*/ -> [(op/*1:*/,2,a/*0:*/)] {
+ rule #0: a = [(op,2,a)]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [2+:3,2<:3,2%3] {
+ rule #0: op = catmap (\a -> [(op,2,a)]) [2+:3,2<:3,2%3]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [(+),(-),(*),(%),(/),(^)])$$do test (catmap (\op/*0:*/ -> catmap (\a/*0:*/ -> [(op/*1:*/,a/*0:*/,2)] {
+ rule #0: a = [(op,a,2)]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [2+:3,2<:3,2%3] {
+ rule #0: op = catmap (\a -> [(op,a,2)]) [2+:3,2<:3,2%3]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [(+),(-),(*),(%),(/),(^)])$$puts "*** SYMBOLIC ***"$$do test (catmap (\op/*0:*/ -> catmap (\a/*0:*/ -> [(op/*1:*/,x,a/*0:*/)] {
+ rule #0: a = [(op,x,a)]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [2+:3,2<:3,2%3] {
+ rule #0: op = catmap (\a -> [(op,x,a)]) [2+:3,2<:3,2%3]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [(+),(-),(*),(%),(/),(^)])$$do test (catmap (\op/*0:*/ -> catmap (\a/*0:*/ -> [(op/*1:*/,a/*0:*/,x)] {
+ rule #0: a = [(op,a,x)]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [2+:3,2<:3,2%3] {
+ rule #0: op = catmap (\a -> [(op,a,x)]) [2+:3,2<:3,2%3]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [(+),(-),(*),(%),(/),(^)]);
+()
Added: pure/trunk/test/test021.pure
===================================================================
--- pure/trunk/test/test021.pure (rev 0)
+++ pure/trunk/test/test021.pure 2008-08-23 22:10:16 UTC (rev 587)
@@ -0,0 +1,37 @@
+// math.pure tests for exact/inexact and symbolic results
+
+using math, system;
+
+/* This will print out each operation, arguments and result as a single
+ line. Exceptions are flagged with '__error__', evaluation failures with
+ '__failed__'. Floating point values are rounded in the output to 3
+ significant digits by default, to prevent 'make check' from failing due to
+ rounding discrepancies. */
+
+let double_format = "%#0.3g"; // modify as needed, to get more accuracy
+
+test (f,x,y) = puts $ format (f,x,y,check (f,x,y) (catch __error__ (f x y)));
+test (f,x) = puts $ format (f,x,check (f,x) (catch __error__ (f x)));
+
+check _ z = z if numberp z;
+check (f,_) (g@_ _ _) |
+check (f,_) (g@_ _) = __failed__ if f===g;
+check _ z = z otherwise;
+
+format (f,x,y,z) = str f+","+show x+","+show y+","+show z;
+format (f,x,z) = str f+","+show x+","+show z;
+
+show x::double = sprintf double_format x;
+show (x+:y) = show x+"+:"+show y;
+show (x<:y) = show x+"<:"+show y;
+show x = str x otherwise;
+
+puts "*** EXACT/INEXACT ***" $$
+// These should all return exact results, except +/- with polar operands, as
+// well as / and ^ which always return inexact results.
+do test [op,2,a;op=[(+),(-),(*),(%),(/),(^)];a=[2+:3,2<:3,2%3]] $$
+do test [op,a,2;op=[(+),(-),(*),(%),(/),(^)];a=[2+:3,2<:3,2%3]] $$
+puts "*** SYMBOLIC ***" $$
+// If everything is all right here, these should all print __failed__.
+do test [op,x,a;op=[(+),(-),(*),(%),(/),(^)];a=[2+:3,2<:3,2%3]] $$
+do test [op,a,x;op=[(+),(-),(*),(%),(/),(^)];a=[2+:3,2<:3,2%3]];
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-08-23 22:16:47
|
Revision: 588
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=588&view=rev
Author: agraef
Date: 2008-08-23 22:16:55 +0000 (Sat, 23 Aug 2008)
Log Message:
-----------
Add test for symbolic values.
Modified Paths:
--------------
pure/trunk/test/test020.log
pure/trunk/test/test020.pure
Modified: pure/trunk/test/test020.log
===================================================================
--- pure/trunk/test/test020.log 2008-08-23 22:10:16 UTC (rev 587)
+++ pure/trunk/test/test020.log 2008-08-23 22:16:55 UTC (rev 588)
@@ -6,12 +6,12 @@
}
let f = [sqrt,sin,cos,tan,ln,log,exp,atan,asin,acos,sinh,cosh,tanh,asinh,acosh,atanh,abs,re,im,arg,conj,rect,polar,cis,ceil,floor,round,frac,complexp,realp,rationalp,numberp,exactp,inexactp,infp,nanp];
{
- rule #0: x = [1,-1,0,0.0,1.2,-1.2,1%3,-1%4,1+:2,-1+:2,1+:-2,-1.2+:4.3,1.2+:-4.3,1%2+:1,1%2+:3%4,3<:1,-3<:1,3.0<:-3,3.1<:2.5,2%3<:2,1%2<:3%4,-1e+307*1e+307,1e+307*1e+307-1e+307*1e+307]
+ rule #0: x = [1,-1,0,0.0,1.2,-1.2,1%3,-1%4,1+:2,-1+:2,1+:-2,-1.2+:4.3,1.2+:-4.3,1%2+:1,1%2+:3%4,3<:1,-3<:1,3.0<:-3,3.1<:2.5,2%3<:2,1%2<:3%4,-1e+307*1e+307,1e+307*1e+307-1e+307*1e+307,x]
state 0: #0
<var> state 1
state 1: #0
}
-let x = [1,-1,0,0.0,1.2,-1.2,1%3,-1%4,1+:2,-1+:2,1+:-2,-1.2+:4.3,1.2+:-4.3,1%2+:1,1%2+:3%4,3<:1,-3<:1,3.0<:-3,3.1<:2.5,2%3<:2,1%2<:3%4,-1e+307*1e+307,1e+307*1e+307-1e+307*1e+307];
+let x = [1,-1,0,0.0,1.2,-1.2,1%3,-1%4,1+:2,-1+:2,1+:-2,-1.2+:4.3,1.2+:-4.3,1%2+:1,1%2+:3%4,3<:1,-3<:1,3.0<:-3,3.1<:2.5,2%3<:2,1%2<:3%4,-1e+307*1e+307,1e+307*1e+307-1e+307*1e+307,x];
{
rule #0: f2 = [(+),(-),(*),(/),(^),atan2,pow]
state 0: #0
@@ -239,6 +239,7 @@
sqrt,1L%2L<:3L%4L,0.707<:0.375
sqrt,-inf,nan
sqrt,nan,nan
+sqrt,x,__failed__
sin,1,0.841
sin,-1,-0.841
sin,0,0.00
@@ -262,6 +263,7 @@
sin,1L%2L<:3L%4L,0.499<:0.708
sin,-inf,nan
sin,nan,nan
+sin,x,__failed__
cos,1,0.540
cos,-1,0.540
cos,0,1.00
@@ -285,6 +287,7 @@
cos,1L%2L<:3L%4L,0.996<:-0.125
cos,-inf,nan
cos,nan,nan
+cos,x,__failed__
tan,1,1.56
tan,-1,-1.56
tan,0,0.00
@@ -308,6 +311,7 @@
tan,1L%2L<:3L%4L,0.501<:0.833
tan,-inf,nan
tan,nan,nan
+tan,x,__failed__
ln,1,0.00
ln,-1,nan
ln,0,-inf
@@ -331,6 +335,7 @@
ln,1L%2L<:3L%4L,1.02<:2.32
ln,-inf,nan
ln,nan,nan
+ln,x,__failed__
log,1,0.00
log,-1,nan
log,0,-inf
@@ -354,6 +359,7 @@
log,1L%2L<:3L%4L,0.444<:2.32
log,-inf,nan
log,nan,nan
+log,x,__failed__
exp,1,2.72
exp,-1,0.368
exp,0,1.00
@@ -377,6 +383,7 @@
exp,1L%2L<:3L%4L,1.44<:0.341
exp,-inf,0.00
exp,nan,nan
+exp,x,__failed__
atan,1,0.785
atan,-1,-0.785
atan,0,0.00
@@ -400,6 +407,7 @@
atan,1L%2L<:3L%4L,0.387+:0.306
atan,-inf,-1.57
atan,nan,nan
+atan,x,__failed__
asin,1,1.57
asin,-1,-1.57
asin,0,0.00
@@ -423,6 +431,7 @@
asin,1L%2L<:3L%4L,0.351+:0.355
asin,-inf,nan
asin,nan,nan
+asin,x,__failed__
acos,1,0.00
acos,-1,3.14
acos,0,1.57
@@ -446,6 +455,7 @@
acos,1L%2L<:3L%4L,1.22+:-0.355
acos,-inf,nan
acos,nan,nan
+acos,x,__failed__
sinh,1,1.18
sinh,-1,-1.18
sinh,0,0.00
@@ -469,6 +479,7 @@
sinh,1L%2L<:3L%4L,0.502<:0.792
sinh,-inf,-inf
sinh,nan,nan
+sinh,x,__failed__
cosh,1,1.54
cosh,-1,1.54
cosh,0,1.00
@@ -492,6 +503,7 @@
cosh,1L%2L<:3L%4L,1.01<:0.124
cosh,-inf,inf
cosh,nan,nan
+cosh,x,__failed__
tanh,1,0.762
tanh,-1,-0.762
tanh,0,0.00
@@ -515,6 +527,7 @@
tanh,1L%2L<:3L%4L,0.495<:0.668
tanh,-inf,-1.00
tanh,nan,nan
+tanh,x,__failed__
asinh,1,0.881
asinh,-1,-0.881
asinh,0,0.00
@@ -538,6 +551,7 @@
asinh,1L%2L<:3L%4L,0.377+:0.324
asinh,-inf,-inf
asinh,nan,nan
+asinh,x,__failed__
acosh,1,0.00
acosh,-1,nan
acosh,0,nan
@@ -561,6 +575,7 @@
acosh,1L%2L<:3L%4L,0.355+:1.22
acosh,-inf,nan
acosh,nan,nan
+acosh,x,__failed__
atanh,1,inf
atanh,-1,-inf
atanh,0,0.00
@@ -584,6 +599,7 @@
atanh,1L%2L<:3L%4L,0.335+:0.369
atanh,-inf,nan
atanh,nan,nan
+atanh,x,__failed__
abs,1,1
abs,-1,1
abs,0,0
@@ -607,6 +623,7 @@
abs,1L%2L<:3L%4L,1L%2L
abs,-inf,inf
abs,nan,nan
+abs,x,__failed__
re,1,1
re,-1,-1
re,0,0
@@ -630,6 +647,7 @@
re,1L%2L<:3L%4L,0.341
re,-inf,-inf
re,nan,nan
+re,x,__failed__
im,1,0
im,-1,0
im,0,0
@@ -653,6 +671,7 @@
im,1L%2L<:3L%4L,0.366
im,-inf,0.00
im,nan,0.00
+im,x,__failed__
arg,1,0.00
arg,-1,3.14
arg,0,0.00
@@ -676,6 +695,7 @@
arg,1L%2L<:3L%4L,3L%4L
arg,-inf,3.14
arg,nan,nan
+arg,x,__failed__
conj,1,1
conj,-1,-1
conj,0,0
@@ -699,6 +719,7 @@
conj,1L%2L<:3L%4L,1L%2L<:(-3L)%4L
conj,-inf,-inf
conj,nan,nan
+conj,x,__failed__
rect,1,1+:0
rect,-1,-1+:0
rect,0,0+:0
@@ -722,6 +743,7 @@
rect,1L%2L<:3L%4L,0.366+:0.341
rect,-inf,-inf+:0.00
rect,nan,nan+:0.00
+rect,x,__failed__
polar,1,1<:0
polar,-1,1<:3.14
polar,0,0<:0
@@ -745,6 +767,7 @@
polar,1L%2L<:3L%4L,1L%2L<:3L%4L
polar,-inf,inf<:3.14
polar,nan,nan<:0.00
+polar,x,__failed__
cis,1,0.540+:0.841
cis,-1,0.540+:-0.841
cis,0,1.00+:0.00
@@ -768,6 +791,7 @@
cis,1L%2L<:3L%4L,__failed__
cis,-inf,nan+:nan
cis,nan,nan+:nan
+cis,x,__failed__
ceil,1,1
ceil,-1,-1
ceil,0,0
@@ -791,6 +815,7 @@
ceil,1L%2L<:3L%4L,__failed__
ceil,-inf,-inf
ceil,nan,nan
+ceil,x,__failed__
floor,1,1
floor,-1,-1
floor,0,0
@@ -814,6 +839,7 @@
floor,1L%2L<:3L%4L,__failed__
floor,-inf,-inf
floor,nan,nan
+floor,x,__failed__
round,1,1
round,-1,-1
round,0,0
@@ -837,6 +863,7 @@
round,1L%2L<:3L%4L,__failed__
round,-inf,-inf
round,nan,nan
+round,x,__failed__
frac,1,0
frac,-1,0
frac,0,0
@@ -860,6 +887,7 @@
frac,1L%2L<:3L%4L,__failed__
frac,-inf,nan
frac,nan,nan
+frac,x,__failed__
complexp,1,0
complexp,-1,0
complexp,0,0
@@ -883,6 +911,7 @@
complexp,1L%2L<:3L%4L,1
complexp,-inf,0
complexp,nan,0
+complexp,x,0
realp,1,1
realp,-1,1
realp,0,1
@@ -906,6 +935,7 @@
realp,1L%2L<:3L%4L,0
realp,-inf,1
realp,nan,1
+realp,x,0
rationalp,1,0
rationalp,-1,0
rationalp,0,0
@@ -929,6 +959,7 @@
rationalp,1L%2L<:3L%4L,0
rationalp,-inf,0
rationalp,nan,0
+rationalp,x,0
numberp,1,1
numberp,-1,1
numberp,0,1
@@ -952,6 +983,7 @@
numberp,1L%2L<:3L%4L,1
numberp,-inf,1
numberp,nan,1
+numberp,x,0
exactp,1,1
exactp,-1,1
exactp,0,1
@@ -975,6 +1007,7 @@
exactp,1L%2L<:3L%4L,0
exactp,-inf,0
exactp,nan,0
+exactp,x,0
inexactp,1,0
inexactp,-1,0
inexactp,0,0
@@ -998,6 +1031,7 @@
inexactp,1L%2L<:3L%4L,1
inexactp,-inf,1
inexactp,nan,1
+inexactp,x,0
infp,1,0
infp,-1,0
infp,0,0
@@ -1021,6 +1055,7 @@
infp,1L%2L<:3L%4L,0
infp,-inf,1
infp,nan,0
+infp,x,0
nanp,1,0
nanp,-1,0
nanp,0,0
@@ -1044,6 +1079,7 @@
nanp,1L%2L<:3L%4L,0
nanp,-inf,0
nanp,nan,1
+nanp,x,0
*** BINARY ***
(+),1,1,2
(+),1,-1,0
@@ -1068,6 +1104,7 @@
(+),1,1L%2L<:3L%4L,1.37+:0.341
(+),1,-inf,-inf
(+),1,nan,nan
+(+),1,x,__failed__
(+),-1,1,0
(+),-1,-1,-2
(+),-1,0,-1
@@ -1091,6 +1128,7 @@
(+),-1,1L%2L<:3L%4L,-0.634+:0.341
(+),-1,-inf,-inf
(+),-1,nan,nan
+(+),-1,x,__failed__
(+),0,1,1
(+),0,-1,-1
(+),0,0,0
@@ -1114,6 +1152,7 @@
(+),0,1L%2L<:3L%4L,0.366+:0.341
(+),0,-inf,-inf
(+),0,nan,nan
+(+),0,x,__failed__
(+),0.00,1,1.00
(+),0.00,-1,-1.00
(+),0.00,0,0.00
@@ -1137,6 +1176,7 @@
(+),0.00,1L%2L<:3L%4L,0.366+:0.341
(+),0.00,-inf,-inf
(+),0.00,nan,nan
+(+),0.00,x,__failed__
(+),1.20,1,2.20
(+),1.20,-1,0.200
(+),1.20,0,1.20
@@ -1160,6 +1200,7 @@
(+),1.20,1L%2L<:3L%4L,1.57+:0.341
(+),1.20,-inf,-inf
(+),1.20,nan,nan
+(+),1.20,x,__failed__
(+),-1.20,1,-0.200
(+),-1.20,-1,-2.20
(+),-1.20,0,-1.20
@@ -1183,6 +1224,7 @@
(+),-1.20,1L%2L<:3L%4L,-0.834+:0.341
(+),-1.20,-inf,-inf
(+),-1.20,nan,nan
+(+),-1.20,x,__failed__
(+),1L%3L,1,4L%3L
(+),1L%3L,-1,(-2L)%3L
(+),1L%3L,0,1L%3L
@@ -1206,6 +1248,7 @@
(+),1L%3L,1L%2L<:3L%4L,0.699+:0.341
(+),1L%3L,-inf,-inf
(+),1L%3L,nan,nan
+(+),1L%3L,x,__failed__
(+),(-1L)%4L,1,3L%4L
(+),(-1L)%4L,-1,(-5L)%4L
(+),(-1L)%4L,0,(-1L)%4L
@@ -1229,6 +1272,7 @@
(+),(-1L)%4L,1L%2L<:3L%4L,0.116+:0.341
(+),(-1L)%4L,-inf,-inf
(+),(-1L)%4L,nan,nan
+(+),(-1L)%4L,x,__failed__
(+),1+:2,1,2+:2
(+),1+:2,-1,0+:2
(+),1+:2,0,1+:2
@@ -1252,6 +1296,7 @@
(+),1+:2,1L%2L<:3L%4L,1.37+:2.34
(+),1+:2,-inf,-inf+:2
(+),1+:2,nan,nan+:2
+(+),1+:2,x,__failed__
(+),-1+:2,1,0+:2
(+),-1+:2,-1,-2+:2
(+),-1+:2,0,-1+:2
@@ -1275,6 +1320,7 @@
(+),-1+:2,1L%2L<:3L%4L,-0.634+:2.34
(+),-1+:2,-inf,-inf+:2
(+),-1+:2,nan,nan+:2
+(+),-1+:2,x,__failed__
(+),1+:-2,1,2+:-2
(+),1+:-2,-1,0+:-2
(+),1+:-2,0,1+:-2
@@ -1298,6 +1344,7 @@
(+),1+:-2,1L%2L<:3L%4L,1.37+:-1.66
(+),1+:-2,-inf,-inf+:-2
(+),1+:-2,nan,nan+:-2
+(+),1+:-2,x,__failed__
(+),-1.20+:4.30,1,-0.200+:4.30
(+),-1.20+:4.30,-1,-2.20+:4.30
(+),-1.20+:4.30,0,-1.20+:4.30
@@ -1321,6 +1368,7 @@
(+),-1.20+:4.30,1L%2L<:3L%4L,-0.834+:4.64
(+),-1.20+:4.30,-inf,-inf+:4.30
(+),-1.20+:4.30,nan,nan+:4.30
+(+),-1.20+:4.30,x,__failed__
(+),1.20+:-4.30,1,2.20+:-4.30
(+),1.20+:-4.30,-1,0.200+:-4.30
(+),1.20+:-4.30,0,1.20+:-4.30
@@ -1344,6 +1392,7 @@
(+),1.20+:-4.30,1L%2L<:3L%4L,1.57+:-3.96
(+),1.20+:-4.30,-inf,-inf+:-4.30
(+),1.20+:-4.30,nan,nan+:-4.30
+(+),1.20+:-4.30,x,__failed__
(+),1L%2L+:1,1,3L%2L+:1
(+),1L%2L+:1,-1,(-1L)%2L+:1
(+),1L%2L+:1,0,1L%2L+:1
@@ -1367,6 +1416,7 @@
(+),1L%2L+:1,1L%2L<:3L%4L,0.866+:1.34
(+),1L%2L+:1,-inf,-inf+:1
(+),1L%2L+:1,nan,nan+:1
+(+),1L%2L+:1,x,__failed__
(+),1L%2L+:3L%4L,1,3L%2L+:3L%4L
(+),1L%2L+:3L%4L,-1,(-1L)%2L+:3L%4L
(+),1L%2L+:3L%4L,0,1L%2L+:3L%4L
@@ -1390,6 +1440,7 @@
(+),1L%2L+:3L%4L,1L%2L<:3L%4L,0.866+:1.09
(+),1L%2L+:3L%4L,-inf,-inf+:3L%4L
(+),1L%2L+:3L%4L,nan,nan+:3L%4L
+(+),1L%2L+:3L%4L,x,__failed__
(+),3<:1,1,2.62+:2.52
(+),3<:1,-1,0.621+:2.52
(+),3<:1,0,1.62+:2.52
@@ -1413,6 +1464,7 @@
(+),3<:1,1L%2L<:3L%4L,3.49<:0.965
(+),3<:1,-inf,-inf+:2.52
(+),3<:1,nan,nan+:2.52
+(+),3<:1,x,__failed__
(+),3<:-2.14,1,-0.621+:-2.52
(+),3<:-2.14,-1,-2.62+:-2.52
(+),3<:-2.14,0,-1.62+:-2.52
@@ -1436,6 +1488,7 @@
(+),3<:-2.14,1L%2L<:3L%4L,2.52<:-2.09
(+),3<:-2.14,-inf,-inf+:-2.52
(+),3<:-2.14,nan,nan+:-2.52
+(+),3<:-2.14,x,__failed__
(+),3.00<:-3,1,-1.97+:-0.423
(+),3.00<:-3,-1,-3.97+:-0.423
(+),3.00<:-3,0,-2.97+:-0.423
@@ -1459,6 +1512,7 @@
(+),3.00<:-3,1L%2L<:3L%4L,2.61<:-3.11
(+),3.00<:-3,-inf,-inf+:-0.423
(+),3.00<:-3,nan,nan+:-0.423
+(+),3.00<:-3,x,__failed__
(+),3.10<:2.50,1,-1.48+:1.86
(+),3.10<:2.50,-1,-3.48+:1.86
(+),3.10<:2.50,0,-2.48+:1.86
@@ -1482,6 +1536,7 @@
(+),3.10<:2.50,1L%2L<:3L%4L,3.05<:2.34
(+),3.10<:2.50,-inf,-inf+:1.86
(+),3.10<:2.50,nan,nan+:1.86
+(+),3.10<:2.50,x,__failed__
(+),2L%3L<:2,1,0.723+:0.606
(+),2L%3L<:2,-1,-1.28+:0.606
(+),2L%3L<:2,0,-0.277+:0.606
@@ -1505,6 +1560,7 @@
(+),2L%3L<:2,1L%2L<:3L%4L,0.951<:1.48
(+),2L%3L<:2,-inf,-inf+:0.606
(+),2L%3L<:2,nan,nan+:0.606
+(+),2L%3L<:2,x,__failed__
(+),1L%2L<:3L%4L,1,1.37+:0.341
(+),1L%2L<:3L%4L,-1,-0.634+:0.341
(+),1L%2L<:3L%4L,0,0.366+:0.341
@@ -1528,6 +1584,7 @@
(+),1L%2L<:3L%4L,1L%2L<:3L%4L,1.00<:0.750
(+),1L%2L<:3L%4L,-inf,-inf+:0.341
(+),1L%2L<:3L%4L,nan,nan+:0.341
+(+),1L%2L<:3L%4L,x,__failed__
(+),-inf,1,-inf
(+),-inf,-1,-inf
(+),-inf,0,-inf
@@ -1551,6 +1608,7 @@
(+),-inf,1L%2L<:3L%4L,-inf+:0.341
(+),-inf,-inf,-inf
(+),-inf,nan,nan
+(+),-inf,x,__failed__
(+),nan,1,nan
(+),nan,-1,nan
(+),nan,0,nan
@@ -1574,6 +1632,31 @@
(+),nan,1L%2L<:3L%4L,nan+:0.341
(+),nan,-inf,nan
(+),nan,nan,nan
+(+),nan,x,__failed__
+(+),x,1,__failed__
+(+),x,-1,__failed__
+(+),x,0,__failed__
+(+),x,0.00,__failed__
+(+),x,1.20,__failed__
+(+),x,-1.20,__failed__
+(+),x,1L%3L,__failed__
+(+),x,(-1L)%4L,__failed__
+(+),x,1+:2,__failed__
+(+),x,-1+:2,__failed__
+(+),x,1+:-2,__failed__
+(+),x,-1.20+:4.30,__failed__
+(+),x,1.20+:-4.30,__failed__
+(+),x,1L%2L+:1,__failed__
+(+),x,1L%2L+:3L%4L,__failed__
+(+),x,3<:1,__failed__
+(+),x,3<:-2.14,__failed__
+(+),x,3.00<:-3,__failed__
+(+),x,3.10<:2.50,__failed__
+(+),x,2L%3L<:2,__failed__
+(+),x,1L%2L<:3L%4L,__failed__
+(+),x,-inf,__failed__
+(+),x,nan,__failed__
+(+),x,x,__failed__
(-),1,1,0
(-),1,-1,2
(-),1,0,1
@@ -1597,6 +1680,7 @@
(-),1,1L%2L<:3L%4L,0.634+:-0.341
(-),1,-inf,inf
(-),1,nan,nan
+(-),1,x,__failed__
(-),-1,1,-2
(-),-1,-1,0
(-),-1,0,-1
@@ -1620,6 +1704,7 @@
(-),-1,1L%2L<:3L%4L,-1.37+:-0.341
(-),-1,-inf,inf
(-),-1,nan,nan
+(-),-1,x,__failed__
(-),0,1,-1
(-),0,-1,1
(-),0,0,0
@@ -1643,6 +1728,7 @@
(-),0,1L%2L<:3L%4L,-0.366+:-0.341
(-),0,-inf,inf
(-),0,nan,nan
+(-),0,x,__failed__
(-),0.00,1,-1.00
(-),0.00,-1,1.00
(-),0.00,0,0.00
@@ -1666,6 +1752,7 @@
(-),0.00,1L%2L<:3L%4L,-0.366+:-0.341
(-),0.00,-inf,inf
(-),0.00,nan,nan
+(-),0.00,x,__failed__
(-),1.20,1,0.200
(-),1.20,-1,2.20
(-),1.20,0,1.20
@@ -1689,6 +1776,7 @@
(-),1.20,1L%2L<:3L%4L,0.834+:-0.341
(-),1.20,-inf,inf
(-),1.20,nan,nan
+(-),1.20,x,__failed__
(-),-1.20,1,-2.20
(-),-1.20,-1,-0.200
(-),-1.20,0,-1.20
@@ -1712,6 +1800,7 @@
(-),-1.20,1L%2L<:3L%4L,-1.57+:-0.341
(-),-1.20,-inf,inf
(-),-1.20,nan,nan
+(-),-1.20,x,__failed__
(-),1L%3L,1,(-2L)%3L
(-),1L%3L,-1,4L%3L
(-),1L%3L,0,1L%3L
@@ -1735,6 +1824,7 @@
(-),1L%3L,1L%2L<:3L%4L,-0.0325+:-0.341
(-),1L%3L,-inf,inf
(-),1L%3L,nan,nan
+(-),1L%3L,x,__failed__
(-),(-1L)%4L,1,(-5L)%4L
(-),(-1L)%4L,-1,3L%4L
(-),(-1L)%4L,0,(-1L)%4L
@@ -1758,6 +1848,7 @@
(-),(-1L)%4L,1L%2L<:3L%4L,-0.616+:-0.341
(-),(-1L)%4L,-inf,inf
(-),(-1L)%4L,nan,nan
+(-),(-1L)%4L,x,__failed__
(-),1+:2,1,0+:2
(-),1+:2,-1,2+:2
(-),1+:2,0,1+:2
@@ -1781,6 +1872,7 @@
(-),1+:2,1L%2L<:3L%4L,0.634+:1.66
(-),1+:2,-inf,inf+:2
(-),1+:2,nan,nan+:2
+(-),1+:2,x,__failed__
(-),-1+:2,1,-2+:2
(-),-1+:2,-1,0+:2
(-),-1+:2,0,-1+:2
@@ -1804,6 +1896,7 @@
(-),-1+:2,1L%2L<:3L%4L,-1.37+:1.66
(-),-1+:2,-inf,inf+:2
(-),-1+:2,nan,nan+:2
+(-),-1+:2,x,__failed__
(-),1+:-2,1,0+:-2
(-),1+:-2,-1,2+:-2
(-),1+:-2,0,1+:-2
@@ -1827,6 +1920,7 @@
(-),1+:-2,1L%2L<:3L%4L,0.634+:-2.34
(-),1+:-2,-inf,inf+:-2
(-),1+:-2,nan,nan+:-2
+(-),1+:-2,x,__failed__
(-),-1.20+:4.30,1,-2.20+:4.30
(-),-1.20+:4.30,-1,-0.200+:4.30
(-),-1.20+:4.30,0,-1.20+:4.30
@@ -1850,6 +1944,7 @@
(-),-1.20+:4.30,1L%2L<:3L%4L,-1.57+:3.96
(-),-1.20+:4.30,-inf,inf+:4.30
(-),-1.20+:4.30,nan,nan+:4.30
+(-),-1.20+:4.30,x,__failed__
(-),1.20+:-4.30,1,0.200+:-4.30
(-),1.20+:-4.30,-1,2.20+:-4.30
(-),1.20+:-4.30,0,1.20+:-4.30
@@ -1873,6 +1968,7 @@
(-),1.20+:-4.30,1L%2L<:3L%4L,0.834+:-4.64
(-),1.20+:-4.30,-inf,inf+:-4.30
(-),1.20+:-4.30,nan,nan+:-4.30
+(-),1.20+:-4.30,x,__failed__
(-),1L%2L+:1,1,(-1L)%2L+:1
(-),1L%2L+:1,-1,3L%2L+:1
(-),1L%2L+:1,0,1L%2L+:1
@@ -1896,6 +1992,7 @@
(-),1L%2L+:1,1L%2L<:3L%4L,0.134+:0.659
(-),1L%2L+:1,-inf,inf+:1
(-),1L%2L+:1,nan,nan+:1
+(-),1L%2L+:1,x,__failed__
(-),1L%2L+:3L%4L,1,(-1L)%2L+:3L%4L
(-),1L%2L+:3L%4L,-1,3L%2L+:3L%4L
(-),1L%2L+:3L%4L,0,1L%2L+:3L%4L
@@ -1919,6 +2016,7 @@
(-),1L%2L+:3L%4L,1L%2L<:3L%4L,0.134+:0.409
(-),1L%2L+:3L%4L,-inf,inf+:3L%4L
(-),1L%2L+:3L%4L,nan,nan+:3L%4L
+(-),1L%2L+:3L%4L,x,__failed__
(-),3<:1,1,0.621+:2.52
(-),3<:1,-1,2.62+:2.52
(-),3<:1,0,1.62+:2.52
@@ -1942,6 +2040,7 @@
(-),3<:1,1L%2L<:3L%4L,2.52<:1.05
(-),3<:1,-inf,inf+:2.52
(-),3<:1,nan,nan+:2.52
+(-),3<:1,x,__failed__
(-),3<:-2.14,1,-2.62+:-2.52
(-),3<:-2.14,-1,-0.621+:-2.52
(-),3<:-2.14,0,-1.62+:-2.52
@@ -1965,6 +2064,7 @@
(-),3<:-2.14,1L%2L<:3L%4L,3.49<:-2.18
(-),3<:-2.14,-inf,inf+:-2.52
(-),3<:-2.14,nan,nan+:-2.52
+(-),3<:-2.14,x,__failed__
(-),3.00<:-3,1,-3.97+:-0.423
(-),3.00<:-3,-1,-1.97+:-0.423
(-),3.00<:-3,0,-2.97+:-0.423
@@ -1988,6 +2088,7 @@
(-),3.00<:-3,1L%2L<:3L%4L,3.42<:-2.92
(-),3.00<:-3,-inf,inf+:-0.423
(-),3.00<:-3,nan,nan+:-0.423
+(-),3.00<:-3,x,__failed__
(-),3.10<:2.50,1,-3.48+:1.86
(-),3.10<:2.50,-1,-1.48+:1.86
(-),3.10<:2.50,0,-2.48+:1.86
@@ -2011,6 +2112,7 @@
(-),3.10<:2.50,1L%2L<:3L%4L,3.23<:2.65
(-),3.10<:2.50,-inf,inf+:1.86
(-),3.10<:2.50,nan,nan+:1.86
+(-),3.10<:2.50,x,__failed__
(-),2L%3L<:2,1,-1.28+:0.606
(-),2L%3L<:2,-1,0.723+:0.606
(-),2L%3L<:2,0,-0.277+:0.606
@@ -2034,6 +2136,7 @@
(-),2L%3L<:2,1L%2L<:3L%4L,0.696<:2.75
(-),2L%3L<:2,-inf,inf+:0.606
(-),2L%3L<:2,nan,nan+:0.606
+(-),2L%3L<:2,x,__failed__
(-),1L%2L<:3L%4L,1,-0.634+:0.341
(-),1L%2L<:3L%4L,-1,1.37+:0.341
(-),1L%2L<:3L%4L,0,0.366+:0.341
@@ -2057,6 +2160,7 @@
(-),1L%2L<:3L%4L,1L%2L<:3L%4L,0.00<:0.00
(-),1L%2L<:3L%4L,-inf,inf+:0.341
(-),1L%2L<:3L%4L,nan,nan+:0.341
+(-),1L%2L<:3L%4L,x,__failed__
(-),-inf,1,-inf
(-),-inf,-1,-inf
(-),-inf,0,-inf
@@ -2080,6 +2184,7 @@
(-),-inf,1L%2L<:3L%4L,-inf+:-0.341
(-),-inf,-inf,nan
(-),-inf,nan,nan
+(-),-inf,x,__failed__
(-),nan,1,nan
(-),nan,-1,nan
(-),nan,0,nan
@@ -2103,6 +2208,31 @@
(-),nan,1L%2L<:3L%4L,nan+:-0.341
(-),nan,-inf,nan
(-),nan,nan,nan
+(-),nan,x,__failed__
+(-),x,1,__failed__
+(-),x,-1,__failed__
+(-),x,0,__failed__
+(-),x,0.00,__failed__
+(-),x,1.20,__failed__
+(-),x,-1.20,__failed__
+(-),x,1L%3L,__failed__
+(-),x,(-1L)%4L,__failed__
+(-),x,1+:2,__failed__
+(-),x,-1+:2,__failed__
+(-),x,1+:-2,__failed__
+(-),x,-1.20+:4.30,__failed__
+(-),x,1.20+:-4.30,__failed__
+(-),x,1L%2L+:1,__failed__
+(-),x,1L%2L+:3L%4L,__failed__
+(-),x,3<:1,__failed__
+(-),x,3<:-2.14,__failed__
+(-),x,3.00<:-3,__failed__
+(-),x,3.10<:2.50,__failed__
+(-),x,2L%3L<:2,__failed__
+(-),x,1L%2L<:3L%4L,__failed__
+(-),x,-inf,__failed__
+(-),x,nan,__failed__
+(-),x,x,__failed__
(*),1,1,1
(*),1,-1,-1
(*),1,0,0
@@ -2126,6 +2256,7 @@
(*),1,1L%2L<:3L%4L,1L%2L<:3L%4L
(*),1,-inf,-inf
(*),1,nan,nan
+(*),1,x,__failed__
(*),-1,1,-1
(*),-1,-1,1
(*),-1,0,0
@@ -2149,6 +2280,7 @@
(*),-1,1L%2L<:3L%4L,1L%2L<:-2.39
(*),-1,-inf,inf
(*),-1,nan,nan
+(*),-1,x,__failed__
(*),0,1,0
(*),0,-1,0
(*),0,0,0
@@ -2172,6 +2304,7 @@
(*),0,1L%2L<:3L%4L,0L%1L<:3L%4L
(*),0,-inf,nan
(*),0,nan,nan
+(*),0,x,__failed__
(*),0.00,1,0.00
(*),0.00,-1,-0.00
(*),0.00,0,0.00
@@ -2195,6 +2328,7 @@
(*),0.00,1L%2L<:3L%4L,0.00<:3L%4L
(*),0.00,-inf,nan
(*),0.00,nan,nan
+(*),0.00,x,__failed__
(*),1.20,1,1.20
(*),1.20,-1,-1.20
(*),1.20,0,0.00
@@ -2218,6 +2352,7 @@
(*),1.20,1L%2L<:3L%4L,0.600<:3L%4L
(*),1.20,-inf,-inf
(*),1.20,nan,nan
+(*),1.20,x,__failed__
(*),-1.20,1,-1.20
(*),-1.20,-1,1.20
(*),-1.20,0,-0.00
@@ -2241,6 +2376,7 @@
(*),-1.20,1L%2L<:3L%4L,0.600<:-2.39
(*),-1.20,-inf,inf
(*),-1.20,nan,nan
+(*),-1.20,x,__failed__
(*),1L%3L,1,1L%3L
(*),1L%3L,-1,(-1L)%3L
(*),1L%3L,0,0L%1L
@@ -2264,6 +2400,7 @@
(*),1L%3L,1L%2L<:3L%4L,1L%6L<:3L%4L
(*),1L%3L,-inf,-inf
(*),1L%3L,nan,nan
+(*),1L%3L,x,__failed__
(*),(-1L)%4L,1,(-1L)%4L
(*),(-1L)%4L,-1,1L%4L
(*),(-1L)%4L,0,0L%1L
@@ -2287,6 +2424,7 @@
(*),(-1L)%4L,1L%2L<:3L%4L,1L%8L<:-2.39
(*),(-1L)%4L,-inf,inf
(*),(-1L)%4L,nan,nan
+(*),(-1L)%4L,x,__failed__
(*),1+:2,1,1+:2
(*),1+:2,-1,-1+:-2
(*),1+:2,0,0+:0
@@ -2310,6 +2448,7 @@
(*),1+:2,1L%2L<:3L%4L,-0.316+:1.07
(*),1+:2,-inf,-inf+:-inf
(*),1+:2,nan,nan+:nan
+(*),1+:2,x,__failed__
(*),-1+:2,1,-1+:2
(*),-1+:2,-1,1+:-2
(*),-1+:2,0,0+:0
@@ -2333,6 +2472,7 @@
(*),-1+:2,1L%2L<:3L%4L,-1.05+:0.391
(*),-1+:2,-inf,inf+:-inf
(*),-1+:2,nan,nan+:nan
+(*),-1+:2,x,__failed__
(*),1+:-2,1,1+:-2
(*),1+:-2,-1,-1+:2
(*),1+:-2,0,0+:0
@@ -2356,6 +2496,7 @@
(*),1+:-2,1L%2L<:3L%4L,1.05+:-0.391
(*),1+:-2,-inf,-inf+:inf
(*),1+:-2,nan,nan+:nan
+(*),1+:-2,x,__failed__
(*),-1.20+:4.30,1,-1.20+:4.30
(*),-1.20+:4.30,-1,1.20+:-4.30
(*),-1.20+:4.30,0,-0.00+:0.00
@@ -2379,6 +2520,7 @@
(*),-1.20+:4.30,1L%2L<:3L%4L,-1.90+:1.16
(*),-1.20+:4.30,-inf,inf+:-inf
(*),-1.20+:4.30,nan,nan+:nan
+(*),-1.20+:4.30,x,__failed__
(*),1.20+:-4.30,1,1.20+:-4.30
(*),1.20+:-4.30,-1,-1.20+:4.30
(*),1.20+:-4.30,0,0.00+:-0.00
@@ -2402,6 +2544,7 @@
(*),1.20+:-4.30,1L%2L<:3L%4L,1.90+:-1.16
(*),1.20+:-4.30,-inf,-inf+:inf
(*),1.20+:-4.30,nan,nan+:nan
+(*),1.20+:-4.30,x,__failed__
(*),1L%2L+:1,1,1L%2L+:1
(*),1L%2L+:1,-1,(-1L)%2L+:-1
(*),1L%2L+:1,0,0L%1L+:0
@@ -2425,6 +2568,7 @@
(*),1L%2L+:1,1L%2L<:3L%4L,-0.158+:0.536
(*),1L%2L+:1,-inf,-inf+:-inf
(*),1L%2L+:1,nan,nan+:nan
+(*),1L%2L+:1,x,__failed__
(*),1L%2L+:3L%4L,1,1L%2L+:3L%4L
(*),1L%2L+:3L%4L,-1,(-1L)%2L+:(-3L)%4L
(*),1L%2L+:3L%4L,0,0L%1L+:0L%1L
@@ -2448,6 +2592,7 @@
(*),1L%2L+:3L%4L,1L%2L<:3L%4L,-0.0727+:0.445
(*),1L%2L+:3L%4L,-inf,-inf+:-inf
(*),1L%2L+:3L%4L,nan,nan+:nan
+(*),1L%2L+:3L%4L,x,__failed__
(*),3<:1,1,3<:1
(*),3<:1,-1,3<:-2.14
(*),3<:1,0,0<:1
@@ -2471,6 +2616,7 @@
(*),3<:1,1L%2L<:3L%4L,3L%2L<:7L%4L
(*),3<:1,-inf,inf<:-2.14
(*),3<:1,nan,nan<:1
+(*),3<:1,x,__failed__
(*),3<:-2.14,1,3<:-2.14
(*),3<:-2.14,-1,3<:1.00
(*),3<:-2.14,0,0<:-2.14
@@ -2494,6 +2640,7 @@
(*),3<:-2.14,1L%2L<:3L%4L,3L%2L<:-1.39
(*),3<:-2.14,-inf,inf<:1.00
(*),3<:-2.14,nan,nan<:-2.14
+(*),3<:-2.14,x,__failed__
(*),3.00<:-3,1,3.00<:-3
(*),3.00<:-3,-1,3.00<:0.142
(*),3.00<:-3,0,0.00<:-3
@@ -2517,6 +2664,7 @@
(*),3.00<:-3,1L%2L<:3L%4L,1.50<:(-9L)%4L
(*),3.00<:-3,-inf,inf<:0.142
(*),3.00<:-3,nan,nan<:-3
+(*),3.00<:-3,x,__failed__
(*),3.10<:2.50,1,3.10<:2.50
(*),3.10<:2.50,-1,3.10<:-0.642
(*),3.10<:2.50,0,0.00<:2.50
@@ -2540,6 +2688,7 @@
(*),3.10<:2.50,1L%2L<:3L%4L,1.55<:-3.03
(*),3.10<:2.50,-inf,inf<:-0.642
(*),3.10<:2.50,nan,nan<:2.50
+(*),3.10<:2.50,x,__failed__
(*),2L%3L<:2,1,2L%3L<:2
(*),2L%3L<:2,-1,2L%3L<:-1.14
(*),2L%3L<:2,0,0L%1L<:2
@@ -2563,6 +2712,7 @@
(*),2L%3L<:2,1L%2L<:3L%4L,1L%3L<:11L%4L
(*),2L%3L<:2,-inf,inf<:-1.14
(*),2L%3L<:2,nan,nan<:2
+(*),2L%3L<:2,x,__failed__
(*),1L%2L<:3L%4L,1,1L%2L<:3L%4L
(*),1L%2L<:3L%4L,-1,1L%2L<:-2.39
(*),1L%2L<:3L%4L,0,0L%1L<:3L%4L
@@ -2586,6 +2736,7 @@
(*),1L%2L<:3L%4L,1L%2L<:3L%4L,1L%4L<:3L%2L
(*),1L%2L<:3L%4L,-inf,inf<:-2.39
(*),1L%2L<:3L%4L,nan,nan<:3L%4L
+(*),1L%2L<:3L%4L,x,__failed__
(*),-inf,1,-inf
(*),-inf,-1,inf
(*),-inf,0,nan
@@ -2609,6 +2760,7 @@
(*),-inf,1L%2L<:3L%4L,inf<:-2.39
(*),-inf,-inf,inf
(*),-inf,nan,nan
+(*),-inf,x,__failed__
(*),nan,1,nan
(*),nan,-1,nan
(*),nan,0,nan
@@ -2632,6 +2784,31 @@
(*),nan,1L%2L<:3L%4L,nan<:3L%4L
(*),nan,-inf,nan
(*),nan,nan,nan
+(*),nan,x,__failed__
+(*),x,1,__failed__
+(*),x,-1,__failed__
+(*),x,0,__failed__
+(*),x,0.00,__failed__
+(*),x,1.20,__failed__
+(*),x,-1.20,__failed__
+(*),x,1L%3L,__failed__
+(*),x,(-1L)%4L,__failed__
+(*),x,1+:2,__failed__
+(*),x,-1+:2,__failed__
+(*),x,1+:-2,__failed__
+(*),x,-1.20+:4.30,__failed__
+(*),x,1.20+:-4.30,__failed__
+(*),x,1L%2L+:1,__failed__
+(*),x,1L%2L+:3L%4L,__failed__
+(*),x,3<:1,__failed__
+(*),x,3<:-2.14,__failed__
+(*),x,3.00<:-3,__failed__
+(*),x,3.10<:2.50,__failed__
+(*),x,2L%3L<:2,__failed__
+(*),x,1L%2L<:3L%4L,__failed__
+(*),x,-inf,__failed__
+(*),x,nan,__failed__
+(*),x,x,__failed__
(/),1,1,1.00
(/),1,-1,-1.00
(/),1,0,inf
@@ -2655,6 +2832,7 @@
(/),1,1L%2L<:3L%4L,2.00<:(-3L)%4L
(/),1,-inf,-0.00
(/),1,nan,nan
+(/),1,x,__failed__
(/),-1,1,-1.00
(/),-1,-1,1.00
(/),-1,0,-inf
@@ -2678,6 +2856,7 @@
(/),-1,1L%2L<:3L%4L,2.00<:2.39
(/),-1,-inf,0.00
(/),-1,nan,nan
+(/),-1,x,__failed__
(/),0,1,0.00
(/),0,-1,-0.00
(/),0,0,nan
@@ -2701,6 +2880,7 @@
(/),0,1L%2L<:3L%4L,0.00<:(-3L)%4L
(/),0,-inf,-0.00
(/),0,nan,nan
+(/),0,x,__failed__
(/),0.00,1,0.00
(/),0.00,-1,-0.00
(/),0.00,0,nan
@@ -2724,6 +2904,7 @@
(/),0.00,1L%2L<:3L%4L,0.00<:(-3L)%4L
(/),0.00,-inf,-0.00
(/),0.00,nan,nan
+(/),0.00,x,__failed__
(/),1.20,1,1.20
(/),1.20,-1,-1.20
(/),1.20,0,inf
@@ -2747,6 +2928,7 @@
(/),1.20,1L%2L<:3L%4L,2.40<:(-3L)%4L
(/),1.20,-inf,-0.00
(/),1.20,nan,nan
+(/),1.20,x,__failed__
(/),-1.20,1,-1.20
(/),-1.20,-1,1.20
(/),-1.20,0,-inf
@@ -2770,6 +2952,7 @@
(/),-1.20,1L%2L<:3L%4L,2.40<:2.39
(/),-1.20,-inf,0.00
(/),-1.20,nan,nan
+(/),-1.20,x,__failed__
(/),1L%3L,1,0.333
(/),1L%3L,-1,-0.333
(/),1L%3L,0,inf
@@ -2793,6 +2976,7 @@
(/),1L%3L,1L%2L<:3L%4L,0.667<:(-3L)%4L
(/),1L%3L,-inf,-0.00
(/),1L%3L,nan,nan
+(/),1L%3L,x,__failed__
(/),(-1L)%4L,1,-0.250
(/),(-1L)%4L,-1,0.250
(/),(-1L)%4L,0,-inf
@@ -2816,6 +3000,7 @@
(/),(-1L)%4L,1L%2L<:3L%4L,0.500<:2.39
(/),(-1L)%4L,-inf,0.00
(/),(-1L)%4L,nan,nan
+(/),(-1L)%4L,x,__failed__
(/),1+:2,1,1.00+:2.00
(/),1+:2,-1,-1.00+:-2.00
(/),1+:2,0,inf+:inf
@@ -2839,6 +3024,7 @@
(/),1+:2,1L%2L<:3L%4L,4.19+:1.56
(/),1+:2,-inf,-0.00+:-0.00
(/),1+:2,nan,nan+:nan
+(/),1+:2,x,__failed__
(/),-1+:2,1,-1.00+:2.00
(/),-1+:2,-1,1.00+:-2.00
(/),-1+:2,0,-inf+:inf
@@ -2862,6 +3048,7 @@
(/),-1+:2,1L%2L<:3L%4L,1.26+:4.29
(/),-1+:2,-inf,0.00+:-0.00
(/),-1+:2,nan,nan+:nan
+(/),-1+:2,x,__failed__
(/),1+:-2,1,1.00+:-2.00
(/),1+:-2,-1,-1.00+:2.00
(/),1+:-2,0,inf+:-inf
@@ -2885,6 +3072,7 @@
(/),1+:-2,1L%2L<:3L%4L,-1.26+:-4.29
(/),1+:-2,-inf,-0.00+:0.00
(/),1+:-2,nan,nan+:nan
+(/),1+:-2,x,__failed__
(/),-1.20+:4.30,1,-1.20+:4.30
(/),-1.20+:4.30,-1,1.20+:-4.30
(/),-1.20+:4.30,0,-inf+:inf
@@ -2908,6 +3096,7 @@
(/),-1.20+:4.30,1L%2L<:3L%4L,4.11+:7.93
(/),-1.20+:4.30,-inf,0.00+:-0.00
(/),-1.20+:4.30,nan,nan+:nan
+(/),-1.20+:4.30,x,__failed__
(/),1.20+:-4.30,1,1.20+:-4.30
(/),1.20+:-4.30,-1,-1.20+:4.30
(/),1.20+:-4.30,0,inf+:-inf
@@ -2931,6 +3120,7 @@
(/),1.20+:-4.30,1L%2L<:3L%4L,-4.11+:-7.93
(/),1.20+:-4.30,-inf,-0.00+:0.00
(/),1.20+:-4.30,nan,nan+:nan
+(/),1.20+:-4.30,x,__failed__
(/),1L%2L+:1,1,0.500+:1.00
(/),1L%2L+:1,-1,-0.500+:-1.00
(/),1L%2L+:1,0,inf+:inf
@@ -2954,6 +3144,7 @@
(/),1L%2L+:1,1L%2L<:3L%4L,2.09+:0.782
(/),1L%2L+:1,-inf,-0.00+:-0.00
(/),1L%2L+:1,nan,nan+:nan
+(/),1L%2L+:1,x,__failed__
(/),1L%2L+:3L%4L,1,0.500+:0.750
(/),1L%2L+:3L%4L,-1,-0.500+:-0.750
(/),1L%2L+:3L%4L,0,inf+:inf
@@ -2977,6 +3168,7 @@
(/),1L%2L+:3L%4L,1L%2L<:3L%4L,1.75+:0.416
(/),1L%2L+:3L%4L,-inf,-0.00+:-0.00
(/),1L%2L+:3L%4L,nan,nan+:nan
+(/),1L%2L+:3L%4L,x,__failed__
(/),3<:1,1,3.00<:1
(/),3<:1,-1,3.00<:-2.14
(/),3<:1,0,inf<:1
@@ -3000,6 +3192,7 @@
(/),3<:1,1L%2L<:3L%4L,6.00<:1L%4L
(/),3<:1,-inf,-0.00<:1
(/),3<:1,nan,nan<:1
+(/),3<:1,x,__failed__
(/),3<:-2.14,1,3.00<:-2.14
(/),3<:-2.14,-1,3.00<:1.00
(/),3<:-2.14,0,inf<:-2.14
@@ -3023,6 +3216,7 @@
(/),3<:-2.14,1L%2L<:3L%4L,6.00<:-2.89
(/),3<:-2.14,-inf,-0.00<:-2.14
(/),3<:-2.14,nan,nan<:-2.14
+(/),3<:-2.14,x,__failed__
(/),3.00<:-3,1,3.00<:-3
(/),3.00<:-3,-1,3.00<:0.142
(/),3.00<:-3,0,inf<:-3
@@ -3046,6 +3240,7 @@
(/),3.00<:-3,1L%2L<:3L%4L,6.00<:2.53
(/),3.00<:-3,-inf,-0.00<:-3
(/),3.00<:-3,nan,nan<:-3
+(/),3.00<:-3,x,__failed__
(/),3.10<:2.50,1,3.10<:2.50
(/),3.10<:2.50,-1,3.10<:-0.642
(/),3.10<:2.50,0,inf<:2.50
@@ -3069,6 +3264,7 @@
(/),3.10<:2.50,1L%2L<:3L%4L,6.20<:1.75
(/),3.10<:2.50,-inf,-0.00<:2.50
(/),3.10<:2.50,nan,nan<:2.50
+(/),3.10<:2.50,x,__failed__
(/),2L%3L<:2,1,0.667<:2
(/),2L%3L<:2,-1,0.667<:-1.14
(/),2L%3L<:2,0,inf<:2
@@ -3092,6 +3288,7 @@
(/),2L%3L<:2,1L%2L<:3L%4L,1.33<:5L%4L
(/),2L%3L<:2,-inf,-0.00<:2
(/),2L%3L<:2,nan,nan<:2
+(/),2L%3L<:2,x,__failed__
(/),1L%2L<:3L%4L,1,0.500<:3L%4L
(/),1L%2L<:3L%4L,-1,0.500<:-2.39
(/),1L%2L<:3L%4L,0,inf<:3L%4L
@@ -3115,6 +3312,7 @@
(/),1L%2L<:3L%4L,1L%2L<:3L%4L,1.00<:0L%1L
(/),1L%2L<:3L%4L,-inf,-0.00<:3L%4L
(/),1L%2L<:3L%4L,nan,nan<:3L%4L
+(/),1L%2L<:3L%4L,x,__failed__
(/),-inf,1,-inf
(/),-inf,-1,inf
(/),-inf,0,-inf
@@ -3138,6 +3336,7 @@
(/),-inf,1L%2L<:3L%4L,inf<:2.39
(/),-inf,-inf,nan
(/),-inf,nan,nan
+(/),-inf,x,__failed__
(/),nan,1,nan
(/),nan,-1,nan
(/),nan,0,nan
@@ -3161,6 +3360,31 @@
(/),nan,1L%2L<:3L%4L,nan<:(-3L)%4L
(/),nan,-inf,nan
(/),nan,nan,nan
+(/),nan,x,__failed__
+(/),x,1,__failed__
+(/),x,-1,__failed__
+(/),x,0,__failed__
+(/),x,0.00,__failed__
+(/),x,1.20,__failed__
+(/),x,-1.20,__failed__
+(/),x,1L%3L,__failed__
+(/),x,(-1L)%4L,__failed__
+(/),x,1+:2,__failed__
+(/),x,-1+:2,__failed__
+(/),x,1+:-2,__failed__
+(/),x,-1.20+:4.30,__failed__
+(/),x,1.20+:-4.30,__failed__
+(/),x,1L%2L+:1,__failed__
+(/),x,1L%2L+:3L%4L,__failed__
+(/),x,3<:1,__failed__
+(/),x,3<:-2.14,__failed__
+(/),x,3.00<:-3,__failed__
+(/),x,3.10<:2.50,__failed__
+(/),x,2L%3L<:2,__failed__
+(/),x,1L%2L<:3L%4L,__failed__
+(/),x,-inf,__failed__
+(/),x,nan,__failed__
+(/),x,x,__failed__
(^),1,1,1.00
(^),1,-1,1.00
(^),1,0,1.00
@@ -3184,6 +3408,7 @@
(^),1,1L%2L<:3L%4L,1.00<:0.00
(^),1,-inf,1.00
(^),1,nan,1.00
+(^),1,x,__failed__
(^),-1,1,-1.00
(^),-1,-1,-1.00
(^),-1,0,1.00
@@ -3207,6 +3432,7 @@
(^),-1,1L%2L<:3L%4L,0.343<:1.15
(^),-1,-inf,1.00
(^),-1,nan,nan
+(^),-1,x,__failed__
(^),0,1,0.00
(^),0,-1,inf
(^),0,0,1.00
@@ -3230,6 +3456,7 @@
(^),0,1L%2L<:3L%4L,0.00<:nan
(^),0,-inf,inf
(^),0,nan,nan
+(^),0,x,__failed__
(^),0.00,1,0.00
(^),0.00,-1,inf
(^),0.00,0,1.00
@@ -3253,6 +3480,7 @@
(^),0.00,1L%2L<:3L%4L,0.00<:nan
(^),0.00,-inf,inf
(^),0.00,nan,nan
+(^),0.00,x,__failed__
(^),1.20,1,1.20
(^),1.20,-1,0.833
(^),1.20,0,1.00
@@ -3276,6 +3504,7 @@
(^),1.20,1L%2L<:3L%4L,1.07<:0.0621
(^),1.20,-inf,0.00
(^),1.20,nan,nan
+(^),1.20,x,__failed__
(^),-1.20,1,-1.20
(^),-1.20,-1,-0.833
(^),-1.20,0,1.00
@@ -3299,6 +3528,7 @@
(^),-1.20,1L%2L<:3L%4L,0.366<:1.21
(^),-1.20,-inf,0.00
(^),-1.20,nan,nan
+(^),-1.20,x,__failed__
(^),1L%3L,1,0.333
(^),1L%3L,-1,3.00
(^),1L%3L,0,1.00
@@ -3322,6 +3552,7 @@
(^),1L%3L,1L%2L<:3L%4L,0.669<:-0.374
(^),1L%3L,-inf,inf
(^),1L%3L,nan,nan
+(^),1L%3L,x,__failed__
(^),(-1L)%4L,1,-0.250
(^),(-1L)%4L,-1,-4.00
(^),(-1L)%4L,0,1.00
@@ -3345,6 +3576,7 @@
(^),(-1L)%4L,1L%2L<:3L%4L,0.206<:0.677
(^),(-1L)%4L,-inf,inf
(^),(-1L)%4L,nan,nan
+(^),(-1L)%4L,x,__failed__
(^),1+:2,1,1.00+:2.00
(^),1+:2,-1,0.200+:-0.400
(^),1+:2,0,1.00+:0.00
@@ -3368,6 +3600,7 @@
(^),1+:2,1L%2L<:3L%4L,0.716+:0.578
(^),1+:2,-inf,nan+:nan
(^),1+:2,nan,nan+:nan
+(^),1+:2,x,__failed__
(^),-1+:2,1,-1.00+:2.00
(^),-1+:2,-1,-0.200+:-0.400
(^),-1+:2,0,1.00+:0.00
@@ -3391,6 +3624,7 @@
(^),-1+:2,1L%2L<:3L%4L,0.352+:0.571
(^),-1+:2,-inf,nan+:nan
(^),-1+:2,nan,nan+:nan
+(^),-1+:2,x,__failed__
(^),1+:-2,1,1.00+:-2.00
(^),1+:-2,-1,0.200+:0.400
(^),1+:-2,0,1.00+:-0.00
@@ -3414,6 +3648,7 @@
(^),1+:-2,1L%2L<:3L%4L,1.94+:-0.255
(^),1+:-2,-inf,nan+:nan
(^),1+:-2,nan,nan+:nan
+(^),1+:-2,x,__failed__
(^),-1.20+:4.30,1,-1.20+:4.30
(^),-1.20+:4.30,-1,-0.0602+:-0.216
(^),-1.20+:4.30,0,1.00+:0.00
@@ -3437,6 +3672,7 @@
(^),-1.20+:4.30,1L%2L<:3L%4L,0.348+:0.854
(^),-1.20+:4.30,-inf,nan+:nan
(^),-1.20+:4.30,nan,nan+:nan
+(^),-1.20+:4.30,x,__failed__
(^),1.20+:-4.30,1,1.20+:-4.30
(^),1.20+:-4.30,-1,0.0602+:0.216
(^),1.20+:-4.30,0,1.00+:-0.00
@@ -3460,6 +3696,7 @@
(^),1.20+:-4.30,1L%2L<:3L%4L,2.69+:0.0936
(^),1.20+:-4.30,-inf,nan+:nan
(^),1.20+:-4.30,nan,nan+:nan
+(^),1.20+:-4.30,x,__failed__
(^),1L%2L+:1,1,0.500+:1.00
(^),1L%2L+:1,-1,0.400+:-0.800
(^),1L%2L+:1,0,1.00+:0.00
@@ -3483,6 +3720,7 @@
(^),1L%2L+:1,1L%2L<:3L%4L,0.645+:0.306
(^),1L%2L+:1,-inf,nan+:nan
(^),1L%2L+:1,nan,nan+:nan
+(^),1L%2L+:1,x,__failed__
(^),1L%2L+:3L%4L,1,0.500+:0.750
(^),1L%2L+:3L%4L,-1,0.615+:-0.923
(^),1L%2L+:3L%4L,0,1.00+:0.00
@@ -3506,6 +3744,7 @@
(^),1L%2L+:3L%4L,1L%2L<:3L%4L,0.653+:0.219
(^),1L%2L+:3L%4L,-inf,nan+:nan
(^),1L%2L+:3L%4L,nan,nan+:nan
+(^),1L%2L+:3L%4L,x,__failed_...
[truncated message content] |
|
From: <ag...@us...> - 2008-08-23 22:39:05
|
Revision: 591
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=591&view=rev
Author: agraef
Date: 2008-08-23 22:39:15 +0000 (Sat, 23 Aug 2008)
Log Message:
-----------
Improved __failed__ test.
Modified Paths:
--------------
pure/trunk/test/test020.log
pure/trunk/test/test020.pure
pure/trunk/test/test021.log
pure/trunk/test/test021.pure
Modified: pure/trunk/test/test020.log
===================================================================
--- pure/trunk/test/test020.log 2008-08-23 22:36:04 UTC (rev 590)
+++ pure/trunk/test/test020.log 2008-08-23 22:39:15 UTC (rev 591)
@@ -40,8 +40,8 @@
test (f/*0:101*/,x/*0:1101*/,y/*0:111*/) = puts$format (f/*0:101*/,x/*0:1101*/,y/*0:111*/,check (f/*0:101*/,x/*0:1101*/,y/*0:111*/) (catch __error__ (f/*1:101*/ x/*1:1101*/ y/*1:111*/)));
test (f/*0:101*/,x/*0:11*/) = puts$format (f/*0:101*/,x/*0:11*/,check (f/*0:101*/,x/*0:11*/) (catch __error__ (f/*1:101*/ x/*1:11*/)));
check _/*0:01*/ z/*0:1*/ = z/*0:1*/ if numberp z/*0:1*/;
-check (f/*0:0101*/,_/*0:011*/) (g@_/*0:100*/ _/*0:101*/ _/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:100*/;
-check (f/*0:0101*/,_/*0:011*/) (g@_/*0:10*/ _/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:10*/;
+check (f/*0:0101*/,x/*0:01101*/,y/*0:0111*/) (g@_/*0:100*/ u/*0:101*/ v/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:100*/&&x/*0:01101*/===u/*0:101*/&&y/*0:0111*/===v/*0:11*/;
+check (f/*0:0101*/,x/*0:011*/) (g@_/*0:10*/ u/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:10*/&&x/*0:011*/===u/*0:11*/;
check _/*0:01*/ z/*0:1*/ = z/*0:1*/;
format (f/*0:101*/,x/*0:1101*/,y/*0:11101*/,z/*0:1111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show y/*0:11101*/+","+show z/*0:1111*/;
format (f/*0:101*/,x/*0:1101*/,z/*0:111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show z/*0:111*/;
@@ -51,8 +51,8 @@
show x/*0:1*/ = str x/*0:1*/;
{
rule #0: check _ z = z if numberp z
- rule #1: check (f,_) (g@_ _ _) = __failed__ if f===g
- rule #2: check (f,_) (g@_ _) = __failed__ if f===g
+ rule #1: check (f,x,y) (g@_ u v) = __failed__ if f===g&&x===u&&y===v
+ rule #2: check (f,x) (g@_ u) = __failed__ if f===g&&x===u
rule #3: check _ z = z
state 0: #0 #1 #2 #3
<var> state 1
@@ -82,23 +82,67 @@
<var> state 13
state 13: #0 #1 #2 #3
<var> state 14
- state 14: #0 #1 #2 #3
+ <app> state 19
+ state 14: #0 #2 #3
<var> state 15
<app> state 16
state 15: #0 #3
- state 16: #0 #1 #2 #3
+ state 16: #0 #2 #3
<var> state 17
- <app> state 19
state 17: #0 #2 #3
<var> state 18
state 18: #0 #2 #3
state 19: #0 #1 #2 #3
<var> state 20
- state 20: #0 #1 #2 #3
+ <app> state 26
+ state 20: #0 #2 #3
<var> state 21
- state 21: #0 #1 #2 #3
+ state 21: #0 #2 #3
<var> state 22
- state 22: #0 #1 #2 #3
+ <app> state 23
+ state 22: #0 #3
+ state 23: #0 #2 #3
+ <var> state 24
+ state 24: #0 #2 #3
+ <var> state 25
+ state 25: #0 #2 #3
+ state 26: #0 #1 #2 #3
+ <var> state 27
+ , state 34
+ state 27: #0 #2 #3
+ <var> state 28
+ state 28: #0 #2 #3
+ <var> state 29
+ state 29: #0 #2 #3
+ <var> state 30
+ <app> state 31
+ state 30: #0 #3
+ state 31: #0 #2 #3
+ <var> state 32
+ state 32: #0 #2 #3
+ <var> state 33
+ state 33: #0 #2 #3
+ state 34: #0 #1 #2 #3
+ <var> state 35
+ state 35: #0 #1 #2 #3
+ <var> state 36
+ state 36: #0 #1 #2 #3
+ <var> state 37
+ <app> state 38
+ state 37: #0 #3
+ state 38: #0 #1 #2 #3
+ <var> state 39
+ <app> state 41
+ state 39: #0 #2 #3
+ <var> state 40
+ state 40: #0 #2 #3
+ state 41: #0 #1 #2 #3
+ <var> state 42
+ state 42: #0 #1 #2 #3
+ <var> state 43
+ state 43: #0 #1 #2 #3
+ <var> state 44
+ state 44: #0 #1 #2 #3
}
{
rule #0: format (f,x,y,z) = str f+","+show x+","+show y+","+show z
Modified: pure/trunk/test/test020.pure
===================================================================
--- pure/trunk/test/test020.pure 2008-08-23 22:36:04 UTC (rev 590)
+++ pure/trunk/test/test020.pure 2008-08-23 22:39:15 UTC (rev 591)
@@ -35,8 +35,8 @@
test (f,x) = puts $ format (f,x,check (f,x) (catch __error__ (f x)));
check _ z = z if numberp z;
-check (f,_) (g@_ _ _) |
-check (f,_) (g@_ _) = __failed__ if f===g;
+check (f,x,y) (g@_ u v) = __failed__ if f===g && x===u && y===v;
+check (f,x) (g@_ u) = __failed__ if f===g && x===u;
check _ z = z otherwise;
format (f,x,y,z) = str f+","+show x+","+show y+","+show z;
Modified: pure/trunk/test/test021.log
===================================================================
--- pure/trunk/test/test021.log 2008-08-23 22:36:04 UTC (rev 590)
+++ pure/trunk/test/test021.log 2008-08-23 22:39:15 UTC (rev 591)
@@ -2,8 +2,8 @@
test (f/*0:101*/,x/*0:1101*/,y/*0:111*/) = puts$format (f/*0:101*/,x/*0:1101*/,y/*0:111*/,check (f/*0:101*/,x/*0:1101*/,y/*0:111*/) (catch __error__ (f/*1:101*/ x/*1:1101*/ y/*1:111*/)));
test (f/*0:101*/,x/*0:11*/) = puts$format (f/*0:101*/,x/*0:11*/,check (f/*0:101*/,x/*0:11*/) (catch __error__ (f/*1:101*/ x/*1:11*/)));
check _/*0:01*/ z/*0:1*/ = z/*0:1*/ if numberp z/*0:1*/;
-check (f/*0:0101*/,_/*0:011*/) (g@_/*0:100*/ _/*0:101*/ _/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:100*/;
-check (f/*0:0101*/,_/*0:011*/) (g@_/*0:10*/ _/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:10*/;
+check (f/*0:0101*/,x/*0:01101*/,y/*0:0111*/) (g@_/*0:100*/ u/*0:101*/ v/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:100*/&&x/*0:01101*/===u/*0:101*/&&y/*0:0111*/===v/*0:11*/;
+check (f/*0:0101*/,x/*0:011*/) (g@_/*0:10*/ u/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:10*/&&x/*0:011*/===u/*0:11*/;
check _/*0:01*/ z/*0:1*/ = z/*0:1*/;
format (f/*0:101*/,x/*0:1101*/,y/*0:11101*/,z/*0:1111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show y/*0:11101*/+","+show z/*0:1111*/;
format (f/*0:101*/,x/*0:1101*/,z/*0:111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show z/*0:111*/;
@@ -13,8 +13,8 @@
show x/*0:1*/ = str x/*0:1*/;
{
rule #0: check _ z = z if numberp z
- rule #1: check (f,_) (g@_ _ _) = __failed__ if f===g
- rule #2: check (f,_) (g@_ _) = __failed__ if f===g
+ rule #1: check (f,x,y) (g@_ u v) = __failed__ if f===g&&x===u&&y===v
+ rule #2: check (f,x) (g@_ u) = __failed__ if f===g&&x===u
rule #3: check _ z = z
state 0: #0 #1 #2 #3
<var> state 1
@@ -44,23 +44,67 @@
<var> state 13
state 13: #0 #1 #2 #3
<var> state 14
- state 14: #0 #1 #2 #3
+ <app> state 19
+ state 14: #0 #2 #3
<var> state 15
<app> state 16
state 15: #0 #3
- state 16: #0 #1 #2 #3
+ state 16: #0 #2 #3
<var> state 17
- <app> state 19
state 17: #0 #2 #3
<var> state 18
state 18: #0 #2 #3
state 19: #0 #1 #2 #3
<var> state 20
- state 20: #0 #1 #2 #3
+ <app> state 26
+ state 20: #0 #2 #3
<var> state 21
- state 21: #0 #1 #2 #3
+ state 21: #0 #2 #3
<var> state 22
- state 22: #0 #1 #2 #3
+ <app> state 23
+ state 22: #0 #3
+ state 23: #0 #2 #3
+ <var> state 24
+ state 24: #0 #2 #3
+ <var> state 25
+ state 25: #0 #2 #3
+ state 26: #0 #1 #2 #3
+ <var> state 27
+ , state 34
+ state 27: #0 #2 #3
+ <var> state 28
+ state 28: #0 #2 #3
+ <var> state 29
+ state 29: #0 #2 #3
+ <var> state 30
+ <app> state 31
+ state 30: #0 #3
+ state 31: #0 #2 #3
+ <var> state 32
+ state 32: #0 #2 #3
+ <var> state 33
+ state 33: #0 #2 #3
+ state 34: #0 #1 #2 #3
+ <var> state 35
+ state 35: #0 #1 #2 #3
+ <var> state 36
+ state 36: #0 #1 #2 #3
+ <var> state 37
+ <app> state 38
+ state 37: #0 #3
+ state 38: #0 #1 #2 #3
+ <var> state 39
+ <app> state 41
+ state 39: #0 #2 #3
+ <var> state 40
+ state 40: #0 #2 #3
+ state 41: #0 #1 #2 #3
+ <var> state 42
+ state 42: #0 #1 #2 #3
+ <var> state 43
+ state 43: #0 #1 #2 #3
+ <var> state 44
+ state 44: #0 #1 #2 #3
}
{
rule #0: format (f,x,y,z) = str f+","+show x+","+show y+","+show z
Modified: pure/trunk/test/test021.pure
===================================================================
--- pure/trunk/test/test021.pure 2008-08-23 22:36:04 UTC (rev 590)
+++ pure/trunk/test/test021.pure 2008-08-23 22:39:15 UTC (rev 591)
@@ -14,8 +14,8 @@
test (f,x) = puts $ format (f,x,check (f,x) (catch __error__ (f x)));
check _ z = z if numberp z;
-check (f,_) (g@_ _ _) |
-check (f,_) (g@_ _) = __failed__ if f===g;
+check (f,x,y) (g@_ u v) = __failed__ if f===g && x===u && y===v;
+check (f,x) (g@_ u) = __failed__ if f===g && x===u;
check _ z = z otherwise;
format (f,x,y,z) = str f+","+show x+","+show y+","+show z;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-08-23 23:42:13
|
Revision: 594
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=594&view=rev
Author: agraef
Date: 2008-08-23 23:42:23 +0000 (Sat, 23 Aug 2008)
Log Message:
-----------
Cosmetic changes.
Modified Paths:
--------------
pure/trunk/test/test020.log
pure/trunk/test/test020.pure
Modified: pure/trunk/test/test020.log
===================================================================
--- pure/trunk/test/test020.log 2008-08-23 23:21:06 UTC (rev 593)
+++ pure/trunk/test/test020.log 2008-08-23 23:42:23 UTC (rev 594)
@@ -1,10 +1,10 @@
{
- rule #0: f = [sqrt,sin,cos,tan,ln,log,exp,atan,asin,acos,sinh,cosh,tanh,asinh,acosh,atanh,abs,re,im,arg,conj,rect,polar,cis,ceil,floor,round,frac,complexp,realp,rationalp,numberp,exactp,inexactp,infp,nanp]
+ rule #0: f = [sqrt,ln,log,exp,sin,cos,tan,asin,acos,atan,sinh,cosh,tanh,asinh,acosh,atanh,abs,re,im,arg,conj,rect,polar,cis,ceil,floor,round,frac,complexp,realp,rationalp,numberp,exactp,inexactp,infp,nanp]
state 0: #0
<var> state 1
state 1: #0
}
-let f = [sqrt,sin,cos,tan,ln,log,exp,atan,asin,acos,sinh,cosh,tanh,asinh,acosh,atanh,abs,re,im,arg,conj,rect,polar,cis,ceil,floor,round,frac,complexp,realp,rationalp,numberp,exactp,inexactp,infp,nanp];
+let f = [sqrt,ln,log,exp,sin,cos,tan,asin,acos,atan,sinh,cosh,tanh,asinh,acosh,atanh,abs,re,im,arg,conj,rect,polar,cis,ceil,floor,round,frac,complexp,realp,rationalp,numberp,exactp,inexactp,infp,nanp];
{
rule #0: x = [1,-1,0,0.0,1.2,-1.2,1%3,-1%4,1+:2,-1+:2,1+:-2,-1.2+:4.3,1.2+:-4.3,1%2+:1,1%2+:3%4,3<:1,-3<:1,3.0<:-3,3.1<:2.5,2%3<:2,1%2<:3%4,-1e+307*1e+307,1e+307*1e+307-1e+307*1e+307,x]
state 0: #0
@@ -284,6 +284,78 @@
sqrt,-inf,nan
sqrt,nan,nan
sqrt,x,__failed__
+ln,1,0.00
+ln,-1,nan
+ln,0,-inf
+ln,0.00,-inf
+ln,1.20,0.182
+ln,-1.20,nan
+ln,1L%3L,-1.10
+ln,(-1L)%4L,nan
+ln,1+:2,0.805+:1.11
+ln,-1+:2,0.805+:2.03
+ln,1+:-2,0.805+:-1.11
+ln,-1.20+:4.30,1.50+:1.84
+ln,1.20+:-4.30,1.50+:-1.30
+ln,1L%2L+:1,0.112+:1.11
+ln,1L%2L+:3L%4L,-0.104+:0.983
+ln,3<:1,1.49<:0.738
+ln,3<:-2.14,2.41<:-1.10
+ln,3.00<:-3,3.19<:-1.22
+ln,3.10<:2.50,2.74<:1.15
+ln,2L%3L<:2,2.04<:1.77
+ln,1L%2L<:3L%4L,1.02<:2.32
+ln,-inf,nan
+ln,nan,nan
+ln,x,__failed__
+log,1,0.00
+log,-1,nan
+log,0,-inf
+log,0.00,-inf
+log,1.20,0.0792
+log,-1.20,nan
+log,1L%3L,-0.477
+log,(-1L)%4L,nan
+log,1+:2,0.349+:0.481
+log,-1+:2,0.349+:0.884
+log,1+:-2,0.349+:-0.481
+log,-1.20+:4.30,0.650+:0.800
+log,1.20+:-4.30,0.650+:-0.564
+log,1L%2L+:1,0.0485+:0.481
+log,1L%2L+:3L%4L,-0.0451+:0.427
+log,3<:1,0.645<:0.738
+log,3<:-2.14,1.05<:-1.10
+log,3.00<:-3,1.39<:-1.22
+log,3.10<:2.50,1.19<:1.15
+log,2L%3L<:2,0.886<:1.77
+log,1L%2L<:3L%4L,0.444<:2.32
+log,-inf,nan
+log,nan,nan
+log,x,__failed__
+exp,1,2.72
+exp,-1,0.368
+exp,0,1.00
+exp,0.00,1.00
+exp,1.20,3.32
+exp,-1.20,0.301
+exp,1L%3L,1.40
+exp,(-1L)%4L,0.779
+exp,1+:2,-1.13+:2.47
+exp,-1+:2,-0.153+:0.335
+exp,1+:-2,-1.13+:-2.47
+exp,-1.20+:4.30,-0.121+:-0.276
+exp,1.20+:-4.30,-1.33+:3.04
+exp,1L%2L+:1,0.891+:1.39
+exp,1L%2L+:3L%4L,1.21+:1.12
+exp,3<:1,5.06<:2.52
+exp,3<:-2.14,0.198<:-2.52
+exp,3.00<:-3,0.0513<:-0.423
+exp,3.10<:2.50,0.0834<:1.86
+exp,2L%3L<:2,0.758<:0.606
+exp,1L%2L<:3L%4L,1.44<:0.341
+exp,-inf,0.00
+exp,nan,nan
+exp,x,__failed__
sin,1,0.841
sin,-1,-0.841
sin,0,0.00
@@ -356,102 +428,6 @@
tan,-inf,nan
tan,nan,nan
tan,x,__failed__
-ln,1,0.00
-ln,-1,nan
-ln,0,-inf
-ln,0.00,-inf
-ln,1.20,0.182
-ln,-1.20,nan
-ln,1L%3L,-1.10
-ln,(-1L)%4L,nan
-ln,1+:2,0.805+:1.11
-ln,-1+:2,0.805+:2.03
-ln,1+:-2,0.805+:-1.11
-ln,-1.20+:4.30,1.50+:1.84
-ln,1.20+:-4.30,1.50+:-1.30
-ln,1L%2L+:1,0.112+:1.11
-ln,1L%2L+:3L%4L,-0.104+:0.983
-ln,3<:1,1.49<:0.738
-ln,3<:-2.14,2.41<:-1.10
-ln,3.00<:-3,3.19<:-1.22
-ln,3.10<:2.50,2.74<:1.15
-ln,2L%3L<:2,2.04<:1.77
-ln,1L%2L<:3L%4L,1.02<:2.32
-ln,-inf,nan
-ln,nan,nan
-ln,x,__failed__
-log,1,0.00
-log,-1,nan
-log,0,-inf
-log,0.00,-inf
-log,1.20,0.0792
-log,-1.20,nan
-log,1L%3L,-0.477
-log,(-1L)%4L,nan
-log,1+:2,0.349+:0.481
-log,-1+:2,0.349+:0.884
-log,1+:-2,0.349+:-0.481
-log,-1.20+:4.30,0.650+:0.800
-log,1.20+:-4.30,0.650+:-0.564
-log,1L%2L+:1,0.0485+:0.481
-log,1L%2L+:3L%4L,-0.0451+:0.427
-log,3<:1,0.645<:0.738
-log,3<:-2.14,1.05<:-1.10
-log,3.00<:-3,1.39<:-1.22
-log,3.10<:2.50,1.19<:1.15
-log,2L%3L<:2,0.886<:1.77
-log,1L%2L<:3L%4L,0.444<:2.32
-log,-inf,nan
-log,nan,nan
-log,x,__failed__
-exp,1,2.72
-exp,-1,0.368
-exp,0,1.00
-exp,0.00,1.00
-exp,1.20,3.32
-exp,-1.20,0.301
-exp,1L%3L,1.40
-exp,(-1L)%4L,0.779
-exp,1+:2,-1.13+:2.47
-exp,-1+:2,-0.153+:0.335
-exp,1+:-2,-1.13+:-2.47
-exp,-1.20+:4.30,-0.121+:-0.276
-exp,1.20+:-4.30,-1.33+:3.04
-exp,1L%2L+:1,0.891+:1.39
-exp,1L%2L+:3L%4L,1.21+:1.12
-exp,3<:1,5.06<:2.52
-exp,3<:-2.14,0.198<:-2.52
-exp,3.00<:-3,0.0513<:-0.423
-exp,3.10<:2.50,0.0834<:1.86
-exp,2L%3L<:2,0.758<:0.606
-exp,1L%2L<:3L%4L,1.44<:0.341
-exp,-inf,0.00
-exp,nan,nan
-exp,x,__failed__
-atan,1,0.785
-atan,-1,-0.785
-atan,0,0.00
-atan,0.00,0.00
-atan,1.20,0.876
-atan,-1.20,-0.876
-atan,1L%3L,0.322
-atan,(-1L)%4L,-0.245
-atan,1+:2,1.34+:0.402
-atan,-1+:2,-1.34+:0.402
-atan,1+:-2,1.34+:-0.402
-atan,-1.20+:4.30,-1.51+:0.218
-atan,1.20+:-4.30,1.51+:-0.218
-atan,1L%2L+:1,0.908+:0.708
-atan,1L%2L+:3L%4L,0.693+:0.590
-atan,3<:1,1.38+:0.278
-atan,3<:-2.14,-1.38+:-0.278
-atan,3.00<:-3,-1.25+:-0.0424
-atan,3.10<:2.50,-1.31+:0.183
-atan,2L%3L<:2,-0.392+:0.609
-atan,1L%2L<:3L%4L,0.387+:0.306
-atan,-inf,-1.57
-atan,nan,nan
-atan,x,__failed__
asin,1,1.57
asin,-1,-1.57
asin,0,0.00
@@ -500,6 +476,30 @@
acos,-inf,nan
acos,nan,nan
acos,x,__failed__
+atan,1,0.785
+atan,-1,-0.785
+atan,0,0.00
+atan,0.00,0.00
+atan,1.20,0.876
+atan,-1.20,-0.876
+atan,1L%3L,0.322
+atan,(-1L)%4L,-0.245
+atan,1+:2,1.34+:0.402
+atan,-1+:2,-1.34+:0.402
+atan,1+:-2,1.34+:-0.402
+atan,-1.20+:4.30,-1.51+:0.218
+atan,1.20+:-4.30,1.51+:-0.218
+atan,1L%2L+:1,0.908+:0.708
+atan,1L%2L+:3L%4L,0.693+:0.590
+atan,3<:1,1.38+:0.278
+atan,3<:-2.14,-1.38+:-0.278
+atan,3.00<:-3,-1.25+:-0.0424
+atan,3.10<:2.50,-1.31+:0.183
+atan,2L%3L<:2,-0.392+:0.609
+atan,1L%2L<:3L%4L,0.387+:0.306
+atan,-inf,-1.57
+atan,nan,nan
+atan,x,__failed__
sinh,1,1.18
sinh,-1,-1.18
sinh,0,0.00
Modified: pure/trunk/test/test020.pure
===================================================================
--- pure/trunk/test/test020.pure 2008-08-23 23:21:06 UTC (rev 593)
+++ pure/trunk/test/test020.pure 2008-08-23 23:42:23 UTC (rev 594)
@@ -4,7 +4,7 @@
// unary operations
-let f = [sqrt, sin, cos, tan, ln, log, exp, atan, asin, acos, sinh, cosh, tanh,
+let f = [sqrt, ln, log, exp, sin, cos, tan, asin, acos, atan, sinh, cosh, tanh,
asinh, acosh, atanh, abs, re, im, arg, conj, rect, polar, cis, ceil,
floor, round, frac, complexp, realp, rationalp, numberp, exactp,
inexactp, infp, nanp];
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-08-24 00:11:24
|
Revision: 596
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=596&view=rev
Author: agraef
Date: 2008-08-24 00:11:34 +0000 (Sun, 24 Aug 2008)
Log Message:
-----------
Cosmetic changes.
Modified Paths:
--------------
pure/trunk/test/test020.log
pure/trunk/test/test020.pure
pure/trunk/test/test021.log
pure/trunk/test/test021.pure
Modified: pure/trunk/test/test020.log
===================================================================
--- pure/trunk/test/test020.log 2008-08-23 23:56:43 UTC (rev 595)
+++ pure/trunk/test/test020.log 2008-08-24 00:11:34 UTC (rev 596)
@@ -49,6 +49,27 @@
show (x/*0:101*/+:y/*0:11*/) = show x/*0:101*/+"+:"+show y/*0:11*/;
show (x/*0:101*/<:y/*0:11*/) = show x/*0:101*/+"<:"+show y/*0:11*/;
show x/*0:1*/ = str x/*0:1*/;
+tests = puts "*** UNARY ***"$$void (catmap (\f/*0:*/ -> catmap (\x/*0:*/ -> [test (f/*1:*/,x/*0:*/)] {
+ rule #0: x = [test (f,x)]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) x {
+ rule #0: f = catmap (\x -> [test (f,x)]) x
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) f)$$puts "*** BINARY ***"$$void (catmap (\f/*0:*/ -> catmap (\x/*0:*/ -> [test (f/*1:*/,x/*0:*/)] {
+ rule #0: x = [test (f,x)]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) x2 {
+ rule #0: f = catmap (\x -> [test (f,x)]) x2
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) f2);
{
rule #0: check _ z = z if numberp z
rule #1: check (f,x,y) (g@_ u v) = __failed__ if f===g&&x===u&&y===v
@@ -259,6 +280,10 @@
<var> state 15
state 15: #2 #3
}
+{
+ rule #0: tests = puts "*** UNARY ***"$$void (catmap (\f -> catmap (\x -> [test (f,x)]) x) f)$$puts "*** BINARY ***"$$void (catmap (\f -> catmap (\x -> [test (f,x)]) x2) f2)
+ state 0: #0
+}
*** UNARY ***
sqrt,1,1.00
sqrt,-1,nan
@@ -5157,25 +5182,5 @@
pow,x,-inf,__failed__
pow,x,nan,__failed__
pow,x,x,__failed__
-puts "*** UNARY ***"$$void (catmap (\f/*0:*/ -> catmap (\x/*0:*/ -> [test (f/*1:*/,x/*0:*/)] {
- rule #0: x = [test (f,x)]
- state 0: #0
- <var> state 1
- state 1: #0
-}) x {
- rule #0: f = catmap (\x -> [test (f,x)]) x
- state 0: #0
- <var> state 1
- state 1: #0
-}) f)$$puts "*** BINARY ***"$$void (catmap (\f/*0:*/ -> catmap (\x/*0:*/ -> [test (f/*1:*/,x/*0:*/)] {
- rule #0: x = [test (f,x)]
- state 0: #0
- <var> state 1
- state 1: #0
-}) x2 {
- rule #0: f = catmap (\x -> [test (f,x)]) x2
- state 0: #0
- <var> state 1
- state 1: #0
-}) f2);
+tests;
()
Modified: pure/trunk/test/test020.pure
===================================================================
--- pure/trunk/test/test020.pure 2008-08-23 23:56:43 UTC (rev 595)
+++ pure/trunk/test/test020.pure 2008-08-24 00:11:34 UTC (rev 596)
@@ -47,5 +47,8 @@
show (x<:y) = show x+"<:"+show y;
show x = str x otherwise;
+tests =
puts "*** UNARY ***" $$ void [test (f,x); f=f; x=x] $$
puts "*** BINARY ***" $$ void [test (f,x); f=f2; x=x2];
+
+tests;
Modified: pure/trunk/test/test021.log
===================================================================
--- pure/trunk/test/test021.log 2008-08-23 23:56:43 UTC (rev 595)
+++ pure/trunk/test/test021.log 2008-08-24 00:11:34 UTC (rev 596)
@@ -11,6 +11,47 @@
show (x/*0:101*/+:y/*0:11*/) = show x/*0:101*/+"+:"+show y/*0:11*/;
show (x/*0:101*/<:y/*0:11*/) = show x/*0:101*/+"<:"+show y/*0:11*/;
show x/*0:1*/ = str x/*0:1*/;
+tests = puts "*** EXACT/INEXACT ***"$$do test (catmap (\op/*0:*/ -> catmap (\a/*0:*/ -> [(op/*1:*/,2,a/*0:*/)] {
+ rule #0: a = [(op,2,a)]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [2+:3,2<:3,2%3] {
+ rule #0: op = catmap (\a -> [(op,2,a)]) [2+:3,2<:3,2%3]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [(+),(-),(*),(%),(/),(^)])$$do test (catmap (\op/*0:*/ -> catmap (\a/*0:*/ -> [(op/*1:*/,a/*0:*/,2)] {
+ rule #0: a = [(op,a,2)]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [2+:3,2<:3,2%3] {
+ rule #0: op = catmap (\a -> [(op,a,2)]) [2+:3,2<:3,2%3]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [(+),(-),(*),(%),(/),(^)])$$puts "*** SYMBOLIC ***"$$do test (catmap (\op/*0:*/ -> catmap (\a/*0:*/ -> [(op/*1:*/,x,a/*0:*/)] {
+ rule #0: a = [(op,x,a)]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [2+:3,2<:3,2%3] {
+ rule #0: op = catmap (\a -> [(op,x,a)]) [2+:3,2<:3,2%3]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [(+),(-),(*),(%),(/),(^)])$$do test (catmap (\op/*0:*/ -> catmap (\a/*0:*/ -> [(op/*1:*/,a/*0:*/,x)] {
+ rule #0: a = [(op,a,x)]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [2+:3,2<:3,2%3] {
+ rule #0: op = catmap (\a -> [(op,a,x)]) [2+:3,2<:3,2%3]
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}) [(+),(-),(*),(%),(/),(^)]);
{
rule #0: check _ z = z if numberp z
rule #1: check (f,x,y) (g@_ u v) = __failed__ if f===g&&x===u&&y===v
@@ -221,6 +262,10 @@
<var> state 15
state 15: #2 #3
}
+{
+ rule #0: tests = puts "*** EXACT/INEXACT ***"$$do test (catmap (\op -> catmap (\a -> [(op,2,a)]) [2+:3,2<:3,2%3]) [(+),(-),(*),(%),(/),(^)])$$do test (catmap (\op -> catmap (\a -> [(op,a,2)]) [2+:3,2<:3,2%3]) [(+),(-),(*),(%),(/),(^)])$$puts "*** SYMBOLIC ***"$$do test (catmap (\op -> catmap (\a -> [(op,x,a)]) [2+:3,2<:3,2%3]) [(+),(-),(*),(%),(/),(^)])$$do test (catmap (\op -> catmap (\a -> [(op,a,x)]) [2+:3,2<:3,2%3]) [(+),(-),(*),(%),(/),(^)])
+ state 0: #0
+}
*** EXACT/INEXACT ***
(+),2,2+:3,4+:3
(+),2,2<:3,0.0200+:0.282
@@ -295,45 +340,5 @@
(^),2+:3,x,__failed__
(^),2<:3,x,__failed__
(^),2L%3L,x,__failed__
-puts "*** EXACT/INEXACT ***"$$do test (catmap (\op/*0:*/ -> catmap (\a/*0:*/ -> [(op/*1:*/,2,a/*0:*/)] {
- rule #0: a = [(op,2,a)]
- state 0: #0
- <var> state 1
- state 1: #0
-}) [2+:3,2<:3,2%3] {
- rule #0: op = catmap (\a -> [(op,2,a)]) [2+:3,2<:3,2%3]
- state 0: #0
- <var> state 1
- state 1: #0
-}) [(+),(-),(*),(%),(/),(^)])$$do test (catmap (\op/*0:*/ -> catmap (\a/*0:*/ -> [(op/*1:*/,a/*0:*/,2)] {
- rule #0: a = [(op,a,2)]
- state 0: #0
- <var> state 1
- state 1: #0
-}) [2+:3,2<:3,2%3] {
- rule #0: op = catmap (\a -> [(op,a,2)]) [2+:3,2<:3,2%3]
- state 0: #0
- <var> state 1
- state 1: #0
-}) [(+),(-),(*),(%),(/),(^)])$$puts "*** SYMBOLIC ***"$$do test (catmap (\op/*0:*/ -> catmap (\a/*0:*/ -> [(op/*1:*/,x,a/*0:*/)] {
- rule #0: a = [(op,x,a)]
- state 0: #0
- <var> state 1
- state 1: #0
-}) [2+:3,2<:3,2%3] {
- rule #0: op = catmap (\a -> [(op,x,a)]) [2+:3,2<:3,2%3]
- state 0: #0
- <var> state 1
- state 1: #0
-}) [(+),(-),(*),(%),(/),(^)])$$do test (catmap (\op/*0:*/ -> catmap (\a/*0:*/ -> [(op/*1:*/,a/*0:*/,x)] {
- rule #0: a = [(op,a,x)]
- state 0: #0
- <var> state 1
- state 1: #0
-}) [2+:3,2<:3,2%3] {
- rule #0: op = catmap (\a -> [(op,a,x)]) [2+:3,2<:3,2%3]
- state 0: #0
- <var> state 1
- state 1: #0
-}) [(+),(-),(*),(%),(/),(^)]);
+tests;
()
Modified: pure/trunk/test/test021.pure
===================================================================
--- pure/trunk/test/test021.pure 2008-08-23 23:56:43 UTC (rev 595)
+++ pure/trunk/test/test021.pure 2008-08-24 00:11:34 UTC (rev 596)
@@ -26,6 +26,7 @@
show (x<:y) = show x+"<:"+show y;
show x = str x otherwise;
+tests =
puts "*** EXACT/INEXACT ***" $$
// These should all return exact results, except +/- with polar operands, as
// well as / and ^ which always return inexact results.
@@ -35,3 +36,5 @@
// If everything is all right here, these should all print __failed__.
do test [op,x,a;op=[(+),(-),(*),(%),(/),(^)];a=[2+:3,2<:3,2%3]] $$
do test [op,a,x;op=[(+),(-),(*),(%),(/),(^)];a=[2+:3,2<:3,2%3]];
+
+tests;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-08-24 01:30:51
|
Revision: 597
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=597&view=rev
Author: agraef
Date: 2008-08-24 01:31:00 +0000 (Sun, 24 Aug 2008)
Log Message:
-----------
Windows compatibility fixes.
Modified Paths:
--------------
pure/trunk/test/test020.log
pure/trunk/test/test020.pure
pure/trunk/test/test021.log
pure/trunk/test/test021.pure
Modified: pure/trunk/test/test020.log
===================================================================
--- pure/trunk/test/test020.log 2008-08-24 00:11:34 UTC (rev 596)
+++ pure/trunk/test/test020.log 2008-08-24 01:31:00 UTC (rev 597)
@@ -45,6 +45,8 @@
check _/*0:01*/ z/*0:1*/ = z/*0:1*/;
format (f/*0:101*/,x/*0:1101*/,y/*0:11101*/,z/*0:1111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show y/*0:11101*/+","+show z/*0:1111*/;
format (f/*0:101*/,x/*0:1101*/,z/*0:111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show z/*0:111*/;
+show x/*0:1*/::double = str x/*0:1*/ if infp x/*0:1*/||nanp x/*0:1*/;
+show x/*0:1*/::double = sprintf double_format 0.0 if x/*0:1*/==0.0;
show x/*0:1*/::double = sprintf double_format x/*0:1*/;
show (x/*0:101*/+:y/*0:11*/) = show x/*0:101*/+"+:"+show y/*0:11*/;
show (x/*0:101*/<:y/*0:11*/) = show x/*0:101*/+"<:"+show y/*0:11*/;
@@ -244,41 +246,43 @@
state 15: #0 #1
}
{
- rule #0: show x::double = sprintf double_format x
- rule #1: show (x+:y) = show x+"+:"+show y
- rule #2: show (x<:y) = show x+"<:"+show y
- rule #3: show x = str x
- state 0: #0 #1 #2 #3
+ rule #0: show x::double = str x if infp x||nanp x
+ rule #1: show x::double = sprintf double_format 0.0 if x==0.0
+ rule #2: show x::double = sprintf double_format x
+ rule #3: show (x+:y) = show x+"+:"+show y
+ rule #4: show (x<:y) = show x+"<:"+show y
+ rule #5: show x = str x
+ state 0: #0 #1 #2 #3 #4 #5
<var> state 1
<var>::double state 2
<app> state 3
- state 1: #3
- state 2: #0 #3
- state 3: #1 #2 #3
+ state 1: #5
+ state 2: #0 #1 #2 #5
+ state 3: #3 #4 #5
<var> state 4
<app> state 6
- state 4: #3
+ state 4: #5
<var> state 5
- state 5: #3
- state 6: #1 #2 #3
+ state 5: #5
+ state 6: #3 #4 #5
<var> state 7
+: state 10
<: state 13
- state 7: #3
+ state 7: #5
<var> state 8
- state 8: #3
+ state 8: #5
<var> state 9
- state 9: #3
- state 10: #1 #3
+ state 9: #5
+ state 10: #3 #5
<var> state 11
- state 11: #1 #3
+ state 11: #3 #5
<var> state 12
- state 12: #1 #3
- state 13: #2 #3
+ state 12: #3 #5
+ state 13: #4 #5
<var> state 14
- state 14: #2 #3
+ state 14: #4 #5
<var> state 15
- state 15: #2 #3
+ state 15: #4 #5
}
{
rule #0: tests = puts "*** UNARY ***"$$void (catmap (\f -> catmap (\x -> [test (f,x)]) x) f)$$puts "*** BINARY ***"$$void (catmap (\f -> catmap (\x -> [test (f,x)]) x2) f2)
@@ -2329,7 +2333,7 @@
(*),-1,1,-1
(*),-1,-1,1
(*),-1,0,0
-(*),-1,0.00,-0.00
+(*),-1,0.00,0.00
(*),-1,1.20,-1.20
(*),-1,-1.20,1.20
(*),-1,1L%3L,(-1L)%3L
@@ -2355,14 +2359,14 @@
(*),0,0,0
(*),0,0.00,0.00
(*),0,1.20,0.00
-(*),0,-1.20,-0.00
+(*),0,-1.20,0.00
(*),0,1L%3L,0L%1L
(*),0,(-1L)%4L,0L%1L
(*),0,1+:2,0+:0
(*),0,-1+:2,0+:0
(*),0,1+:-2,0+:0
-(*),0,-1.20+:4.30,-0.00+:0.00
-(*),0,1.20+:-4.30,0.00+:-0.00
+(*),0,-1.20+:4.30,0.00+:0.00
+(*),0,1.20+:-4.30,0.00+:0.00
(*),0,1L%2L+:1,0L%1L+:0
(*),0,1L%2L+:3L%4L,0L%1L+:0L%1L
(*),0,3<:1,0<:1
@@ -2375,18 +2379,18 @@
(*),0,nan,nan
(*),0,x,__failed__
(*),0.00,1,0.00
-(*),0.00,-1,-0.00
+(*),0.00,-1,0.00
(*),0.00,0,0.00
(*),0.00,0.00,0.00
(*),0.00,1.20,0.00
-(*),0.00,-1.20,-0.00
+(*),0.00,-1.20,0.00
(*),0.00,1L%3L,0.00
-(*),0.00,(-1L)%4L,-0.00
+(*),0.00,(-1L)%4L,0.00
(*),0.00,1+:2,0.00+:0.00
-(*),0.00,-1+:2,-0.00+:0.00
-(*),0.00,1+:-2,0.00+:-0.00
-(*),0.00,-1.20+:4.30,-0.00+:0.00
-(*),0.00,1.20+:-4.30,0.00+:-0.00
+(*),0.00,-1+:2,0.00+:0.00
+(*),0.00,1+:-2,0.00+:0.00
+(*),0.00,-1.20+:4.30,0.00+:0.00
+(*),0.00,1.20+:-4.30,0.00+:0.00
(*),0.00,1L%2L+:1,0.00+:0.00
(*),0.00,1L%2L+:3L%4L,0.00+:0.00
(*),0.00,3<:1,0.00<:1
@@ -2424,8 +2428,8 @@
(*),1.20,x,__failed__
(*),-1.20,1,-1.20
(*),-1.20,-1,1.20
-(*),-1.20,0,-0.00
-(*),-1.20,0.00,-0.00
+(*),-1.20,0,0.00
+(*),-1.20,0.00,0.00
(*),-1.20,1.20,-1.44
(*),-1.20,-1.20,1.44
(*),-1.20,1L%3L,-0.400
@@ -2473,7 +2477,7 @@
(*),(-1L)%4L,1,(-1L)%4L
(*),(-1L)%4L,-1,1L%4L
(*),(-1L)%4L,0,0L%1L
-(*),(-1L)%4L,0.00,-0.00
+(*),(-1L)%4L,0.00,0.00
(*),(-1L)%4L,1.20,-0.300
(*),(-1L)%4L,-1.20,0.300
(*),(-1L)%4L,1L%3L,(-1L)%12L
@@ -2521,7 +2525,7 @@
(*),-1+:2,1,-1+:2
(*),-1+:2,-1,1+:-2
(*),-1+:2,0,0+:0
-(*),-1+:2,0.00,-0.00+:0.00
+(*),-1+:2,0.00,0.00+:0.00
(*),-1+:2,1.20,-1.20+:2.40
(*),-1+:2,-1.20,1.20+:-2.40
(*),-1+:2,1L%3L,(-1L)%3L+:2L%3L
@@ -2545,7 +2549,7 @@
(*),1+:-2,1,1+:-2
(*),1+:-2,-1,-1+:2
(*),1+:-2,0,0+:0
-(*),1+:-2,0.00,0.00+:-0.00
+(*),1+:-2,0.00,0.00+:0.00
(*),1+:-2,1.20,1.20+:-2.40
(*),1+:-2,-1.20,-1.20+:2.40
(*),1+:-2,1L%3L,1L%3L+:(-2L)%3L
@@ -2568,8 +2572,8 @@
(*),1+:-2,x,__failed__
(*),-1.20+:4.30,1,-1.20+:4.30
(*),-1.20+:4.30,-1,1.20+:-4.30
-(*),-1.20+:4.30,0,-0.00+:0.00
-(*),-1.20+:4.30,0.00,-0.00+:0.00
+(*),-1.20+:4.30,0,0.00+:0.00
+(*),-1.20+:4.30,0.00,0.00+:0.00
(*),-1.20+:4.30,1.20,-1.44+:5.16
(*),-1.20+:4.30,-1.20,1.44+:-5.16
(*),-1.20+:4.30,1L%3L,-0.400+:1.43
@@ -2592,8 +2596,8 @@
(*),-1.20+:4.30,x,__failed__
(*),1.20+:-4.30,1,1.20+:-4.30
(*),1.20+:-4.30,-1,-1.20+:4.30
-(*),1.20+:-4.30,0,0.00+:-0.00
-(*),1.20+:-4.30,0.00,0.00+:-0.00
+(*),1.20+:-4.30,0,0.00+:0.00
+(*),1.20+:-4.30,0.00,0.00+:0.00
(*),1.20+:-4.30,1.20,1.44+:-5.16
(*),1.20+:-4.30,-1.20,-1.44+:5.16
(*),1.20+:-4.30,1L%3L,0.400+:-1.43
@@ -2899,7 +2903,7 @@
(/),1,3.10<:2.50,0.323<:-2.50
(/),1,2L%3L<:2,1.50<:-2
(/),1,1L%2L<:3L%4L,2.00<:(-3L)%4L
-(/),1,-inf,-0.00
+(/),1,-inf,0.00
(/),1,nan,nan
(/),1,x,__failed__
(/),-1,1,-1.00
@@ -2927,17 +2931,17 @@
(/),-1,nan,nan
(/),-1,x,__failed__
(/),0,1,0.00
-(/),0,-1,-0.00
+(/),0,-1,0.00
(/),0,0,nan
(/),0,0.00,nan
(/),0,1.20,0.00
-(/),0,-1.20,-0.00
+(/),0,-1.20,0.00
(/),0,1L%3L,0.00
-(/),0,(-1L)%4L,-0.00
+(/),0,(-1L)%4L,0.00
(/),0,1+:2,0.00+:0.00
(/),0,-1+:2,0.00+:0.00
(/),0,1+:-2,0.00+:0.00
-(/),0,-1.20+:4.30,-0.00+:0.00
+(/),0,-1.20+:4.30,0.00+:0.00
(/),0,1.20+:-4.30,0.00+:0.00
(/),0,1L%2L+:1,0.00+:0.00
(/),0,1L%2L+:3L%4L,0.00+:0.00
@@ -2947,21 +2951,21 @@
(/),0,3.10<:2.50,0.00<:-2.50
(/),0,2L%3L<:2,0.00<:-2
(/),0,1L%2L<:3L%4L,0.00<:(-3L)%4L
-(/),0,-inf,-0.00
+(/),0,-inf,0.00
(/),0,nan,nan
(/),0,x,__failed__
(/),0.00,1,0.00
-(/),0.00,-1,-0.00
+(/),0.00,-1,0.00
(/),0.00,0,nan
(/),0.00,0.00,nan
(/),0.00,1.20,0.00
-(/),0.00,-1.20,-0.00
+(/),0.00,-1.20,0.00
(/),0.00,1L%3L,0.00
-(/),0.00,(-1L)%4L,-0.00
+(/),0.00,(-1L)%4L,0.00
(/),0.00,1+:2,0.00+:0.00
-(/),0.00,-1+:2,-0.00+:0.00
+(/),0.00,-1+:2,0.00+:0.00
(/),0.00,1+:-2,0.00+:0.00
-(/),0.00,-1.20+:4.30,-0.00+:0.00
+(/),0.00,-1.20+:4.30,0.00+:0.00
(/),0.00,1.20+:-4.30,0.00+:0.00
(/),0.00,1L%2L+:1,0.00+:0.00
(/),0.00,1L%2L+:3L%4L,0.00+:0.00
@@ -2971,7 +2975,7 @@
(/),0.00,3.10<:2.50,0.00<:-2.50
(/),0.00,2L%3L<:2,0.00<:-2
(/),0.00,1L%2L<:3L%4L,0.00<:(-3L)%4L
-(/),0.00,-inf,-0.00
+(/),0.00,-inf,0.00
(/),0.00,nan,nan
(/),0.00,x,__failed__
(/),1.20,1,1.20
@@ -2995,7 +2999,7 @@
(/),1.20,3.10<:2.50,0.387<:-2.50
(/),1.20,2L%3L<:2,1.80<:-2
(/),1.20,1L%2L<:3L%4L,2.40<:(-3L)%4L
-(/),1.20,-inf,-0.00
+(/),1.20,-inf,0.00
(/),1.20,nan,nan
(/),1.20,x,__failed__
(/),-1.20,1,-1.20
@@ -3043,7 +3047,7 @@
(/),1L%3L,3.10<:2.50,0.108<:-2.50
(/),1L%3L,2L%3L<:2,0.500<:-2
(/),1L%3L,1L%2L<:3L%4L,0.667<:(-3L)%4L
-(/),1L%3L,-inf,-0.00
+(/),1L%3L,-inf,0.00
(/),1L%3L,nan,nan
(/),1L%3L,x,__failed__
(/),(-1L)%4L,1,-0.250
@@ -3091,7 +3095,7 @@
(/),1+:2,3.10<:2.50,0.128+:-0.710
(/),1+:2,2L%3L<:2,2.10+:-2.61
(/),1+:2,1L%2L<:3L%4L,4.19+:1.56
-(/),1+:2,-inf,-0.00+:-0.00
+(/),1+:2,-inf,0.00+:0.00
(/),1+:2,nan,nan+:nan
(/),1+:2,x,__failed__
(/),-1+:2,1,-1.00+:2.00
@@ -3115,7 +3119,7 @@
(/),-1+:2,3.10<:2.50,0.645+:-0.324
(/),-1+:2,2L%3L<:2,3.35+:0.116
(/),-1+:2,1L%2L<:3L%4L,1.26+:4.29
-(/),-1+:2,-inf,0.00+:-0.00
+(/),-1+:2,-inf,0.00+:0.00
(/),-1+:2,nan,nan+:nan
(/),-1+:2,x,__failed__
(/),1+:-2,1,1.00+:-2.00
@@ -3139,7 +3143,7 @@
(/),1+:-2,3.10<:2.50,-0.645+:0.324
(/),1+:-2,2L%3L<:2,-3.35+:-0.116
(/),1+:-2,1L%2L<:3L%4L,-1.26+:-4.29
-(/),1+:-2,-inf,-0.00+:0.00
+(/),1+:-2,-inf,0.00+:0.00
(/),1+:-2,nan,nan+:nan
(/),1+:-2,x,__failed__
(/),-1.20+:4.30,1,-1.20+:4.30
@@ -3163,7 +3167,7 @@
(/),-1.20+:4.30,3.10<:2.50,1.14+:-0.880
(/),-1.20+:4.30,2L%3L<:2,6.61+:-1.05
(/),-1.20+:4.30,1L%2L<:3L%4L,4.11+:7.93
-(/),-1.20+:4.30,-inf,0.00+:-0.00
+(/),-1.20+:4.30,-inf,0.00+:0.00
(/),-1.20+:4.30,nan,nan+:nan
(/),-1.20+:4.30,x,__failed__
(/),1.20+:-4.30,1,1.20+:-4.30
@@ -3187,7 +3191,7 @@
(/),1.20+:-4.30,3.10<:2.50,-1.14+:0.880
(/),1.20+:-4.30,2L%3L<:2,-6.61+:1.05
(/),1.20+:-4.30,1L%2L<:3L%4L,-4.11+:-7.93
-(/),1.20+:-4.30,-inf,-0.00+:0.00
+(/),1.20+:-4.30,-inf,0.00+:0.00
(/),1.20+:-4.30,nan,nan+:nan
(/),1.20+:-4.30,x,__failed__
(/),1L%2L+:1,1,0.500+:1.00
@@ -3211,7 +3215,7 @@
(/),1L%2L+:1,3.10<:2.50,0.0638+:-0.355
(/),1L%2L+:1,2L%3L<:2,1.05+:-1.31
(/),1L%2L+:1,1L%2L<:3L%4L,2.09+:0.782
-(/),1L%2L+:1,-inf,-0.00+:-0.00
+(/),1L%2L+:1,-inf,0.00+:0.00
(/),1L%2L+:1,nan,nan+:nan
(/),1L%2L+:1,x,__failed__
(/),1L%2L+:3L%4L,1,0.500+:0.750
@@ -3235,7 +3239,7 @@
(/),1L%2L+:3L%4L,3.10<:2.50,0.0156+:-0.290
(/),1L%2L+:3L%4L,2L%3L<:2,0.711+:-1.15
(/),1L%2L+:3L%4L,1L%2L<:3L%4L,1.75+:0.416
-(/),1L%2L+:3L%4L,-inf,-0.00+:-0.00
+(/),1L%2L+:3L%4L,-inf,0.00+:0.00
(/),1L%2L+:3L%4L,nan,nan+:nan
(/),1L%2L+:3L%4L,x,__failed__
(/),3<:1,1,3.00<:1
@@ -3259,7 +3263,7 @@
(/),3<:1,3.10<:2.50,0.968<:-1.50
(/),3<:1,2L%3L<:2,4.50<:-1
(/),3<:1,1L%2L<:3L%4L,6.00<:1L%4L
-(/),3<:1,-inf,-0.00<:1
+(/),3<:1,-inf,0.00<:1
(/),3<:1,nan,nan<:1
(/),3<:1,x,__failed__
(/),3<:-2.14,1,3.00<:-2.14
@@ -3283,7 +3287,7 @@
(/),3<:-2.14,3.10<:2.50,0.968<:1.64
(/),3<:-2.14,2L%3L<:2,4.50<:2.14
(/),3<:-2.14,1L%2L<:3L%4L,6.00<:-2.89
-(/),3<:-2.14,-inf,-0.00<:-2.14
+(/),3<:-2.14,-inf,0.00<:-2.14
(/),3<:-2.14,nan,nan<:-2.14
(/),3<:-2.14,x,__failed__
(/),3.00<:-3,1,3.00<:-3
@@ -3307,7 +3311,7 @@
(/),3.00<:-3,3.10<:2.50,0.968<:0.783
(/),3.00<:-3,2L%3L<:2,4.50<:1.28
(/),3.00<:-3,1L%2L<:3L%4L,6.00<:2.53
-(/),3.00<:-3,-inf,-0.00<:-3
+(/),3.00<:-3,-inf,0.00<:-3
(/),3.00<:-3,nan,nan<:-3
(/),3.00<:-3,x,__failed__
(/),3.10<:2.50,1,3.10<:2.50
@@ -3331,7 +3335,7 @@
(/),3.10<:2.50,3.10<:2.50,1.00<:0.00
(/),3.10<:2.50,2L%3L<:2,4.65<:0.500
(/),3.10<:2.50,1L%2L<:3L%4L,6.20<:1.75
-(/),3.10<:2.50,-inf,-0.00<:2.50
+(/),3.10<:2.50,-inf,0.00<:2.50
(/),3.10<:2.50,nan,nan<:2.50
(/),3.10<:2.50,x,__failed__
(/),2L%3L<:2,1,0.667<:2
@@ -3355,7 +3359,7 @@
(/),2L%3L<:2,3.10<:2.50,0.215<:-0.500
(/),2L%3L<:2,2L%3L<:2,1.00<:0
(/),2L%3L<:2,1L%2L<:3L%4L,1.33<:5L%4L
-(/),2L%3L<:2,-inf,-0.00<:2
+(/),2L%3L<:2,-inf,0.00<:2
(/),2L%3L<:2,nan,nan<:2
(/),2L%3L<:2,x,__failed__
(/),1L%2L<:3L%4L,1,0.500<:3L%4L
@@ -3379,7 +3383,7 @@
(/),1L%2L<:3L%4L,3.10<:2.50,0.161<:-1.75
(/),1L%2L<:3L%4L,2L%3L<:2,0.750<:(-5L)%4L
(/),1L%2L<:3L%4L,1L%2L<:3L%4L,1.00<:0L%1L
-(/),1L%2L<:3L%4L,-inf,-0.00<:3L%4L
+(/),1L%2L<:3L%4L,-inf,0.00<:3L%4L
(/),1L%2L<:3L%4L,nan,nan<:3L%4L
(/),1L%2L<:3L%4L,x,__failed__
(/),-inf,1,-inf
@@ -3470,8 +3474,8 @@
(^),1,1L%2L+:1,1.00+:0.00
(^),1,1L%2L+:3L%4L,1.00+:0.00
(^),1,3<:1,1.00<:0.00
-(^),1,3<:-2.14,1.00<:-0.00
-(^),1,3.00<:-3,1.00<:-0.00
+(^),1,3<:-2.14,1.00<:0.00
+(^),1,3.00<:-3,1.00<:0.00
(^),1,3.10<:2.50,1.00<:0.00
(^),1,2L%3L<:2,1.00<:0.00
(^),1,1L%2L<:3L%4L,1.00<:0.00
@@ -3696,8 +3700,8 @@
(^),-1+:2,x,__failed__
(^),1+:-2,1,1.00+:-2.00
(^),1+:-2,-1,0.200+:0.400
-(^),1+:-2,0,1.00+:-0.00
-(^),1+:-2,0.00,1.00+:-0.00
+(^),1+:-2,0,1.00+:0.00
+(^),1+:-2,0.00,1.00+:0.00
(^),1+:-2,1.20,0.630+:-2.55
(^),1+:-2,-1.20,0.0913+:0.370
(^),1+:-2,1L%3L,1.22+:-0.472
@@ -3744,8 +3748,8 @@
(^),-1.20+:4.30,x,__failed__
(^),1.20+:-4.30,1,1.20+:-4.30
(^),1.20+:-4.30,-1,0.0602+:0.216
-(^),1.20+:-4.30,0,1.00+:-0.00
-(^),1.20+:-4.30,0.00,1.00+:-0.00
+(^),1.20+:-4.30,0,1.00+:0.00
+(^),1.20+:-4.30,0.00,1.00+:0.00
(^),1.20+:-4.30,1.20,0.0748+:-6.02
(^),1.20+:-4.30,-1.20,0.00206+:0.166
(^),1.20+:-4.30,1L%3L,1.49+:-0.691
@@ -3840,8 +3844,8 @@
(^),3<:1,x,__failed__
(^),3<:-2.14,1,3.00<:-2.14
(^),3<:-2.14,-1,0.333<:2.14
-(^),3<:-2.14,0,1.00<:-0.00
-(^),3<:-2.14,0.00,1.00<:-0.00
+(^),3<:-2.14,0,1.00<:0.00
+(^),3<:-2.14,0.00,1.00<:0.00
(^),3<:-2.14,1.20,3.74<:-2.57
(^),3<:-2.14,-1.20,0.268<:2.57
(^),3<:-2.14,1L%3L,1.44<:-0.714
@@ -3864,8 +3868,8 @@
(^),3<:-2.14,x,__failed__
(^),3.00<:-3,1,3.00<:-3.00
(^),3.00<:-3,-1,0.333<:3.00
-(^),3.00<:-3,0,1.00<:-0.00
-(^),3.00<:-3,0.00,1.00<:-0.00
+(^),3.00<:-3,0,1.00<:0.00
+(^),3.00<:-3,0.00,1.00<:0.00
(^),3.00<:-3,1.20,3.74<:2.68
(^),3.00<:-3,-1.20,0.268<:-2.68
(^),3.00<:-3,1L%3L,1.44<:-1.00
@@ -3959,7 +3963,7 @@
(^),1L%2L<:3L%4L,nan,nan<:nan
(^),1L%2L<:3L%4L,x,__failed__
(^),-inf,1,-inf
-(^),-inf,-1,-0.00
+(^),-inf,-1,0.00
(^),-inf,0,1.00
(^),-inf,0.00,1.00
(^),-inf,1.20,inf
Modified: pure/trunk/test/test020.pure
===================================================================
--- pure/trunk/test/test020.pure 2008-08-24 00:11:34 UTC (rev 596)
+++ pure/trunk/test/test020.pure 2008-08-24 01:31:00 UTC (rev 597)
@@ -42,7 +42,11 @@
format (f,x,y,z) = str f+","+show x+","+show y+","+show z;
format (f,x,z) = str f+","+show x+","+show z;
-show x::double = sprintf double_format x;
+show x::double
+= str x if infp x || nanp x; // fix Windoze quirks
+= sprintf double_format 0.0 if x==0.0; // work around +/-0.0 issues
+= sprintf double_format x otherwise;
+
show (x+:y) = show x+"+:"+show y;
show (x<:y) = show x+"<:"+show y;
show x = str x otherwise;
Modified: pure/trunk/test/test021.log
===================================================================
--- pure/trunk/test/test021.log 2008-08-24 00:11:34 UTC (rev 596)
+++ pure/trunk/test/test021.log 2008-08-24 01:31:00 UTC (rev 597)
@@ -7,6 +7,8 @@
check _/*0:01*/ z/*0:1*/ = z/*0:1*/;
format (f/*0:101*/,x/*0:1101*/,y/*0:11101*/,z/*0:1111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show y/*0:11101*/+","+show z/*0:1111*/;
format (f/*0:101*/,x/*0:1101*/,z/*0:111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show z/*0:111*/;
+show x/*0:1*/::double = str x/*0:1*/ if infp x/*0:1*/||nanp x/*0:1*/;
+show x/*0:1*/::double = sprintf double_format 0.0 if x/*0:1*/==0.0;
show x/*0:1*/::double = sprintf double_format x/*0:1*/;
show (x/*0:101*/+:y/*0:11*/) = show x/*0:101*/+"+:"+show y/*0:11*/;
show (x/*0:101*/<:y/*0:11*/) = show x/*0:101*/+"<:"+show y/*0:11*/;
@@ -226,41 +228,43 @@
state 15: #0 #1
}
{
- rule #0: show x::double = sprintf double_format x
- rule #1: show (x+:y) = show x+"+:"+show y
- rule #2: show (x<:y) = show x+"<:"+show y
- rule #3: show x = str x
- state 0: #0 #1 #2 #3
+ rule #0: show x::double = str x if infp x||nanp x
+ rule #1: show x::double = sprintf double_format 0.0 if x==0.0
+ rule #2: show x::double = sprintf double_format x
+ rule #3: show (x+:y) = show x+"+:"+show y
+ rule #4: show (x<:y) = show x+"<:"+show y
+ rule #5: show x = str x
+ state 0: #0 #1 #2 #3 #4 #5
<var> state 1
<var>::double state 2
<app> state 3
- state 1: #3
- state 2: #0 #3
- state 3: #1 #2 #3
+ state 1: #5
+ state 2: #0 #1 #2 #5
+ state 3: #3 #4 #5
<var> state 4
<app> state 6
- state 4: #3
+ state 4: #5
<var> state 5
- state 5: #3
- state 6: #1 #2 #3
+ state 5: #5
+ state 6: #3 #4 #5
<var> state 7
+: state 10
<: state 13
- state 7: #3
+ state 7: #5
<var> state 8
- state 8: #3
+ state 8: #5
<var> state 9
- state 9: #3
- state 10: #1 #3
+ state 9: #5
+ state 10: #3 #5
<var> state 11
- state 11: #1 #3
+ state 11: #3 #5
<var> state 12
- state 12: #1 #3
- state 13: #2 #3
+ state 12: #3 #5
+ state 13: #4 #5
<var> state 14
- state 14: #2 #3
+ state 14: #4 #5
<var> state 15
- state 15: #2 #3
+ state 15: #4 #5
}
{
rule #0: tests = puts "*** EXACT/INEXACT ***"$$do test (catmap (\op -> catmap (\a -> [(op,2,a)]) [2+:3,2<:3,2%3]) [(+),(-),(*),(%),(/),(^)])$$do test (catmap (\op -> catmap (\a -> [(op,a,2)]) [2+:3,2<:3,2%3]) [(+),(-),(*),(%),(/),(^)])$$puts "*** SYMBOLIC ***"$$do test (catmap (\op -> catmap (\a -> [(op,x,a)]) [2+:3,2<:3,2%3]) [(+),(-),(*),(%),(/),(^)])$$do test (catmap (\op -> catmap (\a -> [(op,a,x)]) [2+:3,2<:3,2%3]) [(+),(-),(*),(%),(/),(^)])
Modified: pure/trunk/test/test021.pure
===================================================================
--- pure/trunk/test/test021.pure 2008-08-24 00:11:34 UTC (rev 596)
+++ pure/trunk/test/test021.pure 2008-08-24 01:31:00 UTC (rev 597)
@@ -21,7 +21,11 @@
format (f,x,y,z) = str f+","+show x+","+show y+","+show z;
format (f,x,z) = str f+","+show x+","+show z;
-show x::double = sprintf double_format x;
+show x::double
+= str x if infp x || nanp x; // fix Windoze quirks
+= sprintf double_format 0.0 if x==0.0; // work around +/-0.0 issues
+= sprintf double_format x otherwise;
+
show (x+:y) = show x+"+:"+show y;
show (x<:y) = show x+"<:"+show y;
show x = str x otherwise;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-08-24 02:09:15
|
Revision: 598
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=598&view=rev
Author: agraef
Date: 2008-08-24 02:09:25 +0000 (Sun, 24 Aug 2008)
Log Message:
-----------
Comment changes.
Modified Paths:
--------------
pure/trunk/test/test020.pure
pure/trunk/test/test021.pure
Modified: pure/trunk/test/test020.pure
===================================================================
--- pure/trunk/test/test020.pure 2008-08-24 01:31:00 UTC (rev 597)
+++ pure/trunk/test/test020.pure 2008-08-24 02:09:25 UTC (rev 598)
@@ -1,5 +1,9 @@
// math.pure tests by Eddie Rucker
+/* CAVEAT: This test may fail on some systems (most notably, Windows) which
+ lack a POSIX-conformant implementation of the mathematical functions in the
+ C library. */
+
using math;
// unary operations
@@ -43,8 +47,10 @@
format (f,x,z) = str f+","+show x+","+show z;
show x::double
-= str x if infp x || nanp x; // fix Windoze quirks
-= sprintf double_format 0.0 if x==0.0; // work around +/-0.0 issues
+= str x if infp x || nanp x; // Windoze compatibility
+// Kludge: Some systems have -0.0, some don't, on some it's broken. Simply
+// ignore the sign of floating point zeros for now.
+= sprintf double_format 0.0 if x==0.0;
= sprintf double_format x otherwise;
show (x+:y) = show x+"+:"+show y;
Modified: pure/trunk/test/test021.pure
===================================================================
--- pure/trunk/test/test021.pure 2008-08-24 01:31:00 UTC (rev 597)
+++ pure/trunk/test/test021.pure 2008-08-24 02:09:25 UTC (rev 598)
@@ -22,8 +22,10 @@
format (f,x,z) = str f+","+show x+","+show z;
show x::double
-= str x if infp x || nanp x; // fix Windoze quirks
-= sprintf double_format 0.0 if x==0.0; // work around +/-0.0 issues
+= str x if infp x || nanp x; // Windoze compatibility
+// Kludge: Some systems have -0.0, some don't, on some it's broken. Simply
+// ignore the sign of floating point zeros for now.
+= sprintf double_format 0.0 if x==0.0;
= sprintf double_format x otherwise;
show (x+:y) = show x+"+:"+show y;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-08-26 00:05:29
|
Revision: 615
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=615&view=rev
Author: agraef
Date: 2008-08-26 00:05:35 +0000 (Tue, 26 Aug 2008)
Log Message:
-----------
Update test logs.
Modified Paths:
--------------
pure/trunk/test/test015.log
pure/trunk/test/test018.log
pure/trunk/test/test020.log
pure/trunk/test/test021.log
Modified: pure/trunk/test/test015.log
===================================================================
--- pure/trunk/test/test015.log 2008-08-26 00:01:19 UTC (rev 614)
+++ pure/trunk/test/test015.log 2008-08-26 00:05:35 UTC (rev 615)
@@ -196,36 +196,36 @@
state 1: #0
}) (11..20));
{
- rule #0: c = hdict$zipwith (=>) (catmap (\i -> [(i,double i,str i)]) (1..10)) (1..10)
+ rule #0: c = hdict (zipwith (=>) (catmap (\i -> [(i,double i,str i)]) (1..10)) (1..10))
state 0: #0
<var> state 1
state 1: #0
}
-let c = hdict$zipwith (=>) (catmap (\i/*0:*/ -> [(i/*0:*/,double i/*0:*/,str i/*0:*/)] {
+let c = hdict (zipwith (=>) (catmap (\i/*0:*/ -> [(i/*0:*/,double i/*0:*/,str i/*0:*/)] {
rule #0: i = [(i,double i,str i)]
state 0: #0
<var> state 1
state 1: #0
-}) (1..10)) (1..10);
+}) (1..10)) (1..10));
{
- rule #0: d = hdict$zipwith (=>) (catmap (\i -> [(i,double i,str i)]) (11..20)) (11..20)
+ rule #0: d = hdict (zipwith (=>) (catmap (\i -> [(i,double i,str i)]) (11..20)) (11..20))
state 0: #0
<var> state 1
state 1: #0
}
-let d = hdict$zipwith (=>) (catmap (\i/*0:*/ -> [(i/*0:*/,double i/*0:*/,str i/*0:*/)] {
+let d = hdict (zipwith (=>) (catmap (\i/*0:*/ -> [(i/*0:*/,double i/*0:*/,str i/*0:*/)] {
rule #0: i = [(i,double i,str i)]
state 0: #0
<var> state 1
state 1: #0
-}) (11..20)) (11..20);
+}) (11..20)) (11..20));
{
- rule #0: e = dict$zipwith (=>) (map str (1..10)) (map str (1..10))
+ rule #0: e = dict (zipwith (=>) (map str (1..10)) (map str (1..10)))
state 0: #0
<var> state 1
state 1: #0
}
-let e = dict$zipwith (=>) (map str (1..10)) (map str (1..10));
+let e = dict (zipwith (=>) (map str (1..10)) (map str (1..10)));
a;
Dict (bin 4 4.0 (-1) (bin 2 2.0 0 (bin 1 1.0 0 nil nil) (bin 3 3.0 0 nil nil)) (bin 8 8.0 0 (bin 6 6.0 0 (bin 5 5.0 0 nil nil) (bin 7 7.0 0 nil nil)) (bin 9 9.0 (-1) nil (bin 10 10.0 0 nil nil))))
b;
Modified: pure/trunk/test/test018.log
===================================================================
--- pure/trunk/test/test018.log 2008-08-26 00:01:19 UTC (rev 614)
+++ pure/trunk/test/test018.log 2008-08-26 00:05:35 UTC (rev 615)
@@ -70,15 +70,15 @@
"80000000"
sprintf "%x" (-4294967295L);
"1"
-ord$sprintf "%c" 255;
+ord (sprintf "%c" 255);
255
-ord$sprintf "%c" 255L;
+ord (sprintf "%c" 255L);
255
sscanf "ffffffff" "%x";
-1
-uint$sscanf "ffffffff" "%x";
+uint (sscanf "ffffffff" "%x");
4294967295L
sscanf "4294967295" "%u";
-1
-uint$sscanf "4294967295" "%u";
+uint (sscanf "4294967295" "%u");
4294967295L
Modified: pure/trunk/test/test020.log
===================================================================
--- pure/trunk/test/test020.log 2008-08-26 00:01:19 UTC (rev 614)
+++ pure/trunk/test/test020.log 2008-08-26 00:05:35 UTC (rev 615)
@@ -37,8 +37,8 @@
state 1: #0
}) x;
let double_format = "%#0.3g";
-test (f/*0:101*/,x/*0:1101*/,y/*0:111*/) = puts$format (f/*0:101*/,x/*0:1101*/,y/*0:111*/,check (f/*0:101*/,x/*0:1101*/,y/*0:111*/) (catch __error__ (f/*1:101*/ x/*1:1101*/ y/*1:111*/)));
-test (f/*0:101*/,x/*0:11*/) = puts$format (f/*0:101*/,x/*0:11*/,check (f/*0:101*/,x/*0:11*/) (catch __error__ (f/*1:101*/ x/*1:11*/)));
+test (f/*0:101*/,x/*0:1101*/,y/*0:111*/) = puts (format (f/*0:101*/,x/*0:1101*/,y/*0:111*/,check (f/*0:101*/,x/*0:1101*/,y/*0:111*/) (catch __error__ (f/*1:101*/ x/*1:1101*/ y/*1:111*/))));
+test (f/*0:101*/,x/*0:11*/) = puts (format (f/*0:101*/,x/*0:11*/,check (f/*0:101*/,x/*0:11*/) (catch __error__ (f/*1:101*/ x/*1:11*/))));
check _/*0:01*/ z/*0:1*/ = z/*0:1*/ if numberp z/*0:1*/;
check (f/*0:0101*/,x/*0:01101*/,y/*0:0111*/) (g@_/*0:100*/ u/*0:101*/ v/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:100*/&&x/*0:01101*/===u/*0:101*/&&y/*0:0111*/===v/*0:11*/;
check (f/*0:0101*/,x/*0:011*/) (g@_/*0:10*/ u/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:10*/&&x/*0:011*/===u/*0:11*/;
@@ -211,8 +211,8 @@
state 19: #0 #1
}
{
- rule #0: test (f,x,y) = puts$format (f,x,y,check (f,x,y) (catch __error__ (f x y)))
- rule #1: test (f,x) = puts$format (f,x,check (f,x) (catch __error__ (f x)))
+ rule #0: test (f,x,y) = puts (format (f,x,y,check (f,x,y) (catch __error__ (f x y))))
+ rule #1: test (f,x) = puts (format (f,x,check (f,x) (catch __error__ (f x))))
state 0: #0 #1
<app> state 1
state 1: #0 #1
Modified: pure/trunk/test/test021.log
===================================================================
--- pure/trunk/test/test021.log 2008-08-26 00:01:19 UTC (rev 614)
+++ pure/trunk/test/test021.log 2008-08-26 00:05:35 UTC (rev 615)
@@ -1,6 +1,6 @@
let double_format = "%#0.3g";
-test (f/*0:101*/,x/*0:1101*/,y/*0:111*/) = puts$format (f/*0:101*/,x/*0:1101*/,y/*0:111*/,check (f/*0:101*/,x/*0:1101*/,y/*0:111*/) (catch __error__ (f/*1:101*/ x/*1:1101*/ y/*1:111*/)));
-test (f/*0:101*/,x/*0:11*/) = puts$format (f/*0:101*/,x/*0:11*/,check (f/*0:101*/,x/*0:11*/) (catch __error__ (f/*1:101*/ x/*1:11*/)));
+test (f/*0:101*/,x/*0:1101*/,y/*0:111*/) = puts (format (f/*0:101*/,x/*0:1101*/,y/*0:111*/,check (f/*0:101*/,x/*0:1101*/,y/*0:111*/) (catch __error__ (f/*1:101*/ x/*1:1101*/ y/*1:111*/))));
+test (f/*0:101*/,x/*0:11*/) = puts (format (f/*0:101*/,x/*0:11*/,check (f/*0:101*/,x/*0:11*/) (catch __error__ (f/*1:101*/ x/*1:11*/))));
check _/*0:01*/ z/*0:1*/ = z/*0:1*/ if numberp z/*0:1*/;
check (f/*0:0101*/,x/*0:01101*/,y/*0:0111*/) (g@_/*0:100*/ u/*0:101*/ v/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:100*/&&x/*0:01101*/===u/*0:101*/&&y/*0:0111*/===v/*0:11*/;
check (f/*0:0101*/,x/*0:011*/) (g@_/*0:10*/ u/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:10*/&&x/*0:011*/===u/*0:11*/;
@@ -193,8 +193,8 @@
state 19: #0 #1
}
{
- rule #0: test (f,x,y) = puts$format (f,x,y,check (f,x,y) (catch __error__ (f x y)))
- rule #1: test (f,x) = puts$format (f,x,check (f,x) (catch __error__ (f x)))
+ rule #0: test (f,x,y) = puts (format (f,x,y,check (f,x,y) (catch __error__ (f x y))))
+ rule #1: test (f,x) = puts (format (f,x,check (f,x) (catch __error__ (f x))))
state 0: #0 #1
<app> state 1
state 1: #0 #1
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-08-30 01:32:59
|
Revision: 661
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=661&view=rev
Author: agraef
Date: 2008-08-30 01:33:10 +0000 (Sat, 30 Aug 2008)
Log Message:
-----------
Update test logs.
Modified Paths:
--------------
pure/trunk/test/prelude.log
pure/trunk/test/test020.log
Modified: pure/trunk/test/prelude.log
===================================================================
--- pure/trunk/test/prelude.log 2008-08-30 01:28:49 UTC (rev 660)
+++ pure/trunk/test/prelude.log 2008-08-30 01:33:10 UTC (rev 661)
@@ -11,6 +11,7 @@
uncurry3 f/*0:01*/ (x/*0:101*/,y/*0:1101*/,z/*0:111*/) = f/*0:01*/ x/*0:101*/ y/*0:1101*/ z/*0:111*/;
def f/*0:01*/$x/*0:1*/ = f/*0:01*/ x/*0:1*/;
def (f/*0:001*/.g/*0:01*/) x/*0:1*/ = f/*0:001*/ (g/*0:01*/ x/*0:1*/);
+def void (catmap f/*0:101*/ x/*0:11*/) = do f/*0:101*/ x/*0:11*/;
(x/*0:0101*/=>v/*0:011*/)==(y/*0:101*/=>w/*0:11*/) = if x/*0:0101*/==y/*0:101*/ then v/*0:011*/==w/*0:11*/ else 0;
(x/*0:0101*/=>v/*0:011*/)!=(y/*0:101*/=>w/*0:11*/) = if x/*0:0101*/!=y/*0:101*/ then 1 else v/*0:011*/!=w/*0:11*/;
x/*0:01*/,() = x/*0:01*/;
Modified: pure/trunk/test/test020.log
===================================================================
--- pure/trunk/test/test020.log 2008-08-30 01:28:49 UTC (rev 660)
+++ pure/trunk/test/test020.log 2008-08-30 01:33:10 UTC (rev 661)
@@ -51,7 +51,7 @@
show (x/*0:101*/+:y/*0:11*/) = show x/*0:101*/+"+:"+show y/*0:11*/;
show (x/*0:101*/<:y/*0:11*/) = show x/*0:101*/+"<:"+show y/*0:11*/;
show x/*0:1*/ = str x/*0:1*/;
-tests = puts "*** UNARY ***"$$void (catmap (\f/*0:*/ -> catmap (\x/*0:*/ -> [test (f/*1:*/,x/*0:*/)] {
+tests = puts "*** UNARY ***"$$do (\f/*0:*/ -> catmap (\x/*0:*/ -> [test (f/*1:*/,x/*0:*/)] {
rule #0: x = [test (f,x)]
state 0: #0
<var> state 1
@@ -61,7 +61,7 @@
state 0: #0
<var> state 1
state 1: #0
-}) f)$$puts "*** BINARY ***"$$void (catmap (\f/*0:*/ -> catmap (\x/*0:*/ -> [test (f/*1:*/,x/*0:*/)] {
+}) f$$puts "*** BINARY ***"$$do (\f/*0:*/ -> catmap (\x/*0:*/ -> [test (f/*1:*/,x/*0:*/)] {
rule #0: x = [test (f,x)]
state 0: #0
<var> state 1
@@ -71,7 +71,7 @@
state 0: #0
<var> state 1
state 1: #0
-}) f2);
+}) f2;
{
rule #0: check _ z = z if numberp z
rule #1: check (f,x,y) (g@_ u v) = __failed__ if f===g&&x===u&&y===v
@@ -285,7 +285,7 @@
state 15: #4 #5
}
{
- rule #0: tests = puts "*** UNARY ***"$$void (catmap (\f -> catmap (\x -> [test (f,x)]) x) f)$$puts "*** BINARY ***"$$void (catmap (\f -> catmap (\x -> [test (f,x)]) x2) f2)
+ rule #0: tests = puts "*** UNARY ***"$$do (\f -> catmap (\x -> [test (f,x)]) x) f$$puts "*** BINARY ***"$$do (\f -> catmap (\x -> [test (f,x)]) x2) f2
state 0: #0
}
*** UNARY ***
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-09-05 02:15:33
|
Revision: 711
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=711&view=rev
Author: agraef
Date: 2008-09-05 02:15:43 +0000 (Fri, 05 Sep 2008)
Log Message:
-----------
Bugfixes.
Modified Paths:
--------------
pure/trunk/test/test020.log
pure/trunk/test/test020.pure
pure/trunk/test/test021.log
pure/trunk/test/test021.pure
Modified: pure/trunk/test/test020.log
===================================================================
--- pure/trunk/test/test020.log 2008-09-05 02:11:39 UTC (rev 710)
+++ pure/trunk/test/test020.log 2008-09-05 02:15:43 UTC (rev 711)
@@ -43,14 +43,14 @@
check (f/*0:0101*/,x/*0:01101*/,y/*0:0111*/) (g@_/*0:100*/ u/*0:101*/ v/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:100*/&&x/*0:01101*/===u/*0:101*/&&y/*0:0111*/===v/*0:11*/;
check (f/*0:0101*/,x/*0:011*/) (g@_/*0:10*/ u/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:10*/&&x/*0:011*/===u/*0:11*/;
check _/*0:01*/ z/*0:1*/ = z/*0:1*/;
-format (f/*0:101*/,x/*0:1101*/,y/*0:11101*/,z/*0:1111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show y/*0:11101*/+","+show z/*0:1111*/;
-format (f/*0:101*/,x/*0:1101*/,z/*0:111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show z/*0:111*/;
-show x/*0:1*/::double = str x/*0:1*/ if infp x/*0:1*/||nanp x/*0:1*/;
-show x/*0:1*/::double = sprintf double_format 0.0 if x/*0:1*/==0.0;
-show x/*0:1*/::double = sprintf double_format x/*0:1*/;
-show (x/*0:101*/+:y/*0:11*/) = show x/*0:101*/+"+:"+show y/*0:11*/;
-show (x/*0:101*/<:y/*0:11*/) = show x/*0:101*/+"<:"+show y/*0:11*/;
-show x/*0:1*/ = str x/*0:1*/;
+format (f/*0:101*/,x/*0:1101*/,y/*0:11101*/,z/*0:1111*/) = str f/*0:101*/+","+print x/*0:1101*/+","+print y/*0:11101*/+","+print z/*0:1111*/;
+format (f/*0:101*/,x/*0:1101*/,z/*0:111*/) = str f/*0:101*/+","+print x/*0:1101*/+","+print z/*0:111*/;
+print x/*0:1*/::double = str x/*0:1*/ if infp x/*0:1*/||nanp x/*0:1*/;
+print x/*0:1*/::double = sprintf double_format 0.0 if x/*0:1*/==0.0;
+print x/*0:1*/::double = sprintf double_format x/*0:1*/;
+print (x/*0:101*/+:y/*0:11*/) = print x/*0:101*/+"+:"+print y/*0:11*/;
+print (x/*0:101*/<:y/*0:11*/) = print x/*0:101*/+"<:"+print y/*0:11*/;
+print x/*0:1*/ = str x/*0:1*/;
tests = puts "*** UNARY ***"$$do (\f/*0:*/ -> catmap (\x/*0:*/ -> [test (f/*1:*/,x/*0:*/)] {
rule #0: x = [test (f,x)]
state 0: #0
@@ -168,8 +168,8 @@
state 44: #0 #1 #2 #3
}
{
- rule #0: format (f,x,y,z) = str f+","+show x+","+show y+","+show z
- rule #1: format (f,x,z) = str f+","+show x+","+show z
+ rule #0: format (f,x,y,z) = str f+","+print x+","+print y+","+print z
+ rule #1: format (f,x,z) = str f+","+print x+","+print z
state 0: #0 #1
<app> state 1
state 1: #0 #1
@@ -246,12 +246,12 @@
state 15: #0 #1
}
{
- rule #0: show x::double = str x if infp x||nanp x
- rule #1: show x::double = sprintf double_format 0.0 if x==0.0
- rule #2: show x::double = sprintf double_format x
- rule #3: show (x+:y) = show x+"+:"+show y
- rule #4: show (x<:y) = show x+"<:"+show y
- rule #5: show x = str x
+ rule #0: print x::double = str x if infp x||nanp x
+ rule #1: print x::double = sprintf double_format 0.0 if x==0.0
+ rule #2: print x::double = sprintf double_format x
+ rule #3: print (x+:y) = print x+"+:"+print y
+ rule #4: print (x<:y) = print x+"<:"+print y
+ rule #5: print x = str x
state 0: #0 #1 #2 #3 #4 #5
<var> state 1
<var>::double state 2
Modified: pure/trunk/test/test020.pure
===================================================================
--- pure/trunk/test/test020.pure 2008-09-05 02:11:39 UTC (rev 710)
+++ pure/trunk/test/test020.pure 2008-09-05 02:15:43 UTC (rev 711)
@@ -43,19 +43,19 @@
check (f,x) (g@_ u) = __failed__ if f===g && x===u;
check _ z = z otherwise;
-format (f,x,y,z) = str f+","+show x+","+show y+","+show z;
-format (f,x,z) = str f+","+show x+","+show z;
+format (f,x,y,z) = str f+","+print x+","+print y+","+print z;
+format (f,x,z) = str f+","+print x+","+print z;
-show x::double
+print x::double
= str x if infp x || nanp x; // Windoze compatibility
// Kludge: Some systems have -0.0, some don't, on some it's broken. Simply
// ignore the sign of floating point zeros for now.
= sprintf double_format 0.0 if x==0.0;
= sprintf double_format x otherwise;
-show (x+:y) = show x+"+:"+show y;
-show (x<:y) = show x+"<:"+show y;
-show x = str x otherwise;
+print (x+:y) = print x+"+:"+print y;
+print (x<:y) = print x+"<:"+print y;
+print x = str x otherwise;
tests =
puts "*** UNARY ***" $$ void [test (f,x); f=f; x=x] $$
Modified: pure/trunk/test/test021.log
===================================================================
--- pure/trunk/test/test021.log 2008-09-05 02:11:39 UTC (rev 710)
+++ pure/trunk/test/test021.log 2008-09-05 02:15:43 UTC (rev 711)
@@ -5,14 +5,14 @@
check (f/*0:0101*/,x/*0:01101*/,y/*0:0111*/) (g@_/*0:100*/ u/*0:101*/ v/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:100*/&&x/*0:01101*/===u/*0:101*/&&y/*0:0111*/===v/*0:11*/;
check (f/*0:0101*/,x/*0:011*/) (g@_/*0:10*/ u/*0:11*/) = __failed__ if f/*0:0101*/===g/*0:10*/&&x/*0:011*/===u/*0:11*/;
check _/*0:01*/ z/*0:1*/ = z/*0:1*/;
-format (f/*0:101*/,x/*0:1101*/,y/*0:11101*/,z/*0:1111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show y/*0:11101*/+","+show z/*0:1111*/;
-format (f/*0:101*/,x/*0:1101*/,z/*0:111*/) = str f/*0:101*/+","+show x/*0:1101*/+","+show z/*0:111*/;
-show x/*0:1*/::double = str x/*0:1*/ if infp x/*0:1*/||nanp x/*0:1*/;
-show x/*0:1*/::double = sprintf double_format 0.0 if x/*0:1*/==0.0;
-show x/*0:1*/::double = sprintf double_format x/*0:1*/;
-show (x/*0:101*/+:y/*0:11*/) = show x/*0:101*/+"+:"+show y/*0:11*/;
-show (x/*0:101*/<:y/*0:11*/) = show x/*0:101*/+"<:"+show y/*0:11*/;
-show x/*0:1*/ = str x/*0:1*/;
+format (f/*0:101*/,x/*0:1101*/,y/*0:11101*/,z/*0:1111*/) = str f/*0:101*/+","+print x/*0:1101*/+","+print y/*0:11101*/+","+print z/*0:1111*/;
+format (f/*0:101*/,x/*0:1101*/,z/*0:111*/) = str f/*0:101*/+","+print x/*0:1101*/+","+print z/*0:111*/;
+print x/*0:1*/::double = str x/*0:1*/ if infp x/*0:1*/||nanp x/*0:1*/;
+print x/*0:1*/::double = sprintf double_format 0.0 if x/*0:1*/==0.0;
+print x/*0:1*/::double = sprintf double_format x/*0:1*/;
+print (x/*0:101*/+:y/*0:11*/) = print x/*0:101*/+"+:"+print y/*0:11*/;
+print (x/*0:101*/<:y/*0:11*/) = print x/*0:101*/+"<:"+print y/*0:11*/;
+print x/*0:1*/ = str x/*0:1*/;
tests = puts "*** EXACT/INEXACT ***"$$do test (catmap (\op/*0:*/ -> catmap (\a/*0:*/ -> [(op/*1:*/,2,a/*0:*/)] {
rule #0: a = [(op,2,a)]
state 0: #0
@@ -150,8 +150,8 @@
state 44: #0 #1 #2 #3
}
{
- rule #0: format (f,x,y,z) = str f+","+show x+","+show y+","+show z
- rule #1: format (f,x,z) = str f+","+show x+","+show z
+ rule #0: format (f,x,y,z) = str f+","+print x+","+print y+","+print z
+ rule #1: format (f,x,z) = str f+","+print x+","+print z
state 0: #0 #1
<app> state 1
state 1: #0 #1
@@ -228,12 +228,12 @@
state 15: #0 #1
}
{
- rule #0: show x::double = str x if infp x||nanp x
- rule #1: show x::double = sprintf double_format 0.0 if x==0.0
- rule #2: show x::double = sprintf double_format x
- rule #3: show (x+:y) = show x+"+:"+show y
- rule #4: show (x<:y) = show x+"<:"+show y
- rule #5: show x = str x
+ rule #0: print x::double = str x if infp x||nanp x
+ rule #1: print x::double = sprintf double_format 0.0 if x==0.0
+ rule #2: print x::double = sprintf double_format x
+ rule #3: print (x+:y) = print x+"+:"+print y
+ rule #4: print (x<:y) = print x+"<:"+print y
+ rule #5: print x = str x
state 0: #0 #1 #2 #3 #4 #5
<var> state 1
<var>::double state 2
Modified: pure/trunk/test/test021.pure
===================================================================
--- pure/trunk/test/test021.pure 2008-09-05 02:11:39 UTC (rev 710)
+++ pure/trunk/test/test021.pure 2008-09-05 02:15:43 UTC (rev 711)
@@ -18,19 +18,19 @@
check (f,x) (g@_ u) = __failed__ if f===g && x===u;
check _ z = z otherwise;
-format (f,x,y,z) = str f+","+show x+","+show y+","+show z;
-format (f,x,z) = str f+","+show x+","+show z;
+format (f,x,y,z) = str f+","+print x+","+print y+","+print z;
+format (f,x,z) = str f+","+print x+","+print z;
-show x::double
+print x::double
= str x if infp x || nanp x; // Windoze compatibility
// Kludge: Some systems have -0.0, some don't, on some it's broken. Simply
// ignore the sign of floating point zeros for now.
= sprintf double_format 0.0 if x==0.0;
= sprintf double_format x otherwise;
-show (x+:y) = show x+"+:"+show y;
-show (x<:y) = show x+"<:"+show y;
-show x = str x otherwise;
+print (x+:y) = print x+"+:"+print y;
+print (x<:y) = print x+"<:"+print y;
+print x = str x otherwise;
tests =
puts "*** EXACT/INEXACT ***" $$
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-09-11 16:12:56
|
Revision: 751
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=751&view=rev
Author: agraef
Date: 2008-09-11 16:13:05 +0000 (Thu, 11 Sep 2008)
Log Message:
-----------
Update logs.
Modified Paths:
--------------
pure/trunk/test/test020.log
pure/trunk/test/test021.log
Modified: pure/trunk/test/test020.log
===================================================================
--- pure/trunk/test/test020.log 2008-09-11 15:54:04 UTC (rev 750)
+++ pure/trunk/test/test020.log 2008-09-11 16:13:05 UTC (rev 751)
@@ -616,12 +616,12 @@
asinh,1.20+:-4.30,2.18+:-1.29
asinh,1L%2L+:1,0.733+:0.896
asinh,1L%2L+:3L%4L,0.606+:0.682
-asinh,3<:1,1.78+:0.974
-asinh,3<:-2.14,-1.78+:-0.974
-asinh,3.00<:-3,-1.82+:-0.134
-asinh,3.10<:2.50,-1.83+:0.617
-asinh,2L%3L<:2,-0.333+:0.612
-asinh,1L%2L<:3L%4L,0.377+:0.324
+asinh,3<:1,2.03<:0.500
+asinh,3<:-2.14,2.03<:-2.64
+asinh,3.00<:-3,1.82<:-3.07
+asinh,3.10<:2.50,1.93<:2.82
+asinh,2L%3L<:2,0.696<:2.07
+asinh,1L%2L<:3L%4L,0.497<:0.709
asinh,-inf,-inf
asinh,nan,nan
asinh,x,__failed__
@@ -640,12 +640,12 @@
acosh,1.20+:-4.30,2.20+:-1.30
acosh,1L%2L+:1,0.926+:1.22
acosh,1L%2L+:3L%4L,0.743+:1.17
-acosh,3<:1,1.80+:1.02
-acosh,3<:-2.14,1.80+:-2.12
-acosh,3.00<:-3,1.76+:-2.99
-acosh,3.10<:2.50,1.82+:2.47
-acosh,2L%3L<:2,0.589+:1.81
-acosh,1L%2L<:3L%4L,0.355+:1.22
+acosh,3<:1,2.07<:0.516
+acosh,3<:-2.14,2.78<:-0.865
+acosh,3.00<:-3,3.47<:-1.04
+acosh,3.10<:2.50,3.07<:0.937
+acosh,2L%3L<:2,1.90<:1.26
+acosh,1L%2L<:3L%4L,1.27<:1.29
acosh,-inf,nan
acosh,nan,nan
acosh,x,__failed__
@@ -664,12 +664,12 @@
atanh,1.20+:-4.30,0.0576+:-1.36
atanh,1L%2L+:1,0.239+:0.848
atanh,1L%2L+:3L%4L,0.310+:0.723
-atanh,3<:1,0.168+:1.29
-atanh,3<:-2.14,-0.168+:-1.29
-atanh,3.00<:-3,-0.342+:-1.52
-atanh,3.10<:2.50,-0.254+:1.37
-atanh,2L%3L<:2,-0.202+:0.571
-atanh,1L%2L<:3L%4L,0.335+:0.369
+atanh,3<:1,1.30<:1.44
+atanh,3<:-2.14,1.30<:-1.70
+atanh,3.00<:-3,1.56<:-1.79
+atanh,3.10<:2.50,1.39<:1.75
+atanh,2L%3L<:2,0.605<:1.91
+atanh,1L%2L<:3L%4L,0.498<:0.833
atanh,-inf,nan
atanh,nan,nan
atanh,x,__failed__
@@ -1169,12 +1169,12 @@
(+),1,1.20+:-4.30,2.20+:-4.30
(+),1,1L%2L+:1,3L%2L+:1
(+),1,1L%2L+:3L%4L,3L%2L+:3L%4L
-(+),1,3<:1,2.62+:2.52
-(+),1,3<:-2.14,-0.621+:-2.52
-(+),1,3.00<:-3,-1.97+:-0.423
-(+),1,3.10<:2.50,-1.48+:1.86
-(+),1,2L%3L<:2,0.723+:0.606
-(+),1,1L%2L<:3L%4L,1.37+:0.341
+(+),1,3<:1,3.64<:0.767
+(+),1,3<:-2.14,2.60<:-1.81
+(+),1,3.00<:-3,2.01<:-2.93
+(+),1,3.10<:2.50,2.38<:2.25
+(+),1,2L%3L<:2,0.943<:0.698
+(+),1,1L%2L<:3L%4L,1.41<:0.245
(+),1,-inf,-inf
(+),1,nan,nan
(+),1,x,__failed__
@@ -1193,12 +1193,12 @@
(+),-1,1.20+:-4.30,0.200+:-4.30
(+),-1,1L%2L+:1,(-1L)%2L+:1
(+),-1,1L%2L+:3L%4L,(-1L)%2L+:3L%4L
-(+),-1,3<:1,0.621+:2.52
-(+),-1,3<:-2.14,-2.62+:-2.52
-(+),-1,3.00<:-3,-3.97+:-0.423
-(+),-1,3.10<:2.50,-3.48+:1.86
-(+),-1,2L%3L<:2,-1.28+:0.606
-(+),-1,1L%2L<:3L%4L,-0.634+:0.341
+(+),-1,3<:1,2.60<:1.33
+(+),-1,3<:-2.14,3.64<:-2.37
+(+),-1,3.00<:-3,3.99<:-3.04
+(+),-1,3.10<:2.50,3.95<:2.65
+(+),-1,2L%3L<:2,1.41<:2.70
+(+),-1,1L%2L<:3L%4L,0.720<:2.65
(+),-1,-inf,-inf
(+),-1,nan,nan
(+),-1,x,__failed__
@@ -1217,12 +1217,12 @@
(+),0,1.20+:-4.30,1.20+:-4.30
(+),0,1L%2L+:1,1L%2L+:1
(+),0,1L%2L+:3L%4L,1L%2L+:3L%4L
-(+),0,3<:1,1.62+:2.52
-(+),0,3<:-2.14,-1.62+:-2.52
-(+),0,3.00<:-3,-2.97+:-0.423
-(+),0,3.10<:2.50,-2.48+:1.86
-(+),0,2L%3L<:2,-0.277+:0.606
-(+),0,1L%2L<:3L%4L,0.366+:0.341
+(+),0,3<:1,3.00<:1.00
+(+),0,3<:-2.14,3.00<:-2.14
+(+),0,3.00<:-3,3.00<:-3.00
+(+),0,3.10<:2.50,3.10<:2.50
+(+),0,2L%3L<:2,0.667<:2.00
+(+),0,1L%2L<:3L%4L,0.500<:0.750
(+),0,-inf,-inf
(+),0,nan,nan
(+),0,x,__failed__
@@ -1241,12 +1241,12 @@
(+),0.00,1.20+:-4.30,1.20+:-4.30
(+),0.00,1L%2L+:1,0.500+:1
(+),0.00,1L%2L+:3L%4L,0.500+:3L%4L
-(+),0.00,3<:1,1.62+:2.52
-(+),0.00,3<:-2.14,-1.62+:-2.52
-(+),0.00,3.00<:-3,-2.97+:-0.423
-(+),0.00,3.10<:2.50,-2.48+:1.86
-(+),0.00,2L%3L<:2,-0.277+:0.606
-(+),0.00,1L%2L<:3L%4L,0.366+:0.341
+(+),0.00,3<:1,3.00<:1.00
+(+),0.00,3<:-2.14,3.00<:-2.14
+(+),0.00,3.00<:-3,3.00<:-3.00
+(+),0.00,3.10<:2.50,3.10<:2.50
+(+),0.00,2L%3L<:2,0.667<:2.00
+(+),0.00,1L%2L<:3L%4L,0.500<:0.750
(+),0.00,-inf,-inf
(+),0.00,nan,nan
(+),0.00,x,__failed__
@@ -1265,12 +1265,12 @@
(+),1.20,1.20+:-4.30,2.40+:-4.30
(+),1.20,1L%2L+:1,1.70+:1
(+),1.20,1L%2L+:3L%4L,1.70+:3L%4L
-(+),1.20,3<:1,2.82+:2.52
-(+),1.20,3<:-2.14,-0.421+:-2.52
-(+),1.20,3.00<:-3,-1.77+:-0.423
-(+),1.20,3.10<:2.50,-1.28+:1.86
-(+),1.20,2L%3L<:2,0.923+:0.606
-(+),1.20,1L%2L<:3L%4L,1.57+:0.341
+(+),1.20,3<:1,3.79<:0.730
+(+),1.20,3<:-2.14,2.56<:-1.74
+(+),1.20,3.00<:-3,1.82<:-2.91
+(+),1.20,3.10<:2.50,2.26<:2.18
+(+),1.20,2L%3L<:2,1.10<:0.581
+(+),1.20,1L%2L<:3L%4L,1.60<:0.214
(+),1.20,-inf,-inf
(+),1.20,nan,nan
(+),1.20,x,__failed__
@@ -1289,12 +1289,12 @@
(+),-1.20,1.20+:-4.30,0.00+:-4.30
(+),-1.20,1L%2L+:1,-0.700+:1
(+),-1.20,1L%2L+:3L%4L,-0.700+:3L%4L
-(+),-1.20,3<:1,0.421+:2.52
-(+),-1.20,3<:-2.14,-2.82+:-2.52
-(+),-1.20,3.00<:-3,-4.17+:-0.423
-(+),-1.20,3.10<:2.50,-3.68+:1.86
-(+),-1.20,2L%3L<:2,-1.48+:0.606
-(+),-1.20,1L%2L<:3L%4L,-0.834+:0.341
+(+),-1.20,3<:1,2.56<:1.41
+(+),-1.20,3<:-2.14,3.79<:-2.41
+(+),-1.20,3.00<:-3,4.19<:-3.04
+(+),-1.20,3.10<:2.50,4.12<:2.68
+(+),-1.20,2L%3L<:2,1.60<:2.75
+(+),-1.20,1L%2L<:3L%4L,0.901<:2.75
(+),-1.20,-inf,-inf
(+),-1.20,nan,nan
(+),-1.20,x,__failed__
@@ -1313,12 +1313,12 @@
(+),1L%3L,1.20+:-4.30,1.53+:-4.30
(+),1L%3L,1L%2L+:1,5L%6L+:1
(+),1L%3L,1L%2L+:3L%4L,5L%6L+:3L%4L
-(+),1L%3L,3<:1,1.95+:2.52
-(+),1L%3L,3<:-2.14,-1.29+:-2.52
-(+),1L%3L,3.00<:-3,-2.64+:-0.423
-(+),1L%3L,3.10<:2.50,-2.15+:1.86
-(+),1L%3L,2L%3L<:2,0.0559+:0.606
-(+),1L%3L,1L%2L<:3L%4L,0.699+:0.341
+(+),1L%3L,3<:1,3.19<:0.912
+(+),1L%3L,3<:-2.14,2.83<:-2.04
+(+),1L%3L,3.00<:-3,2.67<:-2.98
+(+),1L%3L,3.10<:2.50,2.84<:2.43
+(+),1L%3L,2L%3L<:2,0.609<:1.48
+(+),1L%3L,1L%2L<:3L%4L,0.778<:0.454
(+),1L%3L,-inf,-inf
(+),1L%3L,nan,nan
(+),1L%3L,x,__failed__
@@ -1337,12 +1337,12 @@
(+),(-1L)%4L,1.20+:-4.30,0.950+:-4.30
(+),(-1L)%4L,1L%2L+:1,1L%4L+:1
(+),(-1L)%4L,1L%2L+:3L%4L,1L%4L+:3L%4L
-(+),(-1L)%4L,3<:1,1.37+:2.52
-(+),(-1L)%4L,3<:-2.14,-1.87+:-2.52
-(+),(-1L)%4L,3.00<:-3,-3.22+:-0.423
-(+),(-1L)%4L,3.10<:2.50,-2.73+:1.86
-(+),(-1L)%4L,2L%3L<:2,-0.527+:0.606
-(+),(-1L)%4L,1L%2L<:3L%4L,0.116+:0.341
+(+),(-1L)%4L,3<:1,2.87<:1.07
+(+),(-1L)%4L,3<:-2.14,3.14<:-2.21
+(+),(-1L)%4L,3.00<:-3,3.25<:-3.01
+(+),(-1L)%4L,3.10<:2.50,3.30<:2.55
+(+),(-1L)%4L,2L%3L<:2,0.804<:2.29
+(+),(-1L)%4L,1L%2L<:3L%4L,0.360<:1.24
(+),(-1L)%4L,-inf,-inf
(+),(-1L)%4L,nan,nan
(+),(-1L)%4L,x,__failed__
@@ -1514,14 +1514,14 @@
(+),1L%2L+:3L%4L,-inf,-inf+:3L%4L
(+),1L%2L+:3L%4L,nan,nan+:3L%4L
(+),1L%2L+:3L%4L,x,__failed__
-(+),3<:1,1,2.62+:2.52
-(+),3<:1,-1,0.621+:2.52
-(+),3<:1,0,1.62+:2.52
-(+),3<:1,0.00,1.62+:2.52
-(+),3<:1,1.20,2.82+:2.52
-(+),3<:1,-1.20,0.421+:2.52
-(+),3<:1,1L%3L,1.95+:2.52
-(+),3<:1,(-1L)%4L,1.37+:2.52
+(+),3<:1,1,3.64<:0.767
+(+),3<:1,-1,2.60<:1.33
+(+),3<:1,0,3.00<:1.00
+(+),3<:1,0.00,3.00<:1.00
+(+),3<:1,1.20,3.79<:0.730
+(+),3<:1,-1.20,2.56<:1.41
+(+),3<:1,1L%3L,3.19<:0.912
+(+),3<:1,(-1L)%4L,2.87<:1.07
(+),3<:1,1+:2,2.62+:4.52
(+),3<:1,-1+:2,0.621+:4.52
(+),3<:1,1+:-2,2.62+:0.524
@@ -1535,17 +1535,17 @@
(+),3<:1,3.10<:2.50,4.46<:1.77
(+),3<:1,2L%3L<:2,3.41<:1.17
(+),3<:1,1L%2L<:3L%4L,3.49<:0.965
-(+),3<:1,-inf,-inf+:2.52
-(+),3<:1,nan,nan+:2.52
+(+),3<:1,-inf,inf<:2.36
+(+),3<:1,nan,nan<:nan
(+),3<:1,x,__failed__
-(+),3<:-2.14,1,-0.621+:-2.52
-(+),3<:-2.14,-1,-2.62+:-2.52
-(+),3<:-2.14,0,-1.62+:-2.52
-(+),3<:-2.14,0.00,-1.62+:-2.52
-(+),3<:-2.14,1.20,-0.421+:-2.52
-(+),3<:-2.14,-1.20,-2.82+:-2.52
-(+),3<:-2.14,1L%3L,-1.29+:-2.52
-(+),3<:-2.14,(-1L)%4L,-1.87+:-2.52
+(+),3<:-2.14,1,2.60<:-1.81
+(+),3<:-2.14,-1,3.64<:-2.37
+(+),3<:-2.14,0,3.00<:-2.14
+(+),3<:-2.14,0.00,3.00<:-2.14
+(+),3<:-2.14,1.20,2.56<:-1.74
+(+),3<:-2.14,-1.20,3.79<:-2.41
+(+),3<:-2.14,1L%3L,2.83<:-2.04
+(+),3<:-2.14,(-1L)%4L,3.14<:-2.21
(+),3<:-2.14,1+:2,-0.621+:-0.524
(+),3<:-2.14,-1+:2,-2.62+:-0.524
(+),3<:-2.14,1+:-2,-0.621+:-4.52
@@ -1559,17 +1559,17 @@
(+),3<:-2.14,3.10<:2.50,4.16<:-2.98
(+),3<:-2.14,2L%3L<:2,2.70<:-2.35
(+),3<:-2.14,1L%2L<:3L%4L,2.52<:-2.09
-(+),3<:-2.14,-inf,-inf+:-2.52
-(+),3<:-2.14,nan,nan+:-2.52
+(+),3<:-2.14,-inf,inf<:2.36
+(+),3<:-2.14,nan,nan<:nan
(+),3<:-2.14,x,__failed__
-(+),3.00<:-3,1,-1.97+:-0.423
-(+),3.00<:-3,-1,-3.97+:-0.423
-(+),3.00<:-3,0,-2.97+:-0.423
-(+),3.00<:-3,0.00,-2.97+:-0.423
-(+),3.00<:-3,1.20,-1.77+:-0.423
-(+),3.00<:-3,-1.20,-4.17+:-0.423
-(+),3.00<:-3,1L%3L,-2.64+:-0.423
-(+),3.00<:-3,(-1L)%4L,-3.22+:-0.423
+(+),3.00<:-3,1,2.01<:-2.93
+(+),3.00<:-3,-1,3.99<:-3.04
+(+),3.00<:-3,0,3.00<:-3.00
+(+),3.00<:-3,0.00,3.00<:-3.00
+(+),3.00<:-3,1.20,1.82<:-2.91
+(+),3.00<:-3,-1.20,4.19<:-3.04
+(+),3.00<:-3,1L%3L,2.67<:-2.98
+(+),3.00<:-3,(-1L)%4L,3.25<:-3.01
(+),3.00<:-3,1+:2,-1.97+:1.58
(+),3.00<:-3,-1+:2,-3.97+:1.58
(+),3.00<:-3,1+:-2,-1.97+:-2.42
@@ -1583,17 +1583,17 @@
(+),3.00<:-3,3.10<:2.50,5.64<:2.88
(+),3.00<:-3,2L%3L<:2,3.25<:3.09
(+),3.00<:-3,1L%2L<:3L%4L,2.61<:-3.11
-(+),3.00<:-3,-inf,-inf+:-0.423
-(+),3.00<:-3,nan,nan+:-0.423
+(+),3.00<:-3,-inf,inf<:2.36
+(+),3.00<:-3,nan,nan<:nan
(+),3.00<:-3,x,__failed__
-(+),3.10<:2.50,1,-1.48+:1.86
-(+),3.10<:2.50,-1,-3.48+:1.86
-(+),3.10<:2.50,0,-2.48+:1.86
-(+),3.10<:2.50,0.00,-2.48+:1.86
-(+),3.10<:2.50,1.20,-1.28+:1.86
-(+),3.10<:2.50,-1.20,-3.68+:1.86
-(+),3.10<:2.50,1L%3L,-2.15+:1.86
-(+),3.10<:2.50,(-1L)%4L,-2.73+:1.86
+(+),3.10<:2.50,1,2.38<:2.25
+(+),3.10<:2.50,-1,3.95<:2.65
+(+),3.10<:2.50,0,3.10<:2.50
+(+),3.10<:2.50,0.00,3.10<:2.50
+(+),3.10<:2.50,1.20,2.26<:2.18
+(+),3.10<:2.50,-1.20,4.12<:2.68
+(+),3.10<:2.50,1L%3L,2.84<:2.43
+(+),3.10<:2.50,(-1L)%4L,3.30<:2.55
(+),3.10<:2.50,1+:2,-1.48+:3.86
(+),3.10<:2.50,-1+:2,-3.48+:3.86
(+),3.10<:2.50,1+:-2,-1.48+:-0.145
@@ -1607,17 +1607,17 @@
(+),3.10<:2.50,3.10<:2.50,6.20<:2.50
(+),3.10<:2.50,2L%3L<:2,3.70<:2.41
(+),3.10<:2.50,1L%2L<:3L%4L,3.05<:2.34
-(+),3.10<:2.50,-inf,-inf+:1.86
-(+),3.10<:2.50,nan,nan+:1.86
+(+),3.10<:2.50,-inf,inf<:2.36
+(+),3.10<:2.50,nan,nan<:nan
(+),3.10<:2.50,x,__failed__
-(+),2L%3L<:2,1,0.723+:0.606
-(+),2L%3L<:2,-1,-1.28+:0.606
-(+),2L%3L<:2,0,-0.277+:0.606
-(+),2L%3L<:2,0.00,-0.277+:0.606
-(+),2L%3L<:2,1.20,0.923+:0.606
-(+),2L%3L<:2,-1.20,-1.48+:0.606
-(+),2L%3L<:2,1L%3L,0.0559+:0.606
-(+),2L%3L<:2,(-1L)%4L,-0.527+:0.606
+(+),2L%3L<:2,1,0.943<:0.698
+(+),2L%3L<:2,-1,1.41<:2.70
+(+),2L%3L<:2,0,0.667<:2.00
+(+),2L%3L<:2,0.00,0.667<:2.00
+(+),2L%3L<:2,1.20,1.10<:0.581
+(+),2L%3L<:2,-1.20,1.60<:2.75
+(+),2L%3L<:2,1L%3L,0.609<:1.48
+(+),2L%3L<:2,(-1L)%4L,0.804<:2.29
(+),2L%3L<:2,1+:2,0.723+:2.61
(+),2L%3L<:2,-1+:2,-1.28+:2.61
(+),2L%3L<:2,1+:-2,0.723+:-1.39
@@ -1631,17 +1631,17 @@
(+),2L%3L<:2,3.10<:2.50,3.70<:2.41
(+),2L%3L<:2,2L%3L<:2,1.33<:2.00
(+),2L%3L<:2,1L%2L<:3L%4L,0.951<:1.48
-(+),2L%3L<:2,-inf,-inf+:0.606
-(+),2L%3L<:2,nan,nan+:0.606
+(+),2L%3L<:2,-inf,inf<:2.36
+(+),2L%3L<:2,nan,nan<:nan
(+),2L%3L<:2,x,__failed__
-(+),1L%2L<:3L%4L,1,1.37+:0.341
-(+),1L%2L<:3L%4L,-1,-0.634+:0.341
-(+),1L%2L<:3L%4L,0,0.366+:0.341
-(+),1L%2L<:3L%4L,0.00,0.366+:0.341
-(+),1L%2L<:3L%4L,1.20,1.57+:0.341
-(+),1L%2L<:3L%4L,-1.20,-0.834+:0.341
-(+),1L%2L<:3L%4L,1L%3L,0.699+:0.341
-(+),1L%2L<:3L%4L,(-1L)%4L,0.116+:0.341
+(+),1L%2L<:3L%4L,1,1.41<:0.245
+(+),1L%2L<:3L%4L,-1,0.720<:2.65
+(+),1L%2L<:3L%4L,0,0.500<:0.750
+(+),1L%2L<:3L%4L,0.00,0.500<:0.750
+(+),1L%2L<:3L%4L,1.20,1.60<:0.214
+(+),1L%2L<:3L%4L,-1.20,0.901<:2.75
+(+),1L%2L<:3L%4L,1L%3L,0.778<:0.454
+(+),1L%2L<:3L%4L,(-1L)%4L,0.360<:1.24
(+),1L%2L<:3L%4L,1+:2,1.37+:2.34
(+),1L%2L<:3L%4L,-1+:2,-0.634+:2.34
(+),1L%2L<:3L%4L,1+:-2,1.37+:-1.66
@@ -1655,8 +1655,8 @@
(+),1L%2L<:3L%4L,3.10<:2.50,3.05<:2.34
(+),1L%2L<:3L%4L,2L%3L<:2,0.951<:1.48
(+),1L%2L<:3L%4L,1L%2L<:3L%4L,1.00<:0.750
-(+),1L%2L<:3L%4L,-inf,-inf+:0.341
-(+),1L%2L<:3L%4L,nan,nan+:0.341
+(+),1L%2L<:3L%4L,-inf,inf<:2.36
+(+),1L%2L<:3L%4L,nan,nan<:nan
(+),1L%2L<:3L%4L,x,__failed__
(+),-inf,1,-inf
(+),-inf,-1,-inf
@@ -1673,12 +1673,12 @@
(+),-inf,1.20+:-4.30,-inf+:-4.30
(+),-inf,1L%2L+:1,-inf+:1
(+),-inf,1L%2L+:3L%4L,-inf+:3L%4L
-(+),-inf,3<:1,-inf+:2.52
-(+),-inf,3<:-2.14,-inf+:-2.52
-(+),-inf,3.00<:-3,-inf+:-0.423
-(+),-inf,3.10<:2.50,-inf+:1.86
-(+),-inf,2L%3L<:2,-inf+:0.606
-(+),-inf,1L%2L<:3L%4L,-inf+:0.341
+(+),-inf,3<:1,inf<:2.36
+(+),-inf,3<:-2.14,inf<:2.36
+(+),-inf,3.00<:-3,inf<:2.36
+(+),-inf,3.10<:2.50,inf<:2.36
+(+),-inf,2L%3L<:2,inf<:2.36
+(+),-inf,1L%2L<:3L%4L,inf<:2.36
(+),-inf,-inf,-inf
(+),-inf,nan,nan
(+),-inf,x,__failed__
@@ -1697,12 +1697,12 @@
(+),nan,1.20+:-4.30,nan+:-4.30
(+),nan,1L%2L+:1,nan+:1
(+),nan,1L%2L+:3L%4L,nan+:3L%4L
-(+),nan,3<:1,nan+:2.52
-(+),nan,3<:-2.14,nan+:-2.52
-(+),nan,3.00<:-3,nan+:-0.423
-(+),nan,3.10<:2.50,nan+:1.86
-(+),nan,2L%3L<:2,nan+:0.606
-(+),nan,1L%2L<:3L%4L,nan+:0.341
+(+),nan,3<:1,nan<:nan
+(+),nan,3<:-2.14,nan<:nan
+(+),nan,3.00<:-3,nan<:nan
+(+),nan,3.10<:2.50,nan<:nan
+(+),nan,2L%3L<:2,nan<:nan
+(+),nan,1L%2L<:3L%4L,nan<:nan
(+),nan,-inf,nan
(+),nan,nan,nan
(+),nan,x,__failed__
@@ -1745,12 +1745,12 @@
(-),1,1.20+:-4.30,-0.200+:4.30
(-),1,1L%2L+:1,1L%2L+:-1
(-),1,1L%2L+:3L%4L,1L%2L+:(-3L)%4L
-(-),1,3<:1,-0.621+:-2.52
-(-),1,3<:-2.14,2.62+:2.52
-(-),1,3.00<:-3,3.97+:0.423
-(-),1,3.10<:2.50,3.48+:-1.86
-(-),1,2L%3L<:2,1.28+:-0.606
-(-),1,1L%2L<:3L%4L,0.634+:-0.341
+(-),1,3<:1,2.60<:-1.81
+(-),1,3<:-2.14,3.64<:0.767
+(-),1,3.00<:-3,3.99<:0.106
+(-),1,3.10<:2.50,3.95<:-0.489
+(-),1,2L%3L<:2,1.41<:-0.443
+(-),1,1L%2L<:3L%4L,0.720<:-0.493
(-),1,-inf,inf
(-),1,nan,nan
(-),1,x,__failed__
@@ -1769,12 +1769,12 @@
(-),-1,1.20+:-4.30,-2.20+:4.30
(-),-1,1L%2L+:1,(-3L)%2L+:-1
(-),-1,1L%2L+:3L%4L,(-3L)%2L+:(-3L)%4L
-(-),-1,3<:1,-2.62+:-2.52
-(-),-1,3<:-2.14,0.621+:2.52
-(-),-1,3.00<:-3,1.97+:0.423
-(-),-1,3.10<:2.50,1.48+:-1.86
-(-),-1,2L%3L<:2,-0.723+:-0.606
-(-),-1,1L%2L<:3L%4L,-1.37+:-0.341
+(-),-1,3<:1,3.64<:-2.37
+(-),-1,3<:-2.14,2.60<:1.33
+(-),-1,3.00<:-3,2.01<:0.212
+(-),-1,3.10<:2.50,2.38<:-0.896
+(-),-1,2L%3L<:2,0.943<:-2.44
+(-),-1,1L%2L<:3L%4L,1.41<:-2.90
(-),-1,-inf,inf
(-),-1,nan,nan
(-),-1,x,__failed__
@@ -1793,12 +1793,12 @@
(-),0,1.20+:-4.30,-1.20+:4.30
(-),0,1L%2L+:1,(-1L)%2L+:-1
(-),0,1L%2L+:3L%4L,(-1L)%2L+:(-3L)%4L
-(-),0,3<:1,-1.62+:-2.52
-(-),0,3<:-2.14,1.62+:2.52
-(-),0,3.00<:-3,2.97+:0.423
-(-),0,3.10<:2.50,2.48+:-1.86
-(-),0,2L%3L<:2,0.277+:-0.606
-(-),0,1L%2L<:3L%4L,-0.366+:-0.341
+(-),0,3<:1,3.00<:-2.14
+(-),0,3<:-2.14,3.00<:1.00
+(-),0,3.00<:-3,3.00<:0.142
+(-),0,3.10<:2.50,3.10<:-0.642
+(-),0,2L%3L<:2,0.667<:-1.14
+(-),0,1L%2L<:3L%4L,0.500<:-2.39
(-),0,-inf,inf
(-),0,nan,nan
(-),0,x,__failed__
@@ -1817,12 +1817,12 @@
(-),0.00,1.20+:-4.30,-1.20+:4.30
(-),0.00,1L%2L+:1,-0.500+:-1
(-),0.00,1L%2L+:3L%4L,-0.500+:(-3L)%4L
-(-),0.00,3<:1,-1.62+:-2.52
-(-),0.00,3<:-2.14,1.62+:2.52
-(-),0.00,3.00<:-3,2.97+:0.423
-(-),0.00,3.10<:2.50,2.48+:-1.86
-(-),0.00,2L%3L<:2,0.277+:-0.606
-(-),0.00,1L%2L<:3L%4L,-0.366+:-0.341
+(-),0.00,3<:1,3.00<:-2.14
+(-),0.00,3<:-2.14,3.00<:1.00
+(-),0.00,3.00<:-3,3.00<:0.142
+(-),0.00,3.10<:2.50,3.10<:-0.642
+(-),0.00,2L%3L<:2,0.667<:-1.14
+(-),0.00,1L%2L<:3L%4L,0.500<:-2.39
(-),0.00,-inf,inf
(-),0.00,nan,nan
(-),0.00,x,__failed__
@@ -1841,12 +1841,12 @@
(-),1.20,1.20+:-4.30,0.00+:4.30
(-),1.20,1L%2L+:1,0.700+:-1
(-),1.20,1L%2L+:3L%4L,0.700+:(-3L)%4L
-(-),1.20,3<:1,-0.421+:-2.52
-(-),1.20,3<:-2.14,2.82+:2.52
-(-),1.20,3.00<:-3,4.17+:0.423
-(-),1.20,3.10<:2.50,3.68+:-1.86
-(-),1.20,2L%3L<:2,1.48+:-0.606
-(-),1.20,1L%2L<:3L%4L,0.834+:-0.341
+(-),1.20,3<:1,2.56<:-1.74
+(-),1.20,3<:-2.14,3.79<:0.730
+(-),1.20,3.00<:-3,4.19<:0.101
+(-),1.20,3.10<:2.50,4.12<:-0.467
+(-),1.20,2L%3L<:2,1.60<:-0.389
+(-),1.20,1L%2L<:3L%4L,0.901<:-0.388
(-),1.20,-inf,inf
(-),1.20,nan,nan
(-),1.20,x,__failed__
@@ -1865,12 +1865,12 @@
(-),-1.20,1.20+:-4.30,-2.40+:4.30
(-),-1.20,1L%2L+:1,-1.70+:-1
(-),-1.20,1L%2L+:3L%4L,-1.70+:(-3L)%4L
-(-),-1.20,3<:1,-2.82+:-2.52
-(-),-1.20,3<:-2.14,0.421+:2.52
-(-),-1.20,3.00<:-3,1.77+:0.423
-(-),-1.20,3.10<:2.50,1.28+:-1.86
-(-),-1.20,2L%3L<:2,-0.923+:-0.606
-(-),-1.20,1L%2L<:3L%4L,-1.57+:-0.341
+(-),-1.20,3<:1,3.79<:-2.41
+(-),-1.20,3<:-2.14,2.56<:1.41
+(-),-1.20,3.00<:-3,1.82<:0.235
+(-),-1.20,3.10<:2.50,2.26<:-0.966
+(-),-1.20,2L%3L<:2,1.10<:-2.56
+(-),-1.20,1L%2L<:3L%4L,1.60<:-2.93
(-),-1.20,-inf,inf
(-),-1.20,nan,nan
(-),-1.20,x,__failed__
@@ -1889,12 +1889,12 @@
(-),1L%3L,1.20+:-4.30,-0.867+:4.30
(-),1L%3L,1L%2L+:1,(-1L)%6L+:-1
(-),1L%3L,1L%2L+:3L%4L,(-1L)%6L+:(-3L)%4L
-(-),1L%3L,3<:1,-1.29+:-2.52
-(-),1L%3L,3<:-2.14,1.95+:2.52
-(-),1L%3L,3.00<:-3,3.30+:0.423
-(-),1L%3L,3.10<:2.50,2.82+:-1.86
-(-),1L%3L,2L%3L<:2,0.611+:-0.606
-(-),1L%3L,1L%2L<:3L%4L,-0.0325+:-0.341
+(-),1L%3L,3<:1,2.83<:-2.04
+(-),1L%3L,3<:-2.14,3.19<:0.912
+(-),1L%3L,3.00<:-3,3.33<:0.127
+(-),1L%3L,3.10<:2.50,3.37<:-0.582
+(-),1L%3L,2L%3L<:2,0.861<:-0.782
+(-),1L%3L,1L%2L<:3L%4L,0.342<:-1.67
(-),1L%3L,-inf,inf
(-),1L%3L,nan,nan
(-),1L%3L,x,__failed__
@@ -1913,12 +1913,12 @@
(-),(-1L)%4L,1.20+:-4.30,-1.45+:4.30
(-),(-1L)%4L,1L%2L+:1,(-3L)%4L+:-1
(-),(-1L)%4L,1L%2L+:3L%4L,(-3L)%4L+:(-3L)%4L
-(-),(-1L)%4L,3<:1,-1.87+:-2.52
-(-),(-1L)%4L,3<:-2.14,1.37+:2.52
-(-),(-1L)%4L,3.00<:-3,2.72+:0.423
-(-),(-1L)%4L,3.10<:2.50,2.23+:-1.86
-(-),(-1L)%4L,2L%3L<:2,0.0274+:-0.606
-(-),(-1L)%4L,1L%2L<:3L%4L,-0.616+:-0.341
+(-),(-1L)%4L,3<:1,3.14<:-2.21
+(-),(-1L)%4L,3<:-2.14,2.87<:1.07
+(-),(-1L)%4L,3.00<:-3,2.75<:0.154
+(-),(-1L)%4L,3.10<:2.50,2.90<:-0.693
+(-),(-1L)%4L,2L%3L<:2,0.607<:-1.53
+(-),(-1L)%4L,1L%2L<:3L%4L,0.704<:-2.64
(-),(-1L)%4L,-inf,inf
(-),(-1L)%4L,nan,nan
(-),(-1L)%4L,x,__failed__
@@ -2090,14 +2090,14 @@
(-),1L%2L+:3L%4L,-inf,inf+:3L%4L
(-),1L%2L+:3L%4L,nan,nan+:3L%4L
(-),1L%2L+:3L%4L,x,__failed__
-(-),3<:1,1,0.621+:2.52
-(-),3<:1,-1,2.62+:2.52
-(-),3<:1,0,1.62+:2.52
-(-),3<:1,0.00,1.62+:2.52
-(-),3<:1,1.20,0.421+:2.52
-(-),3<:1,-1.20,2.82+:2.52
-(-),3<:1,1L%3L,1.29+:2.52
-(-),3<:1,(-1L)%4L,1.87+:2.52
+(-),3<:1,1,2.60<:1.33
+(-),3<:1,-1,3.64<:0.767
+(-),3<:1,0,3.00<:1.00
+(-),3<:1,0.00,3.00<:1.00
+(-),3<:1,1.20,2.56<:1.41
+(-),3<:1,-1.20,3.79<:0.730
+(-),3<:1,1L%3L,2.83<:1.10
+(-),3<:1,(-1L)%4L,3.14<:0.933
(-),3<:1,1+:2,0.621+:0.524
(-),3<:1,-1+:2,2.62+:0.524
(-),3<:1,1+:-2,0.621+:4.52
@@ -2111,17 +2111,17 @@
(-),3<:1,3.10<:2.50,4.16<:0.162
(-),3<:1,2L%3L<:2,2.70<:0.791
(-),3<:1,1L%2L<:3L%4L,2.52<:1.05
-(-),3<:1,-inf,inf+:2.52
-(-),3<:1,nan,nan+:2.52
+(-),3<:1,-inf,inf<:-0.785
+(-),3<:1,nan,nan<:nan
(-),3<:1,x,__failed__
-(-),3<:-2.14,1,-2.62+:-2.52
-(-),3<:-2.14,-1,-0.621+:-2.52
-(-),3<:-2.14,0,-1.62+:-2.52
-(-),3<:-2.14,0.00,-1.62+:-2.52
-(-),3<:-2.14,1.20,-2.82+:-2.52
-(-),3<:-2.14,-1.20,-0.421+:-2.52
-(-),3<:-2.14,1L%3L,-1.95+:-2.52
-(-),3<:-2.14,(-1L)%4L,-1.37+:-2.52
+(-),3<:-2.14,1,3.64<:-2.37
+(-),3<:-2.14,-1,2.60<:-1.81
+(-),3<:-2.14,0,3.00<:-2.14
+(-),3<:-2.14,0.00,3.00<:-2.14
+(-),3<:-2.14,1.20,3.79<:-2.41
+(-),3<:-2.14,-1.20,2.56<:-1.74
+(-),3<:-2.14,1L%3L,3.19<:-2.23
+(-),3<:-2.14,(-1L)%4L,2.87<:-2.07
(-),3<:-2.14,1+:2,-2.62+:-4.52
(-),3<:-2.14,-1+:2,-0.621+:-4.52
(-),3<:-2.14,1+:-2,-2.62+:-0.524
@@ -2135,17 +2135,17 @@
(-),3<:-2.14,3.10<:2.50,4.46<:-1.38
(-),3<:-2.14,2L%3L<:2,3.41<:-1.98
(-),3<:-2.14,1L%2L<:3L%4L,3.49<:-2.18
-(-),3<:-2.14,-inf,inf+:-2.52
-(-),3<:-2.14,nan,nan+:-2.52
+(-),3<:-2.14,-inf,inf<:-0.785
+(-),3<:-2.14,nan,nan<:nan
(-),3<:-2.14,x,__failed__
-(-),3.00<:-3,1,-3.97+:-0.423
-(-),3.00<:-3,-1,-1.97+:-0.423
-(-),3.00<:-3,0,-2.97+:-0.423
-(-),3.00<:-3,0.00,-2.97+:-0.423
-(-),3.00<:-3,1.20,-4.17+:-0.423
-(-),3.00<:-3,-1.20,-1.77+:-0.423
-(-),3.00<:-3,1L%3L,-3.30+:-0.423
-(-),3.00<:-3,(-1L)%4L,-2.72+:-0.423
+(-),3.00<:-3,1,3.99<:-3.04
+(-),3.00<:-3,-1,2.01<:-2.93
+(-),3.00<:-3,0,3.00<:-3.00
+(-),3.00<:-3,0.00,3.00<:-3.00
+(-),3.00<:-3,1.20,4.19<:-3.04
+(-),3.00<:-3,-1.20,1.82<:-2.91
+(-),3.00<:-3,1L%3L,3.33<:-3.01
+(-),3.00<:-3,(-1L)%4L,2.75<:-2.99
(-),3.00<:-3,1+:2,-3.97+:-2.42
(-),3.00<:-3,-1+:2,-1.97+:-2.42
(-),3.00<:-3,1+:-2,-3.97+:1.58
@@ -2159,17 +2159,17 @@
(-),3.00<:-3,3.10<:2.50,2.33<:-1.78
(-),3.00<:-3,2L%3L<:2,2.88<:-2.78
(-),3.00<:-3,1L%2L<:3L%4L,3.42<:-2.92
-(-),3.00<:-3,-inf,inf+:-0.423
-(-),3.00<:-3,nan,nan+:-0.423
+(-),3.00<:-3,-inf,inf<:-0.785
+(-),3.00<:-3,nan,nan<:nan
(-),3.00<:-3,x,__failed__
-(-),3.10<:2.50,1,-3.48+:1.86
-(-),3.10<:2.50,-1,-1.48+:1.86
-(-),3.10<:2.50,0,-2.48+:1.86
-(-),3.10<:2.50,0.00,-2.48+:1.86
-(-),3.10<:2.50,1.20,-3.68+:1.86
-(-),3.10<:2.50,-1.20,-1.28+:1.86
-(-),3.10<:2.50,1L%3L,-2.82+:1.86
-(-),3.10<:2.50,(-1L)%4L,-2.23+:1.86
+(-),3.10<:2.50,1,3.95<:2.65
+(-),3.10<:2.50,-1,2.38<:2.25
+(-),3.10<:2.50,0,3.10<:2.50
+(-),3.10<:2.50,0.00,3.10<:2.50
+(-),3.10<:2.50,1.20,4.12<:2.68
+(-),3.10<:2.50,-1.20,2.26<:2.18
+(-),3.10<:2.50,1L%3L,3.37<:2.56
+(-),3.10<:2.50,(-1L)%4L,2.90<:2.45
(-),3.10<:2.50,1+:2,-3.48+:-0.145
(-),3.10<:2.50,-1+:2,-1.48+:-0.145
(-),3.10<:2.50,1+:-2,-3.48+:3.86
@@ -2183,17 +2183,17 @@
(-),3.10<:2.50,3.10<:2.50,0.00<:0.00
(-),3.10<:2.50,2L%3L<:2,2.54<:2.63
(-),3.10<:2.50,1L%2L<:3L%4L,3.23<:2.65
-(-),3.10<:2.50,-inf,inf+:1.86
-(-),3.10<:2.50,nan,nan+:1.86
+(-),3.10<:2.50,-inf,inf<:-0.785
+(-),3.10<:2.50,nan,nan<:nan
(-),3.10<:2.50,x,__failed__
-(-),2L%3L<:2,1,-1.28+:0.606
-(-),2L%3L<:2,-1,0.723+:0.606
-(-),2L%3L<:2,0,-0.277+:0.606
-(-),2L%3L<:2,0.00,-0.277+:0.606
-(-),2L%3L<:2,1.20,-1.48+:0.606
-(-),2L%3L<:2,-1.20,0.923+:0.606
-(-),2L%3L<:2,1L%3L,-0.611+:0.606
-(-),2L%3L<:2,(-1L)%4L,-0.0274+:0.606
+(-),2L%3L<:2,1,1.41<:2.70
+(-),2L%3L<:2,-1,0.943<:0.698
+(-),2L%3L<:2,0,0.667<:2.00
+(-),2L%3L<:2,0.00,0.667<:2.00
+(-),2L%3L<:2,1.20,1.60<:2.75
+(-),2L%3L<:2,-1.20,1.10<:0.581
+(-),2L%3L<:2,1L%3L,0.861<:2.36
+(-),2L%3L<:2,(-1L)%4L,0.607<:1.62
(-),2L%3L<:2,1+:2,-1.28+:-1.39
(-),2L%3L<:2,-1+:2,0.723+:-1.39
(-),2L%3L<:2,1+:-2,-1.28+:2.61
@@ -2207,17 +2207,17 @@
(-),2L%3L<:2,3.10<:2.50,2.54<:-0.515
(-),2L%3L<:2,2L%3L<:2,0.00<:0.00
(-),2L%3L<:2,1L%2L<:3L%4L,0.696<:2.75
-(-),2L%3L<:2,-inf,inf+:0.606
-(-),2L%3L<:2,nan,nan+:0.606
+(-),2L%3L<:2,-inf,inf<:-0.785
+(-),2L%3L<:2,nan,nan<:nan
(-),2L%3L<:2,x,__failed__
-(-),1L%2L<:3L%4L,1,-0.634+:0.341
-(-),1L%2L<:3L%4L,-1,1.37+:0.341
-(-),1L%2L<:3L%4L,0,0.366+:0.341
-(-),1L%2L<:3L%4L,0.00,0.366+:0.341
-(-),1L%2L<:3L%4L,1.20,-0.834+:0.341
-(-),1L%2L<:3L%4L,-1.20,1.57+:0.341
-(-),1L%2L<:3L%4L,1L%3L,0.0325+:0.341
-(-),1L%2L<:3L%4L,(-1L)%4L,0.616+:0.341
+(-),1L%2L<:3L%4L,1,0.720<:2.65
+(-),1L%2L<:3L%4L,-1,1.41<:0.245
+(-),1L%2L<:3L%4L,0,0.500<:0.750
+(-),1L%2L<:3L%4L,0.00,0.500<:0.750
+(-),1L%2L<:3L%4L,1.20,0.901<:2.75
+(-),1L%2L<:3L%4L,-1.20,1.60<:0.214
+(-),1L%2L<:3L%4L,1L%3L,0.342<:1.48
+(-),1L%2L<:3L%4L,(-1L)%4L,0.704<:0.505
(-),1L%2L<:3L%4L,1+:2,-0.634+:-1.66
(-),1L%2L<:3L%4L,-1+:2,1.37+:-1.66
(-),1L%2L<:3L%4L,1+:-2,-0.634+:2.34
@@ -2231,8 +2231,8 @@
(-),1L%2L<:3L%4L,3.10<:2.50,3.23<:-0.489
(-),1L%2L<:3L%4L,2L%3L<:2,0.696<:-0.391
(-),1L%2L<:3L%4L,1L%2L<:3L%4L,0.00<:0.00
-(-),1L%2L<:3L%4L,-inf,inf+:0.341
-(-),1L%2L<:3L%4L,nan,nan+:0.341
+(-),1L%2L<:3L%4L,-inf,inf<:-0.785
+(-),1L%2L<:3L%4L,nan,nan<:nan
(-),1L%2L<:3L%4L,x,__failed__
(-),-inf,1,-inf
(-),-inf,-1,-inf
@@ -2249,12 +2249,12 @@
(-),-inf,1.20+:-4.30,-inf+:4.30
(-),-inf,1L%2L+:1,-inf+:-1
(-),-inf,1L%2L+:3L%4L,-inf+:(-3L)%4L
-(-),-inf,3<:1,-inf+:-2.52
-(-),-inf,3<:-2.14,-inf+:2.52
-(-),-inf,3.00<:-3,-inf+:0.423
-(-),-inf,3.10<:2.50,-inf+:-1.86
-(-),-inf,2L%3L<:2,-inf+:-0.606
-(-),-inf,1L%2L<:3L%4L,-inf+:-0.341
+(-),-inf,3<:1,inf<:2.36
+(-),-inf,3<:-2.14,inf<:2.36
+(-),-inf,3.00<:-3,inf<:2.36
+(-),-inf,3.10<:2.50,inf<:2.36
+(-),-inf,2L%3L<:2,inf<:2.36
+(-),-inf,1L%2L<:3L%4L,inf<:2.36
(-),-inf,-inf,nan
(-),-inf,nan,nan
(-),-inf,x,__failed__
@@ -2273,12 +2273,12 @@
(-),nan,1.20+:-4.30,nan+:4.30
(-),nan,1L%2L+:1,nan+:-1
(-),nan,1L%2L+:3L%4L,nan+:(-3L)%4L
-(-),nan,3<:1,nan+:-2.52
-(-),nan,3<:-2.14,nan+:2.52
-(-),nan,3.00<:-3,nan+:0.423
-(-),nan,3.10<:2.50,nan+:-1.86
-(-),nan,2L%3L<:2,nan+:-0.606
-(-),nan,1L%2L<:3L%4L,nan+:-0.341
+(-),nan,3<:1,nan<:nan
+(-),nan,3<:-2.14,nan<:nan
+(-),nan,3.00<:-3,nan<:nan
+(-),nan,3.10<:2.50,nan<:nan
+(-),nan,2L%3L<:2,nan<:nan
+(-),nan,1L%2L<:3L%4L,nan<:nan
(-),nan,-inf,nan
(-),nan,nan,nan
(-),nan,x,__failed__
@@ -2319,7 +2319,7 @@
(*),1,1+:-2,1+:-2
(*),1,-1.20+:4.30,-1.20+:4.30
(*),1,1.20+:-4.30,1.20+:-4.30
-(*),1,1L%2L+:1,1L%2L+:1
+(*),1,1L%2L+:1,1L%2L+:1L%1L
(*),1,1L%2L+:3L%4L,1L%2L+:3L%4L
(*),1,3<:1,3<:1
(*),1,3<:-2.14,3<:-2.14
@@ -2343,7 +2343,7 @@
(*),-1,1+:-2,-1+:2
(*),-1,-1.20+:4.30,1.20+:-4.30
(*),-1,1.20+:-4.30,-1.20+:4.30
-(*),-1,1L%2L+:1,(-1L)%2L+:-1
+(*),-1,1L%2L+:1,(-1L)%2L+:(-1L)%1L
(*),-1,1L%2L+:3L%4L,(-1L)%2L+:(-3L)%4L
(*),-1,3<:1,3<:-2.14
(*),-1,3<:-2.14,3<:1.00
@@ -2367,7 +2367,7 @@
(*),0,1+:-2,0+:0
(*),0,-1.20+:4.30,0.00+:0.00
(*),0,1.20+:-4.30,0.00+:0.00
-(*),0,1L%2L+:1,0L%1L+:0
+(*),0,1L%2L+:1,0L%1L+:0L%1L
(*),0,1L%2L+:3L%4L,0L%1L+:0L%1L
(*),0,3<:1,0<:1
(*),0,3<:-2.14,0<:-2.14
@@ -2618,9 +2618,9 @@
(*),1.20+:-4.30,-inf,-inf+:inf
(*),1.20+:-4.30,nan,nan+:nan
(*),1.20+:-4.30,x,__failed__
-(*),1L%2L+:1,1,1L%2L+:1
-(*),1L%2L+:1,-1,(-1L)%2L+:-1
-(*),1L%2L+:1,0,0L%1L+:0
+(*),1L%2L+:1,1,1L%2L+:1L%1L
+(*),1L%2L+:1,-1,(-1L)%2L+:(-1L)%1L
+(*),1L%2L+:1,0,0L%1L+:0L%1L
(*),1L%2L+:1,0.00,0.00+:0.00
(*),1L%2L+:1,1.20,0.600+:1.20
(*),1L%2L+:1,-1.20,-0.600+:-1.20
@@ -3076,8 +3076,8 @@
(/),(-1L)%4L,x,__failed__
(/),1+:2,1,1.00+:2.00
(/),1+:2,-1,-1.00+:-2.00
-(/),1+:2,0,inf+:inf
-(/),1+:2,0.00,inf+:inf
+(/),1+:2,0,nan+:nan
+(/),1+:2,0.00,nan+:nan
(/),1+:2,1.20,0.833+:1.67
(/),1+:2,-1.20,-0.833+:-1.67
(/),1+:2,1L%3L,3.00+:6.00
@@ -3095,13 +3095,13 @@
(/),1+:2,3.10<:2.50,0.128+:-0.710
(/),1+:2,2L%3L<:2,2.10+:-2.61
(/),1+:2,1L%2L<:3L%4L,4.19+:1.56
-(/),1+:2,-inf,0.00+:0.00
+(/),1+:2,-inf,nan+:nan
(/),1+:2,nan,nan+:nan
(/),1+:2,x,__failed__
(/),-1+:2,1,-1.00+:2.00
(/),-1+:2,-1,1.00+:-2.00
-(/),-1+:2,0,-inf+:inf
-(/),-1+:2,0.00,-inf+:inf
+(/),-1+:2,0,nan+:nan
+(/),-1+:2,0.00,nan+:nan
(/),-1+:2,1.20,-0.833+:1.67
(/),-1+:2,-1.20,0.833+:-1.67
(/),-1+:2,1L%3L,-3.00+:6.00
@@ -3119,13 +3119,13 @@
(/),-1+:2,3.10<:2.50,0.645+:-0.324
(/),-1+:2,2L%3L<:2,3.35+:0.116
(/),-1+:2,1L%2L<:3L%4L,1.26+:4.29
-(/),-1+:2,-inf,0.00+:0.00
+(/),-1+:2,-inf,nan+:nan
(/),-1+:2,nan,nan+:nan
(/),-1+:2,x,__failed__
(/),1+:-2,1,1.00+:-2.00
(/),1+:-2,-1,-1.00+:2.00
-(/),1+:-2,0,inf+:-inf
-(/),1+:-2,0.00,inf+:-inf
+(/),1+:-2,0,nan+:nan
+(/),1+:-2,0.00,nan+:nan
(/),1+:-2,1.20,0.833+:-1.67
(/),1+:-2,-1.20,-0.833+:1.67
(/),1+:-2,1L%3L,3.00+:-6.00
@@ -3143,13 +3143,13 @@
(/),1+:-2,3.10<:2.50,-0.645+:0.324
(/),1+:-2,2L%3L<:2,-3.35+:-0.116
(/),1+:-2,1L%2L<:3L%4L,-1.26+:-4.29
-(/),1+:-2,-inf,0.00+:0.00
+(/),1+:-2,-inf,nan+:nan
(/),1+:-2,nan,nan+:nan
(/),1+:-2,x,__failed__
(/),-1.20+:4.30,1,-1.20+:4.30
(/),-1.20+:4.30,-1,1.20+:-4.30
-(/),-1.20+:4.30,0,-inf+:inf
-(/),-1.20+:4.30,0.00,-inf+:inf
+(/),-1.20+:4.30,0,nan+:nan
+(/),-1.20+:4.30,0.00,nan+:nan
(/),-1.20+:4.30,1.20,-1.00+:3.58
(/),-1.20+:4.30,-1.20,1.00+:-3.58
(/),-1.20+:4.30,1L%3L,-3.60+:12.9
@@ -3167,13 +3167,13 @@
(/),-1.20+:4.30,3.10<:2.50,1.14+:-0.880
(/),-1.20+:4.30,2L%3L<:2,6.61+:-1.05
(/),-1.20+:4.30,1L%2L<:3L%4L,4.11+:7.93
-(/),-1.20+:4.30,-inf,0.00+:0.00
+(/),-1.20+:4.30,-inf,nan+:nan
(/),-1.20+:4.30,nan,nan+:nan
(/),-1.20+:4.30,x,__failed__
(/),1.20+:-4.30,1,1.20+:-4.30
(/),1.20+:-4.30,-1,-1.20+:4.30
-(/),1.20+:-4.30,0,inf+:-inf
-(/),1.20+:-4.30,0.00,inf+:-inf
+(/),1.20+:-4.30,0,nan+:nan
+(/),1.20+:-4.30,0.00,nan+:nan
(/),1.20+:-4.30,1.20,1.00+:-3.58
(/),1.20+:-4.30,-1.20,-1.00+:3.58
(/),1.20+:-4.30,1L%3L,3.60+:-12.9
@@ -3191,13 +3191,13 @@
(/),1.20+:-4.30,3.10<:2.50,-1.14+:0.880
(/),1.20+:-4.30,2L%3L<:2,-6.61+:1.05
(/),1.20+:-4.30,1L%2L<:3L%4L,-4.11+:-7.93
-(/),1.20+:-4.30,-inf,0.00+:0.00
+(/),1.20+:-4.30,-inf,nan+:nan
(/),1.20+:-4.30,nan,nan+:nan
(/),1.20+:-4.30,x,__failed__
(/),1L%2L+:1,1,0.500+:1.00
(/),1L%2L+:1,-1,-0.500+:-1.00
-(/),1L%2L+:1,0,inf+:inf
-(/),1L%2L+:1,0.00,inf+:inf
+(/),1L%2L+:1,0,nan+:nan
+(/),1L%2L+:1,0.00,nan+:nan
(/),1L%2L+:1,1.20,0.417+:0.833
(/),1L%2L+:1,-1.20,-0.417+:-0.833
(/),1L%2L+:1,1L%3L,1.50+:3.00
@@ -3215,13 +3215,13 @@
(/),1L%2L+:1,3.10<:2.50,0.0638+:-0.355
(/),1L%2L+:1,2L%3L<:2,1.05+:-1.31
(/),1L%2L+:1,1L%2L<:3L%4L,2.09+:0.782
-(/),1L%2L+:1,-inf,0.00+:0.00
+(/),1L%2L+:1,-inf,nan+:nan
(/),1L%2L+:1,nan,nan+:nan
(/),1L%2L+:1,x,__failed__
(/),1L%2L+:3L%4L,1,0.500+:0.750
(/),1L%2L+:3L%4L,-1,-0.500+:-0.750
-(/),1L%2L+:3L%4L,0,inf+:inf
-(/),1L%2L+:3L%4L,0.00,inf+:inf
+(/),1L%2L+:3L%4L,0,nan+:nan
+(/),1L%2L+:3L%4L,0.00,nan+:nan
(/),1L%2L+:3L%4L,1.20,0.417+:0.625
(/),1L%2L+:3L%4L,-1.20,-0.417+:-0.625
(/),1L%2L+:3L%4L,1L%3L,1.50+:2.25
@@ -3239,7 +3239,7 @@
(/),1L%2L+:3L%4L,3.10<:2.50,0.0156+:-0.290
(/),1L%2L+:3L%4L,2L%3L<:2,0.711+:-1.15
(/),1L%2L+:3L%4L,1L%2L<:3L%4L,1.75+:0.416
-(/),1L%2L+:3L%4L,-inf,0.00+:0.00
+(/),1L%2L+:3L%4L,-inf,nan+:nan
(/),1L%2L+:3L%4L,nan,nan+:nan
(/),1L%2L+:3L%4L,x,__failed__
(/),3<:1,1,3.00<:1
Modified: pure/trunk/test/test021.log
===================================================================
--- pure/trunk/test/test021.log 2008-09-11 15:54:04 UTC (rev 750)
+++ pure/trunk/test/test021.log 2008-09-11 16:13:05 UTC (rev 751)
@@ -272,10 +272,10 @@
}
*** EXACT/INEXACT ***
(+),2,2+:3,4+:3
-(+),2,2<:3,0.0200+:0.282
+(+),2,2<:3,0.283<:1.50
(+),2,2L%3L,8L%3L
(-),2,2+:3,0+:-3
-(-),2,2<:3,3.98+:-0.282
+(-),2,2<:3,3.99<:-0.0708
(-),2,2L%3L,4L%3L
(*),2,2+:3,4+:6
(*),2,2<:3,4<:3
@@ -290,10 +290,10 @@
(^),2,2<:3,0.253<:0.196
(^),2,2L%3L,1.59
(+),2+:3,2,4+:3
-(+),2<:3,2,0.0200+:0.282
+(+),2<:3,2,0.283<:1.50
(+),2L%3L,2,8L%3L
(-),2+:3,2,0+:3
-(-),2<:3,2,-3.98+:0.282
+(-),2<:3,2,3.99<:3.07
(-),2L%3L,2,(-4L)%3L
(*),2+:3,2,4+:6
(*),2<:3,2,4<:3
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-09-20 16:37:02
|
Revision: 806
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=806&view=rev
Author: agraef
Date: 2008-09-20 16:36:47 +0000 (Sat, 20 Sep 2008)
Log Message:
-----------
Fix deprecated list comprehension syntax.
Modified Paths:
--------------
pure/trunk/test/test014.pure
pure/trunk/test/test015.pure
pure/trunk/test/test019.pure
pure/trunk/test/test020.pure
pure/trunk/test/test021.pure
Modified: pure/trunk/test/test014.pure
===================================================================
--- pure/trunk/test/test014.pure 2008-09-20 09:49:59 UTC (rev 805)
+++ pure/trunk/test/test014.pure 2008-09-20 16:36:47 UTC (rev 806)
@@ -3,7 +3,7 @@
// Random number generator.
-drop 97 [random; i=1..100] when () = srandom 0 end;
+drop 97 [random | i=1..100] when () = srandom 0 end;
// Some rational arithmetic tests, pilfered from Rob Hubbard's Q+Q manual.
Modified: pure/trunk/test/test015.pure
===================================================================
--- pure/trunk/test/test015.pure 2008-09-20 09:49:59 UTC (rev 805)
+++ pure/trunk/test/test015.pure 2008-09-20 16:36:47 UTC (rev 806)
@@ -123,18 +123,18 @@
********************************************/
// Create data structures
-let a = dict [(i => (double i)); i = 1..10];
-let b = dict [(i => (double i)); i = 11..20];
+let a = dict [i => (double i) | i = 1..10];
+let b = dict [i => (double i) | i = 11..20];
-let c = hdict $ zipwith (=>) [(i, double i, str i); i = 1..10] ( 1..10);
-let d = hdict $ zipwith (=>) [(i, double i, str i); i = 11..20] (11..20);
+let c = hdict $ zipwith (=>) [i, double i, str i | i = 1..10] ( 1..10);
+let d = hdict $ zipwith (=>) [i, double i, str i | i = 11..20] (11..20);
let e = dict $ zipwith (=>) (map str (1..10)) (map str (1..10));
a; b; c; d; e;
mkdict 1000 (1..10);
-mkhdict 1000 [(i, double i, str i); i = 1..10];
+mkhdict 1000 [i, double i, str i | i = 1..10];
// Type tests
@@ -167,7 +167,7 @@
// Slicing
a!!(5..15);
-c!![(i, double i, str i); i = 5..15];
+c!![i, double i, str i | i = 5..15];
// Convert data set to list
@@ -185,7 +185,7 @@
foldl delete a (1..10);
delete a 5000;
-foldl delete c [(i, double i, str i); i = 1..10];
+foldl delete c [i, double i, str i | i = 1..10];
delete c (5000, 5000.0, "5000");
// Relations
@@ -259,8 +259,8 @@
let a = array ( 1..10);
let b = array (11..20);
-let c = array2 [[str (i + j); i = j..10]; j = 1..10];
-let d = array2 [[str (i + j); i = j..10]; j = 11..20];
+let c = array2 [[str (i + j) | i = j..10] | j = 1..10];
+let d = array2 [[str (i + j) | i = j..10] | j = 11..20];
a; b; c; d;
@@ -293,7 +293,7 @@
// Slicing
a!!(5..15);
-c!![(i, j); i = 3..15; j = 3..15];
+c!![(i, j) | i = 3..15; j = 3..15];
// Convert data set to list
Modified: pure/trunk/test/test019.pure
===================================================================
--- pure/trunk/test/test019.pure 2008-09-20 09:49:59 UTC (rev 805)
+++ pure/trunk/test/test019.pure 2008-09-20 16:36:47 UTC (rev 806)
@@ -1,3 +1,3 @@
// const name capture regression, reported by Eddie Rucker
const i = -1;
-[(i,j); i=1..2; j=3..4];
+[(i,j) | i=1..2; j=3..4];
Modified: pure/trunk/test/test020.pure
===================================================================
--- pure/trunk/test/test020.pure 2008-09-20 09:49:59 UTC (rev 805)
+++ pure/trunk/test/test020.pure 2008-09-20 16:36:47 UTC (rev 806)
@@ -21,7 +21,7 @@
// binary operations
let f2 = [(+), (-), (*), (/), (^), atan2, pow];
-let x2 = [i,j; i=x; j=x];
+let x2 = [i,j | i=x; j=x];
// test instrumentation (AG)
@@ -58,7 +58,7 @@
print x = str x otherwise;
tests =
-puts "*** UNARY ***" $$ void [test (f,x); f=f; x=x] $$
-puts "*** BINARY ***" $$ void [test (f,x); f=f2; x=x2];
+puts "*** UNARY ***" $$ void [test (f,x) | f=f; x=x] $$
+puts "*** BINARY ***" $$ void [test (f,x) | f=f2; x=x2];
tests;
Modified: pure/trunk/test/test021.pure
===================================================================
--- pure/trunk/test/test021.pure 2008-09-20 09:49:59 UTC (rev 805)
+++ pure/trunk/test/test021.pure 2008-09-20 16:36:47 UTC (rev 806)
@@ -36,11 +36,11 @@
puts "*** EXACT/INEXACT ***" $$
// These should all return exact results, except +/- with polar operands, as
// well as / and ^ which always return inexact results.
-do test [op,2,a;op=[(+),(-),(*),(%),(/),(^)];a=[2+:3,2<:3,2%3]] $$
-do test [op,a,2;op=[(+),(-),(*),(%),(/),(^)];a=[2+:3,2<:3,2%3]] $$
+do test [op,2,a|op=[(+),(-),(*),(%),(/),(^)];a=[2+:3,2<:3,2%3]] $$
+do test [op,a,2|op=[(+),(-),(*),(%),(/),(^)];a=[2+:3,2<:3,2%3]] $$
puts "*** SYMBOLIC ***" $$
// If everything is all right here, these should all print __failed__.
-do test [op,x,a;op=[(+),(-),(*),(%),(/),(^)];a=[2+:3,2<:3,2%3]] $$
-do test [op,a,x;op=[(+),(-),(*),(%),(/),(^)];a=[2+:3,2<:3,2%3]];
+do test [op,x,a|op=[(+),(-),(*),(%),(/),(^)];a=[2+:3,2<:3,2%3]] $$
+do test [op,a,x|op=[(+),(-),(*),(%),(/),(^)];a=[2+:3,2<:3,2%3]];
tests;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ag...@us...> - 2008-09-28 06:35:37
|
Revision: 888
http://pure-lang.svn.sourceforge.net/pure-lang/?rev=888&view=rev
Author: agraef
Date: 2008-09-28 06:35:33 +0000 (Sun, 28 Sep 2008)
Log Message:
-----------
Add matrix tests.
Added Paths:
-----------
pure/trunk/test/test025.log
pure/trunk/test/test025.pure
Added: pure/trunk/test/test025.log
===================================================================
--- pure/trunk/test/test025.log (rev 0)
+++ pure/trunk/test/test025.log 2008-09-28 06:35:33 UTC (rev 888)
@@ -0,0 +1,475 @@
+let x = {1,2,3;4,5,6};
+x;
+{1,2,3;4,5,6}
+x';
+{1,4;2,5;3,6}
+reverse x;
+{6,5,4;3,2,1}
+#x;
+6
+dim x;
+2,3
+redim (3,2) x;
+{1,2;3,4;5,6}
+x!(1,1);
+5
+x!!(0,0..2);
+{1,2,3}
+x!!(0..1,0..1);
+{1,2;4,5}
+diag x;
+{1,5}
+supdiag x 1;
+{2}
+subdiag x 1;
+{4}
+supdiag x 1===subdiag x (-1);
+1
+let x = {1.0,2.0,3.0;4.0,5.0,6.0};
+x;
+{1.0,2.0,3.0;4.0,5.0,6.0}
+x';
+{1.0,4.0;2.0,5.0;3.0,6.0}
+reverse x;
+{6.0,5.0,4.0;3.0,2.0,1.0}
+#x;
+6
+dim x;
+2,3
+redim (3,2) x;
+{1.0,2.0;3.0,4.0;5.0,6.0}
+x!(1,1);
+5.0
+x!!(0,0..2);
+{1.0,2.0,3.0}
+x!!(0..1,0..1);
+{1.0,2.0;4.0,5.0}
+diag x;
+{1.0,5.0}
+supdiag x 1;
+{2.0}
+subdiag x 1;
+{4.0}
+supdiag x 1===subdiag x (-1);
+1
+let x = {1.0+:-2.0,2.0+:-4.0,3.0+:-6.0;4.0+:1.0,5.0+:2.0,6.0+:3.0};
+x;
+{1.0+:-2.0,2.0+:-4.0,3.0+:-6.0;4.0+:1.0,5.0+:2.0,6.0+:3.0}
+x';
+{1.0+:-2.0,4.0+:1.0;2.0+:-4.0,5.0+:2.0;3.0+:-6.0,6.0+:3.0}
+reverse x;
+{6.0+:3.0,5.0+:2.0,4.0+:1.0;3.0+:-6.0,2.0+:-4.0,1.0+:-2.0}
+#x;
+6
+dim x;
+2,3
+redim (3,2) x;
+{1.0+:-2.0,2.0+:-4.0;3.0+:-6.0,4.0+:1.0;5.0+:2.0,6.0+:3.0}
+x!(1,1);
+5.0+:2.0
+x!!(0,0..2);
+{1.0+:-2.0,2.0+:-4.0,3.0+:-6.0}
+x!!(0..1,0..1);
+{1.0+:-2.0,2.0+:-4.0;4.0+:1.0,5.0+:2.0}
+diag x;
+{1.0+:-2.0,5.0+:2.0}
+supdiag x 1;
+{2.0+:-4.0}
+subdiag x 1;
+{4.0+:1.0}
+supdiag x 1===subdiag x (-1);
+1
+let x = {1,2,3;4,5,6};
+{
+ rule #0: y = dmatrix x
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = dmatrix x;
+{
+ rule #0: z = cmatrix y
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let z = cmatrix y;
+x;
+{1,2,3;4,5,6}
+y;
+{1.0,2.0,3.0;4.0,5.0,6.0}
+z;
+{1.0+:0.0,2.0+:0.0,3.0+:0.0;4.0+:0.0,5.0+:0.0,6.0+:0.0}
+imatrix x===x;
+1
+dmatrix y===y;
+1
+cmatrix z===z;
+1
+imatrix y===x;
+1
+re z===y;
+1
+im z===dmatrix (dim x);
+1
+imatrix z;
+{1,0,2,0,3,0;4,0,5,0,6,0}
+dmatrix z;
+{1.0,0.0,2.0,0.0,3.0,0.0;4.0,0.0,5.0,0.0,6.0,0.0}
+let x = {1,2,3;4,5,6};
+{
+ rule #0: y = int_matrix_view (3,2) (pointer x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = int_matrix_view (3,2) (pointer x);
+x;
+{1,2,3;4,5,6}
+y;
+{1,2;3,4;5,6}
+list x==list y;
+1
+dim x==reverse (dim y);
+1
+{
+ rule #0: y = double_matrix (2,3) (double_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = double_matrix (2,3) (double_pointer #<pointer 0> x);
+x;
+{1,2,3;4,5,6}
+y;
+{1.0,2.0,3.0;4.0,5.0,6.0}
+x==y;
+1
+{
+ rule #0: y = float_matrix (2,3) (float_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = float_matrix (2,3) (float_pointer #<pointer 0> x);
+x;
+{1,2,3;4,5,6}
+y;
+{1.0,2.0,3.0;4.0,5.0,6.0}
+x==y;
+1
+{
+ rule #0: y = complex_matrix (2,3) (complex_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = complex_matrix (2,3) (complex_pointer #<pointer 0> x);
+x;
+{1,2,3;4,5,6}
+y;
+{1.0+:0.0,2.0+:0.0,3.0+:0.0;4.0+:0.0,5.0+:0.0,6.0+:0.0}
+x==y;
+1
+{
+ rule #0: y = complex_float_matrix (2,3) (complex_float_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = complex_float_matrix (2,3) (complex_float_pointer #<pointer 0> x);
+x;
+{1,2,3;4,5,6}
+y;
+{1.0+:0.0,2.0+:0.0,3.0+:0.0;4.0+:0.0,5.0+:0.0,6.0+:0.0}
+x==y;
+1
+{
+ rule #0: y = int_matrix (2,3) (int_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = int_matrix (2,3) (int_pointer #<pointer 0> x);
+x;
+{1,2,3;4,5,6}
+y;
+{1,2,3;4,5,6}
+x==y;
+1
+{
+ rule #0: y = short_matrix (2,3) (short_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = short_matrix (2,3) (short_pointer #<pointer 0> x);
+x;
+{1,2,3;4,5,6}
+y;
+{1,2,3;4,5,6}
+x==y;
+1
+{
+ rule #0: y = byte_matrix (2,3) (byte_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = byte_matrix (2,3) (byte_pointer #<pointer 0> x);
+x;
+{1,2,3;4,5,6}
+y;
+{1,2,3;4,5,6}
+x==y;
+1
+{
+ rule #0: x = dmatrix {1,2,3;4,5,6}
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let x = dmatrix {1,2,3;4,5,6};
+{
+ rule #0: y = double_matrix_view (3,2) (pointer x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = double_matrix_view (3,2) (pointer x);
+x;
+{1.0,2.0,3.0;4.0,5.0,6.0}
+y;
+{1.0,2.0;3.0,4.0;5.0,6.0}
+list x==list y;
+1
+dim x==reverse (dim y);
+1
+{
+ rule #0: y = double_matrix (2,3) (double_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = double_matrix (2,3) (double_pointer #<pointer 0> x);
+x;
+{1.0,2.0,3.0;4.0,5.0,6.0}
+y;
+{1.0,2.0,3.0;4.0,5.0,6.0}
+x==y;
+1
+{
+ rule #0: y = float_matrix (2,3) (float_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = float_matrix (2,3) (float_pointer #<pointer 0> x);
+x;
+{1.0,2.0,3.0;4.0,5.0,6.0}
+y;
+{1.0,2.0,3.0;4.0,5.0,6.0}
+x==y;
+1
+{
+ rule #0: y = complex_matrix (2,3) (complex_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = complex_matrix (2,3) (complex_pointer #<pointer 0> x);
+x;
+{1.0,2.0,3.0;4.0,5.0,6.0}
+y;
+{1.0+:0.0,2.0+:0.0,3.0+:0.0;4.0+:0.0,5.0+:0.0,6.0+:0.0}
+x==y;
+1
+{
+ rule #0: y = complex_float_matrix (2,3) (complex_float_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = complex_float_matrix (2,3) (complex_float_pointer #<pointer 0> x);
+x;
+{1.0,2.0,3.0;4.0,5.0,6.0}
+y;
+{1.0+:0.0,2.0+:0.0,3.0+:0.0;4.0+:0.0,5.0+:0.0,6.0+:0.0}
+x==y;
+1
+{
+ rule #0: y = int_matrix (2,3) (int_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = int_matrix (2,3) (int_pointer #<pointer 0> x);
+x;
+{1.0,2.0,3.0;4.0,5.0,6.0}
+y;
+{1,2,3;4,5,6}
+x==y;
+1
+{
+ rule #0: y = short_matrix (2,3) (short_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = short_matrix (2,3) (short_pointer #<pointer 0> x);
+x;
+{1.0,2.0,3.0;4.0,5.0,6.0}
+y;
+{1,2,3;4,5,6}
+x==y;
+1
+{
+ rule #0: y = byte_matrix (2,3) (byte_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = byte_matrix (2,3) (byte_pointer #<pointer 0> x);
+x;
+{1.0,2.0,3.0;4.0,5.0,6.0}
+y;
+{1,2,3;4,5,6}
+x==y;
+1
+{
+ rule #0: x = cmatrix {1,2,3;4,5,6}
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let x = cmatrix {1,2,3;4,5,6};
+{
+ rule #0: y = complex_matrix_view (3,2) (pointer x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = complex_matrix_view (3,2) (pointer x);
+x;
+{1.0+:0.0,2.0+:0.0,3.0+:0.0;4.0+:0.0,5.0+:0.0,6.0+:0.0}
+y;
+{1.0+:0.0,2.0+:0.0;3.0+:0.0,4.0+:0.0;5.0+:0.0,6.0+:0.0}
+list x==list y;
+1
+dim x==reverse (dim y);
+1
+{
+ rule #0: z = double_matrix_view (2,6) (pointer x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let z = double_matrix_view (2,6) (pointer x);
+z;
+{1.0,0.0,2.0,0.0,3.0,0.0;4.0,0.0,5.0,0.0,6.0,0.0}
+cat (catmap (\(a/*0:01*/+:b/*0:1*/) -> [[a/*0:01*/,b/*0:1*/]] {
+ rule #0: a+:b = [[a,b]]
+ state 0: #0
+ <app> state 1
+ state 1: #0
+ <app> state 2
+ state 2: #0
+ +: state 3
+ state 3: #0
+ <var> state 4
+ state 4: #0
+ <var> state 5
+ state 5: #0
+}) x)==list z;
+1
+{
+ rule #0: y = double_matrix (2,6) (double_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = double_matrix (2,6) (double_pointer #<pointer 0> x);
+x;
+{1.0+:0.0,2.0+:0.0,3.0+:0.0;4.0+:0.0,5.0+:0.0,6.0+:0.0}
+y;
+{1.0,0.0,2.0,0.0,3.0,0.0;4.0,0.0,5.0,0.0,6.0,0.0}
+y==z;
+1
+{
+ rule #0: y = float_matrix (2,6) (float_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = float_matrix (2,6) (float_pointer #<pointer 0> x);
+x;
+{1.0+:0.0,2.0+:0.0,3.0+:0.0;4.0+:0.0,5.0+:0.0,6.0+:0.0}
+y;
+{1.0,0.0,2.0,0.0,3.0,0.0;4.0,0.0,5.0,0.0,6.0,0.0}
+y==z;
+1
+{
+ rule #0: y = complex_matrix (2,3) (complex_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = complex_matrix (2,3) (complex_pointer #<pointer 0> x);
+x;
+{1.0+:0.0,2.0+:0.0,3.0+:0.0;4.0+:0.0,5.0+:0.0,6.0+:0.0}
+y;
+{1.0+:0.0,2.0+:0.0,3.0+:0.0;4.0+:0.0,5.0+:0.0,6.0+:0.0}
+x==y;
+1
+{
+ rule #0: y = complex_float_matrix (2,3) (complex_float_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = complex_float_matrix (2,3) (complex_float_pointer #<pointer 0> x);
+x;
+{1.0+:0.0,2.0+:0.0,3.0+:0.0;4.0+:0.0,5.0+:0.0,6.0+:0.0}
+y;
+{1.0+:0.0,2.0+:0.0,3.0+:0.0;4.0+:0.0,5.0+:0.0,6.0+:0.0}
+x==y;
+1
+{
+ rule #0: y = int_matrix (2,6) (int_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = int_matrix (2,6) (int_pointer #<pointer 0> x);
+x;
+{1.0+:0.0,2.0+:0.0,3.0+:0.0;4.0+:0.0,5.0+:0.0,6.0+:0.0}
+y;
+{1,0,2,0,3,0;4,0,5,0,6,0}
+y==z;
+1
+{
+ rule #0: y = short_matrix (2,6) (short_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = short_matrix (2,6) (short_pointer #<pointer 0> x);
+x;
+{1.0+:0.0,2.0+:0.0,3.0+:0.0;4.0+:0.0,5.0+:0.0,6.0+:0.0}
+y;
+{1,0,2,0,3,0;4,0,5,0,6,0}
+y==z;
+1
+{
+ rule #0: y = byte_matrix (2,6) (byte_pointer #<pointer 0> x)
+ state 0: #0
+ <var> state 1
+ state 1: #0
+}
+let y = byte_matrix (2,6) (byte_pointer #<pointer 0> x);
+x;
+{1.0+:0.0,2.0+:0.0,3.0+:0.0;4.0+:0.0,5.0+:0.0,6.0+:0.0}
+y;
+{1,0,2,0,3,0;4,0,5,0,6,0}
+y==z;
+1
Added: pure/trunk/test/test025.pure
===================================================================
--- pure/trunk/test/test025.pure (rev 0)
+++ pure/trunk/test/test025.pure 2008-09-28 06:35:33 UTC (rev 888)
@@ -0,0 +1,129 @@
+
+// matrix stuff
+
+// NOTE: This test will fail if Pure was built without GSL support.
+
+using math;
+
+// Basic matrix ops.
+
+// int matrix
+let x = {1,2,3;4,5,6};
+
+x; x'; reverse x;
+#x; dim x; redim (3,2) x;
+x!(1,1); x!!(0,0..2); x!!(0..1,0..1);
+diag x; supdiag x 1; subdiag x 1; supdiag x 1===subdiag x (-1);
+
+// double matrix
+let x = {1.0,2.0,3.0;4.0,5.0,6.0};
+
+x; x'; reverse x;
+#x; dim x; redim (3,2) x;
+x!(1,1); x!!(0,0..2); x!!(0..1,0..1);
+diag x; supdiag x 1; subdiag x 1; supdiag x 1===subdiag x (-1);
+
+// complex matrix
+let x = {1.0+:-2.0,2.0+:-4.0,3.0+:-6.0;4.0+:1.0,5.0+:2.0,6.0+:3.0};
+
+x; x'; reverse x;
+#x; dim x; redim (3,2) x;
+x!(1,1); x!!(0,0..2); x!!(0..1,0..1);
+diag x; supdiag x 1; subdiag x 1; supdiag x 1===subdiag x (-1);
+
+// Numeric matrix conversions.
+
+let x = {1,2,3;4,5,6};
+let y = dmatrix x;
+let z = cmatrix y;
+
+x;y;z;
+
+imatrix x===x; dmatrix y===y; cmatrix z===z;
+
+imatrix y===x; re z===y; im z===dmatrix (dim x);
+
+imatrix z; dmatrix z;
+
+// Matrix-pointer conversions.
+
+// int matrix
+let x = {1,2,3;4,5,6};
+let y = int_matrix_view (3,2) (pointer x);
+x; y; list x==list y; dim x == reverse (dim y);
+
+let y = double_matrix (2,3) (double_pointer NULL x);
+x; y; x==y;
+
+let y = float_matrix (2,3) (float_pointer NULL x);
+x; y; x==y;
+
+let y = complex_matrix (2,3) (complex_pointer NULL x);
+x; y; x==y;
+
+let y = complex_float_matrix (2,3) (complex_float_pointer NULL x);
+x; y; x==y;
+
+let y = int_matrix (2,3) (int_pointer NULL x);
+x; y; x==y;
+
+let y = short_matrix (2,3) (short_pointer NULL x);
+x; y; x==y;
+
+let y = byte_matrix (2,3) (byte_pointer NULL x);
+x; y; x==y;
+
+// double matrix
+let x = dmatrix {1,2,3;4,5,6};
+let y = double_matrix_view (3,2) (pointer x);
+x; y; list x==list y; dim x == reverse (dim y);
+
+let y = double_matrix (2,3) (double_pointer NULL x);
+x; y; x==y;
+
+let y = float_matrix (2,3) (float_pointer NULL x);
+x; y; x==y;
+
+let y = complex_matrix (2,3) (complex_pointer NULL x);
+x; y; x==y;
+
+let y = complex_float_matrix (2,3) (complex_float_pointer NULL x);
+x; y; x==y;
+
+let y = int_matrix (2,3) (int_pointer NULL x);
+x; y; x==y;
+
+let y = short_matrix (2,3) (short_pointer NULL x);
+x; y; x==y;
+
+let y = byte_matrix (2,3) (byte_pointer NULL x);
+x; y; x==y;
+
+// complex matrix
+let x = cmatrix {1,2,3;4,5,6};
+let y = complex_matrix_view (3,2) (pointer x);
+x; y; list x==list y; dim x == reverse (dim y);
+
+let z = double_matrix_view (2,6) (pointer x);
+z; cat [[a,b]|a+:b=x]==list z;
+
+let y = double_matrix (2,6) (double_pointer NULL x);
+x; y; y==z;
+
+let y = float_matrix (2,6) (float_pointer NULL x);
+x; y; y==z;
+
+let y = complex_matrix (2,3) (complex_pointer NULL x);
+x; y; x==y;
+
+let y = complex_float_matrix (2,3) (complex_float_pointer NULL x);
+x; y; x==y;
+
+let y = int_matrix (2,6) (int_pointer NULL x);
+x; y; y==z;
+
+let y = short_matrix (2,6) (short_pointer NULL x);
+x; y; y==z;
+
+let y = byte_matrix (2,6) (byte_pointer NULL x);
+x; y; y==z;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
Thanks for helping keep SourceForge clean.
X