Couple more logsumexp tests.
authorTaylor R Campbell <campbell@mumble.net>
Sun, 30 Jun 2019 18:58:54 +0000 (18:58 +0000)
committerTaylor R Campbell <campbell@mumble.net>
Sun, 30 Jun 2019 23:30:53 +0000 (23:30 +0000)
tests/runtime/test-arith.scm

index 91cc085bb65302d8ea207b50f0b8fd7de16b006e..712bc68fb5f72c1d48ba37ab630ba0c39714ae2e 100644 (file)
@@ -415,6 +415,10 @@ USA.
 (define-enumerated-test 'logsumexp-edges
   (list
    (list '() (flo:-inf.0))
+   (list '(1) 1)
+   (list '(1/2) 1/2)
+   (list '(-1) -1)
+   (list '(-1/2) -1/2)
    (list '(-1000) -1000)
    (list '(-1000.) -1000.)
    (list (list (flo:-inf.0)) (flo:-inf.0))