1- using LinearAlgebra, Test, PreallocationTools, ForwardDiff, LabelledArrays,
2- RecursiveArrayTools
1+ using LinearAlgebra,
2+ Test, PreallocationTools, ForwardDiff, LabelledArrays,
3+ RecursiveArrayTools
34
45function test (u0, dual, chunk_size)
56 cache = PreallocationTools. DiffCache (u0, chunk_size)
@@ -12,8 +13,8 @@ function test(u0, dual, chunk_size)
1213 result_dual1 = get_tmp (cache, dual)
1314 result_dual2 = get_tmp (cache, first (dual))
1415 return allocs_normal1, allocs_normal2, allocs_dual1, allocs_dual2, result_normal1,
15- result_normal2, result_dual1,
16- result_dual2
16+ result_normal2, result_dual1,
17+ result_dual2
1718end
1819
1920function structequal (struct1, struct2)
2930chunk_size = 5
3031u0 = ones (5 , 5 )
3132dual = zeros (ForwardDiff. Dual{ForwardDiff. Tag{nothing , Float64}, Float64,
32- chunk_size}, 5 , 5 )
33+ chunk_size}, 5 , 5 )
3334results = test (u0, dual, chunk_size)
3435# allocation tests
3536@test results[1 ] == 0
@@ -53,7 +54,7 @@ results = test(u0, dual, chunk_size)
5354chunk_size = 5
5455u0_B = ones (5 , 5 )
5556dual_B = zeros (ForwardDiff. Dual{ForwardDiff. Tag{typeof (something), Float64}, Float64,
56- chunk_size}, 2 , 2 )
57+ chunk_size}, 2 , 2 )
5758cache_B = FixedSizeDiffCache (u0_B, chunk_size)
5859tmp_du_BA = get_tmp (cache_B, u0_B)
5960tmp_dual_du_BA = get_tmp (cache_B, dual_B)
@@ -76,7 +77,7 @@ tmp_dual_du_BN = get_tmp(cache_B, dual_B[1])
7677chunk_size = 4
7778u0 = LArray ((2 , 2 ); a = 1.0 , b = 1.0 , c = 1.0 , d = 1.0 )
7879zerodual = zero (ForwardDiff. Dual{ForwardDiff. Tag{nothing , Float64}, Float64,
79- chunk_size})
80+ chunk_size})
8081dual = LArray ((2 , 2 ); a = zerodual, b = zerodual, c = zerodual, d = zerodual)
8182results = test (u0, dual, chunk_size)
8283# allocation tests
@@ -102,9 +103,9 @@ results = test(u0, dual, chunk_size)
102103chunk_size = 2
103104u0 = ArrayPartition (ones (2 , 2 ), ones (3 , 3 ))
104105dual_a = zeros (ForwardDiff. Dual{ForwardDiff. Tag{nothing , Float64}, Float64,
105- chunk_size}, 2 , 2 )
106+ chunk_size}, 2 , 2 )
106107dual_b = zeros (ForwardDiff. Dual{ForwardDiff. Tag{nothing , Float64}, Float64,
107- chunk_size}, 3 , 3 )
108+ chunk_size}, 3 , 3 )
108109dual = ArrayPartition (dual_a, dual_b)
109110results = test (u0, dual, chunk_size)
110111# allocation tests
@@ -128,9 +129,9 @@ results = test(u0, dual, chunk_size)
128129
129130u0_AP = ArrayPartition (ones (2 , 2 ), ones (3 , 3 ))
130131dual_a = zeros (ForwardDiff. Dual{ForwardDiff. Tag{typeof (something), Float64}, Float64,
131- chunk_size}, 2 , 2 )
132+ chunk_size}, 2 , 2 )
132133dual_b = zeros (ForwardDiff. Dual{ForwardDiff. Tag{typeof (something), Float64}, Float64,
133- chunk_size}, 3 , 3 )
134+ chunk_size}, 3 , 3 )
134135dual_AP = ArrayPartition (dual_a, dual_b)
135136cache_AP = FixedSizeDiffCache (u0_AP, chunk_size)
136137tmp_du_APA = get_tmp (cache_AP, u0_AP)
0 commit comments