Relax pgrrec test

JuliaAstro · Jan 11, 2019 · 24f1eca · 24f1eca
1 parent 29f59d3
commit 24f1eca
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 4 deletions.
diff --git a/test/g.jl b/test/g.jl
@@ -7,6 +7,7 @@ using Random: randstring
             pcpool("pcpool_test", data)
             cvals = gcpool("pcpool_test")
             @test data == cvals
+            @test gcpool("norbert") === nothing
         finally
             kclear()
         end

diff --git a/test/p.jl b/test/p.jl
@@ -42,10 +42,12 @@ using LinearAlgebra: I
             rp = radii[3]
             f = (re - rp) / re
             rectan = pgrrec("Mars", deg2rad(90.0), deg2rad(45), 300, re, f)
-            expected = [1.604703022312521e-13, -2.620678915e+3, 2.592408909e+3]
-            @testset for i in eachindex(rectan, expected)
-                @test rectan[i] ≈ expected[i]
-            end
+            expected = [1.604650025e-13, -2.620678915e+3, 2.592408909e+3]
+            @test rectan ≈ expected
+            @test_throws SpiceError pgrrec("norbert", deg2rad(90.0), deg2rad(45), 300, re, f)
+            @test_throws SpiceError pgrrec("", deg2rad(90.0), deg2rad(45), 300, re, f)
+            @test_throws SpiceError pgrrec("Mars", deg2rad(90.0), deg2rad(45), 300, -re, f)
+            @test_throws SpiceError pgrrec("Mars", deg2rad(90.0), deg2rad(45), 300, re, f+1)
         finally
             kclear()
         end