Merge pull request #20 from pjabardo/copyvar

Bug when copying

Author: Keno

src/Polynomials.jl

@@ -41,7 +41,7 @@ function setindex!(p::Poly, v, i)
     v
 end
 
-copy(p::Poly) = Poly(copy(p.a))
+copy(p::Poly) = Poly(copy(p.a), p.var)
 
 zero{T}(p::Poly{T}) = zero(Poly{T})
 zero{T}(::Type{Poly{T}}) = Poly(T[])

test/tests.jl

@@ -87,6 +87,11 @@ pS3 = Poly([1, 2, 3, 4, 5], :s)
 @test_throws ErrorException pS1 / pX
 @test_throws ErrorException pS1 % pX
 
+#Testing copying.
+pcpy1 = Poly([1,2,3,4,5], :y)
+pcpy2 = copy(pcpy1)
+@test pcpy1 == pcpy2
+
 #Tests for Pade approximants
 
 println("Test for the exponential function.")
@@ -112,4 +117,4 @@ d = Poly(convert(Vector{BigInt},(-1).^(0:60).*gamma(BigFloat("1.0"):BigFloat("61
 PQexpint = Pade(d,30,30)
 println("The approximate sum of the divergent series is:  ",float64(padeval(PQexpint,1.0)))
 println("The approximate sum of the convergent series is: ",exp(1)*(-γ-sum([(-1).^k/k./gamma(k+1) for k=1:20])))
-@test isapprox(padeval(PQexpint,1.0) , exp(1)*(-γ-sum([(-1).^k/k./gamma(k+1) for k=1:20])))
+@test isapprox(padeval(PQexpint,1.0) , exp(1)*(-γ-sum([(-1).^k/k./gamma(k+1) for k=1:20])))