temporary point on the inner loop wrapper
This commit is contained in:
@@ -1,28 +0,0 @@
|
||||
@testset "Laguerre-Conway" begin
|
||||
using Thesis: laguerre_conway
|
||||
|
||||
# Test that the propagator produces good periodic orbits (forwards and backwards)
|
||||
for T in rand(3600*1.5:3600*4, (5))
|
||||
start = oe_to_xyz([ (μs["Earth"]*(T/(2π))^2)^(1/3), rand(0.01:0.01:0.5), rand(0.01:0.01:0.45π), 0., 0., 1. ], μs["Earth"])
|
||||
orbit = start
|
||||
for _ in 1:5
|
||||
i = 0.
|
||||
while i < T
|
||||
orbit = laguerre_conway(orbit, μs["Earth"], 1.)
|
||||
i += 1
|
||||
end
|
||||
@test i ≈ T
|
||||
@test norm(orbit - start) < 1e-2
|
||||
end
|
||||
for _ in 1:5
|
||||
i = 0.
|
||||
while i > -T
|
||||
orbit = laguerre_conway(orbit, μs["Earth"], -1.)
|
||||
i -= 1
|
||||
end
|
||||
@test i ≈ -T
|
||||
@test norm(orbit - start) < 1e-2
|
||||
end
|
||||
end
|
||||
|
||||
end
|
||||
Reference in New Issue
Block a user