@@ -6,7 +6,7 @@ import BlockArrays: block, blockindex, unblock, BlockSlice
66import DomainSets: indomain, Sphere
77import LinearAlgebra: norm, factorize
88import QuasiArrays: to_quasi_index, SubQuasiArray, *
9- import ContinuumArrays: TransformFactorization, @simplify , ProjectionFactorization, plan_grid_transform, grid, grid_layout, plotgrid_layout, AbstractBasisLayout, MemoryLayout
9+ import ContinuumArrays: TransformFactorization, @simplify , ProjectionFactorization, plan_grid_transform, plan_transform, grid, grid_layout, plotgrid_layout, AbstractBasisLayout, MemoryLayout
1010import ClassicalOrthogonalPolynomials: checkpoints, _sum, cardinality, increasingtruncations
1111import BlockBandedMatrices: BlockRange1, _BandedBlockBandedMatrix
1212import FastTransforms: Plan, interlace
@@ -123,19 +123,11 @@ RealSphericalHarmonicTransform{T}(N::Int) where T<:Real = RealSphericalHarmonicT
123123
124124
125125
126- function plan_grid_transform (P:: SphericalHarmonic , szs:: Tuple{Block{1}} , dims= 1 : 1 )
127- T = eltype (P)
128- B = szs[1 ]
129- grid (P, B), SphericalHarmonicTransform {T} (Int (B))
130- end
131- function plan_grid_transform (P:: RealSphericalHarmonic , szs:: Tuple{Block{1}} , dims= 1 : 1 )
132- T = eltype (P)
133- B = szs[1 ]
134- grid (P, B), RealSphericalHarmonicTransform {T} (Int (B))
135- end
126+ plan_transform (P:: SphericalHarmonic{T} , (N,):: Tuple{Block{1}} , dims= 1 ) where T = SphericalHarmonicTransform {T} (Int (N))
127+ plan_transform (P:: RealSphericalHarmonic{T} , (N,):: Tuple{Block{1}} , dims= 1 ) where T = RealSphericalHarmonicTransform {T} (Int (N))
136128
137- plan_grid_transform (P:: MultivariateOrthogonalPolynomial , Bs :: NTuple{N, Int} , dims = 1 : N) where N =
138- plan_grid_transform (P, findblock .(Ref (axes (P,2 )), Bs), dims)
129+ grid (P:: MultivariateOrthogonalPolynomial , n :: Int ) = grid (P, findblock ( axes (P, 2 ),n))
130+ plan_transform (P :: MultivariateOrthogonalPolynomial , Bs :: NTuple{N,Int} , dims = ntuple (identity, Val (N))) where N = plan_transform (P, findblock .(Ref (axes (P,2 )), Bs), dims)
139131
140132function _sum (A:: AbstractSphericalHarmonic{T} , dims) where T
141133 @assert dims == 1
0 commit comments