Mercurial > repos > public > sbplib_julia
annotate src/LazyTensors/lazy_tensor_operations.jl @ 945:1f41cf9454f2 feature/tensormapping_application_promotion
Remove type declaratio from doc string
author | Jonatan Werpers <jonatan@werpers.com> |
---|---|
date | Sat, 12 Mar 2022 22:20:45 +0100 |
parents | 4a4ef4bf6cb9 |
children | 86889fc5b63f |
rev | line source |
---|---|
944
4a4ef4bf6cb9
Move exports to the top of the files
Jonatan Werpers <jonatan@werpers.com>
parents:
943
diff
changeset
|
1 export LazyTensorMappingApplication |
4a4ef4bf6cb9
Move exports to the top of the files
Jonatan Werpers <jonatan@werpers.com>
parents:
943
diff
changeset
|
2 export LazyTensorMappingTranspose |
4a4ef4bf6cb9
Move exports to the top of the files
Jonatan Werpers <jonatan@werpers.com>
parents:
943
diff
changeset
|
3 export TensorMappingComposition |
4a4ef4bf6cb9
Move exports to the top of the files
Jonatan Werpers <jonatan@werpers.com>
parents:
943
diff
changeset
|
4 export LazyLinearMap |
4a4ef4bf6cb9
Move exports to the top of the files
Jonatan Werpers <jonatan@werpers.com>
parents:
943
diff
changeset
|
5 export IdentityMapping |
4a4ef4bf6cb9
Move exports to the top of the files
Jonatan Werpers <jonatan@werpers.com>
parents:
943
diff
changeset
|
6 export InflatedTensorMapping |
4a4ef4bf6cb9
Move exports to the top of the files
Jonatan Werpers <jonatan@werpers.com>
parents:
943
diff
changeset
|
7 export LazyOuterProduct |
4a4ef4bf6cb9
Move exports to the top of the files
Jonatan Werpers <jonatan@werpers.com>
parents:
943
diff
changeset
|
8 export ⊗ |
4a4ef4bf6cb9
Move exports to the top of the files
Jonatan Werpers <jonatan@werpers.com>
parents:
943
diff
changeset
|
9 export SizeMismatch |
4a4ef4bf6cb9
Move exports to the top of the files
Jonatan Werpers <jonatan@werpers.com>
parents:
943
diff
changeset
|
10 |
196
b3c252280a19
Move LazyArray and make LazyTensorMappingApplication and LazyElementwiseOperation subtypes of it
Jonatan Werpers <jonatan@werpers.com>
parents:
195
diff
changeset
|
11 """ |
b3c252280a19
Move LazyArray and make LazyTensorMappingApplication and LazyElementwiseOperation subtypes of it
Jonatan Werpers <jonatan@werpers.com>
parents:
195
diff
changeset
|
12 LazyTensorMappingApplication{T,R,D} <: LazyArray{T,R} |
190
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
13 |
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
14 Struct for lazy application of a TensorMapping. Created using `*`. |
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
15 |
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
16 Allows the result of a `TensorMapping` applied to a vector to be treated as an `AbstractArray`. |
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
17 With a mapping `m` and a vector `v` the LazyTensorMappingApplication object can be created by `m*v`. |
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
18 The actual result will be calcualted when indexing into `m*v`. |
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
19 """ |
942
7829c09f8137
Add promotion calculation of element type for LazyTensorMappingApplication
Jonatan Werpers <jonatan@werpers.com>
parents:
838
diff
changeset
|
20 struct LazyTensorMappingApplication{T,R,D, TM<:TensorMapping{<:Any,R,D}, AA<:AbstractArray{<:Any,D}} <: LazyArray{T,R} |
378
946516954c85
Use concrete types in LazyTensorApplication
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
21 t::TM |
946516954c85
Use concrete types in LazyTensorApplication
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
22 o::AA |
942
7829c09f8137
Add promotion calculation of element type for LazyTensorMappingApplication
Jonatan Werpers <jonatan@werpers.com>
parents:
838
diff
changeset
|
23 |
7829c09f8137
Add promotion calculation of element type for LazyTensorMappingApplication
Jonatan Werpers <jonatan@werpers.com>
parents:
838
diff
changeset
|
24 function LazyTensorMappingApplication(t::TensorMapping{<:Any,R,D}, o::AbstractArray{<:Any,D}) where {R,D} |
7829c09f8137
Add promotion calculation of element type for LazyTensorMappingApplication
Jonatan Werpers <jonatan@werpers.com>
parents:
838
diff
changeset
|
25 T = promote_type(eltype(t), eltype(o)) |
7829c09f8137
Add promotion calculation of element type for LazyTensorMappingApplication
Jonatan Werpers <jonatan@werpers.com>
parents:
838
diff
changeset
|
26 return new{T,R,D,typeof(t), typeof(o)}(t,o) |
7829c09f8137
Add promotion calculation of element type for LazyTensorMappingApplication
Jonatan Werpers <jonatan@werpers.com>
parents:
838
diff
changeset
|
27 end |
190
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
28 end |
348
7fe43d902a27
Start trying to change LazyTensors
Jonatan Werpers <jonatan@werpers.com>
parents:
333
diff
changeset
|
29 # TODO: Do boundschecking on creation! |
190
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
30 |
547
53828d3ed132
Remove unnecessary type parameters
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
541
diff
changeset
|
31 Base.getindex(ta::LazyTensorMappingApplication{T,R}, I::Vararg{Any,R}) where {T,R} = apply(ta.t, ta.o, I...) |
359
ba46a952a450
Remove unnecessary type parameters
Jonatan Werpers <jonatan@werpers.com>
parents:
348
diff
changeset
|
32 Base.size(ta::LazyTensorMappingApplication) = range_size(ta.t) |
190
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
33 # TODO: What else is needed to implement the AbstractArray interface? |
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
34 |
421
2808c41f5efa
Change defs of * for TensorApplication to fix bug
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
35 Base.:*(a::TensorMapping, v::AbstractArray) = LazyTensorMappingApplication(a,v) |
2808c41f5efa
Change defs of * for TensorApplication to fix bug
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
36 Base.:*(a::TensorMapping, b::TensorMapping) = throw(MethodError(Base.:*,(a,b))) |
2808c41f5efa
Change defs of * for TensorApplication to fix bug
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
37 Base.:*(a::TensorMapping, args::Union{TensorMapping, AbstractArray}...) = foldr(*,(a,args...)) |
2808c41f5efa
Change defs of * for TensorApplication to fix bug
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
38 |
190
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
39 # # We need the associativity to be a→b→c = a→(b→c), which is the case for '→' |
274
11010bb74260
Dispatch getindex for TensorMappingApplication on region indices. Dispatch apply
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
267
diff
changeset
|
40 # # Should we overload some other infix binary opesrator? |
190
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
41 # →(tm::TensorMapping{T,R,D}, o::AbstractArray{T,D}) where {T,R,D} = LazyTensorMappingApplication(tm,o) |
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
42 # TODO: We need to be really careful about good error messages. |
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
43 # For example what happens if you try to multiply LazyTensorMappingApplication with a TensorMapping(wrong order)? |
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
44 |
194
d30d42a11566
Move all Lazy operation into the same module
Jonatan Werpers <jonatan@werpers.com>
parents:
190
diff
changeset
|
45 """ |
197
a340fa91b1fc
Move transpose def to the bottom of the file
Jonatan Werpers <jonatan@werpers.com>
parents:
196
diff
changeset
|
46 LazyTensorMappingTranspose{T,R,D} <: TensorMapping{T,D,R} |
a340fa91b1fc
Move transpose def to the bottom of the file
Jonatan Werpers <jonatan@werpers.com>
parents:
196
diff
changeset
|
47 |
a340fa91b1fc
Move transpose def to the bottom of the file
Jonatan Werpers <jonatan@werpers.com>
parents:
196
diff
changeset
|
48 Struct for lazy transpose of a TensorMapping. |
a340fa91b1fc
Move transpose def to the bottom of the file
Jonatan Werpers <jonatan@werpers.com>
parents:
196
diff
changeset
|
49 |
a340fa91b1fc
Move transpose def to the bottom of the file
Jonatan Werpers <jonatan@werpers.com>
parents:
196
diff
changeset
|
50 If a mapping implements the the `apply_transpose` method this allows working with |
a340fa91b1fc
Move transpose def to the bottom of the file
Jonatan Werpers <jonatan@werpers.com>
parents:
196
diff
changeset
|
51 the transpose of mapping `m` by using `m'`. `m'` will work as a regular TensorMapping lazily calling |
a340fa91b1fc
Move transpose def to the bottom of the file
Jonatan Werpers <jonatan@werpers.com>
parents:
196
diff
changeset
|
52 the appropriate methods of `m`. |
a340fa91b1fc
Move transpose def to the bottom of the file
Jonatan Werpers <jonatan@werpers.com>
parents:
196
diff
changeset
|
53 """ |
438
907b0510699f
Change LazyTensorTranspose to have concrete fields
Jonatan Werpers <jonatan@werpers.com>
parents:
436
diff
changeset
|
54 struct LazyTensorMappingTranspose{T,R,D, TM<:TensorMapping{T,R,D}} <: TensorMapping{T,D,R} |
907b0510699f
Change LazyTensorTranspose to have concrete fields
Jonatan Werpers <jonatan@werpers.com>
parents:
436
diff
changeset
|
55 tm::TM |
197
a340fa91b1fc
Move transpose def to the bottom of the file
Jonatan Werpers <jonatan@werpers.com>
parents:
196
diff
changeset
|
56 end |
a340fa91b1fc
Move transpose def to the bottom of the file
Jonatan Werpers <jonatan@werpers.com>
parents:
196
diff
changeset
|
57 |
a340fa91b1fc
Move transpose def to the bottom of the file
Jonatan Werpers <jonatan@werpers.com>
parents:
196
diff
changeset
|
58 # # TBD: Should this be implemented on a type by type basis or through a trait to provide earlier errors? |
348
7fe43d902a27
Start trying to change LazyTensors
Jonatan Werpers <jonatan@werpers.com>
parents:
333
diff
changeset
|
59 # Jonatan 2020-09-25: Is the problem that you can take the transpose of any TensorMapping even if it doesn't implement `apply_transpose`? |
274
11010bb74260
Dispatch getindex for TensorMappingApplication on region indices. Dispatch apply
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
267
diff
changeset
|
60 Base.adjoint(tm::TensorMapping) = LazyTensorMappingTranspose(tm) |
11010bb74260
Dispatch getindex for TensorMappingApplication on region indices. Dispatch apply
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
267
diff
changeset
|
61 Base.adjoint(tmt::LazyTensorMappingTranspose) = tmt.tm |
197
a340fa91b1fc
Move transpose def to the bottom of the file
Jonatan Werpers <jonatan@werpers.com>
parents:
196
diff
changeset
|
62 |
943
fb060e98ac0a
Remove more type assertions
Jonatan Werpers <jonatan@werpers.com>
parents:
942
diff
changeset
|
63 apply(tmt::LazyTensorMappingTranspose{T,R,D}, v::AbstractArray{<:Any,R}, I::Vararg{Any,D}) where {T,R,D} = apply_transpose(tmt.tm, v, I...) |
fb060e98ac0a
Remove more type assertions
Jonatan Werpers <jonatan@werpers.com>
parents:
942
diff
changeset
|
64 apply_transpose(tmt::LazyTensorMappingTranspose{T,R,D}, v::AbstractArray{<:Any,D}, I::Vararg{Any,R}) where {T,R,D} = apply(tmt.tm, v, I...) |
197
a340fa91b1fc
Move transpose def to the bottom of the file
Jonatan Werpers <jonatan@werpers.com>
parents:
196
diff
changeset
|
65 |
359
ba46a952a450
Remove unnecessary type parameters
Jonatan Werpers <jonatan@werpers.com>
parents:
348
diff
changeset
|
66 range_size(tmt::LazyTensorMappingTranspose) = domain_size(tmt.tm) |
ba46a952a450
Remove unnecessary type parameters
Jonatan Werpers <jonatan@werpers.com>
parents:
348
diff
changeset
|
67 domain_size(tmt::LazyTensorMappingTranspose) = range_size(tmt.tm) |
197
a340fa91b1fc
Move transpose def to the bottom of the file
Jonatan Werpers <jonatan@werpers.com>
parents:
196
diff
changeset
|
68 |
210
2aa33d0eef90
Add ability to add and subtract TensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
209
diff
changeset
|
69 |
2aa33d0eef90
Add ability to add and subtract TensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
209
diff
changeset
|
70 struct LazyTensorMappingBinaryOperation{Op,T,R,D,T1<:TensorMapping{T,R,D},T2<:TensorMapping{T,R,D}} <: TensorMapping{T,D,R} |
274
11010bb74260
Dispatch getindex for TensorMappingApplication on region indices. Dispatch apply
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
267
diff
changeset
|
71 tm1::T1 |
11010bb74260
Dispatch getindex for TensorMappingApplication on region indices. Dispatch apply
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
267
diff
changeset
|
72 tm2::T2 |
210
2aa33d0eef90
Add ability to add and subtract TensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
209
diff
changeset
|
73 |
274
11010bb74260
Dispatch getindex for TensorMappingApplication on region indices. Dispatch apply
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
267
diff
changeset
|
74 @inline function LazyTensorMappingBinaryOperation{Op,T,R,D}(tm1::T1,tm2::T2) where {Op,T,R,D, T1<:TensorMapping{T,R,D},T2<:TensorMapping{T,R,D}} |
11010bb74260
Dispatch getindex for TensorMappingApplication on region indices. Dispatch apply
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
267
diff
changeset
|
75 return new{Op,T,R,D,T1,T2}(tm1,tm2) |
210
2aa33d0eef90
Add ability to add and subtract TensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
209
diff
changeset
|
76 end |
2aa33d0eef90
Add ability to add and subtract TensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
209
diff
changeset
|
77 end |
348
7fe43d902a27
Start trying to change LazyTensors
Jonatan Werpers <jonatan@werpers.com>
parents:
333
diff
changeset
|
78 # TODO: Boundschecking in constructor. |
210
2aa33d0eef90
Add ability to add and subtract TensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
209
diff
changeset
|
79 |
943
fb060e98ac0a
Remove more type assertions
Jonatan Werpers <jonatan@werpers.com>
parents:
942
diff
changeset
|
80 apply(tmBinOp::LazyTensorMappingBinaryOperation{:+,T,R,D}, v::AbstractArray{<:Any,D}, I::Vararg{Any,R}) where {T,R,D} = apply(tmBinOp.tm1, v, I...) + apply(tmBinOp.tm2, v, I...) |
fb060e98ac0a
Remove more type assertions
Jonatan Werpers <jonatan@werpers.com>
parents:
942
diff
changeset
|
81 apply(tmBinOp::LazyTensorMappingBinaryOperation{:-,T,R,D}, v::AbstractArray{<:Any,D}, I::Vararg{Any,R}) where {T,R,D} = apply(tmBinOp.tm1, v, I...) - apply(tmBinOp.tm2, v, I...) |
210
2aa33d0eef90
Add ability to add and subtract TensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
209
diff
changeset
|
82 |
547
53828d3ed132
Remove unnecessary type parameters
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
541
diff
changeset
|
83 range_size(tmBinOp::LazyTensorMappingBinaryOperation) = range_size(tmBinOp.tm1) |
53828d3ed132
Remove unnecessary type parameters
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
541
diff
changeset
|
84 domain_size(tmBinOp::LazyTensorMappingBinaryOperation) = domain_size(tmBinOp.tm1) |
210
2aa33d0eef90
Add ability to add and subtract TensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
209
diff
changeset
|
85 |
274
11010bb74260
Dispatch getindex for TensorMappingApplication on region indices. Dispatch apply
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
267
diff
changeset
|
86 Base.:+(tm1::TensorMapping{T,R,D}, tm2::TensorMapping{T,R,D}) where {T,R,D} = LazyTensorMappingBinaryOperation{:+,T,R,D}(tm1,tm2) |
11010bb74260
Dispatch getindex for TensorMappingApplication on region indices. Dispatch apply
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
267
diff
changeset
|
87 Base.:-(tm1::TensorMapping{T,R,D}, tm2::TensorMapping{T,R,D}) where {T,R,D} = LazyTensorMappingBinaryOperation{:-,T,R,D}(tm1,tm2) |
210
2aa33d0eef90
Add ability to add and subtract TensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
209
diff
changeset
|
88 |
412
d94891b8dfca
Start implementing TensorComposition
Jonatan Werpers <jonatan@werpers.com>
parents:
402
diff
changeset
|
89 """ |
d94891b8dfca
Start implementing TensorComposition
Jonatan Werpers <jonatan@werpers.com>
parents:
402
diff
changeset
|
90 TensorMappingComposition{T,R,K,D} |
210
2aa33d0eef90
Add ability to add and subtract TensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
209
diff
changeset
|
91 |
838
76e5682d0e52
Fix a bunch of docstring mistakes
Jonatan Werpers <jonatan@werpers.com>
parents:
625
diff
changeset
|
92 Lazily compose two `TensorMapping`s, so that they can be handled as a single `TensorMapping`. |
412
d94891b8dfca
Start implementing TensorComposition
Jonatan Werpers <jonatan@werpers.com>
parents:
402
diff
changeset
|
93 """ |
d94891b8dfca
Start implementing TensorComposition
Jonatan Werpers <jonatan@werpers.com>
parents:
402
diff
changeset
|
94 struct TensorMappingComposition{T,R,K,D, TM1<:TensorMapping{T,R,K}, TM2<:TensorMapping{T,K,D}} <: TensorMapping{T,R,D} |
d94891b8dfca
Start implementing TensorComposition
Jonatan Werpers <jonatan@werpers.com>
parents:
402
diff
changeset
|
95 t1::TM1 |
d94891b8dfca
Start implementing TensorComposition
Jonatan Werpers <jonatan@werpers.com>
parents:
402
diff
changeset
|
96 t2::TM2 |
190
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
97 |
417
4c6604b7d990
Add dimension checking in the constructor
Jonatan Werpers <jonatan@werpers.com>
parents:
415
diff
changeset
|
98 @inline function TensorMappingComposition(t1::TensorMapping{T,R,K}, t2::TensorMapping{T,K,D}) where {T,R,K,D} |
485
4b49f03bdb98
Switch from DimensionMismatch to SizeMismatch for boundschecks on compositions
Jonatan Werpers <jonatan@werpers.com>
parents:
484
diff
changeset
|
99 @boundscheck check_domain_size(t1, range_size(t2)) |
417
4c6604b7d990
Add dimension checking in the constructor
Jonatan Werpers <jonatan@werpers.com>
parents:
415
diff
changeset
|
100 return new{T,R,K,D, typeof(t1), typeof(t2)}(t1,t2) |
4c6604b7d990
Add dimension checking in the constructor
Jonatan Werpers <jonatan@werpers.com>
parents:
415
diff
changeset
|
101 end |
412
d94891b8dfca
Start implementing TensorComposition
Jonatan Werpers <jonatan@werpers.com>
parents:
402
diff
changeset
|
102 end |
190
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
103 |
412
d94891b8dfca
Start implementing TensorComposition
Jonatan Werpers <jonatan@werpers.com>
parents:
402
diff
changeset
|
104 range_size(tm::TensorMappingComposition) = range_size(tm.t1) |
d94891b8dfca
Start implementing TensorComposition
Jonatan Werpers <jonatan@werpers.com>
parents:
402
diff
changeset
|
105 domain_size(tm::TensorMappingComposition) = domain_size(tm.t2) |
190
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
106 |
943
fb060e98ac0a
Remove more type assertions
Jonatan Werpers <jonatan@werpers.com>
parents:
942
diff
changeset
|
107 function apply(c::TensorMappingComposition{T,R,K,D}, v::AbstractArray{<:Any,D}, I::Vararg{Any,R}) where {T,R,K,D} |
418
264af2bb646f
Switch to using * instead of calling the constructor
Jonatan Werpers <jonatan@werpers.com>
parents:
417
diff
changeset
|
108 apply(c.t1, c.t2*v, I...) |
412
d94891b8dfca
Start implementing TensorComposition
Jonatan Werpers <jonatan@werpers.com>
parents:
402
diff
changeset
|
109 end |
190
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
110 |
943
fb060e98ac0a
Remove more type assertions
Jonatan Werpers <jonatan@werpers.com>
parents:
942
diff
changeset
|
111 function apply_transpose(c::TensorMappingComposition{T,R,K,D}, v::AbstractArray{<:Any,R}, I::Vararg{Any,D}) where {T,R,K,D} |
418
264af2bb646f
Switch to using * instead of calling the constructor
Jonatan Werpers <jonatan@werpers.com>
parents:
417
diff
changeset
|
112 apply_transpose(c.t2, c.t1'*v, I...) |
412
d94891b8dfca
Start implementing TensorComposition
Jonatan Werpers <jonatan@werpers.com>
parents:
402
diff
changeset
|
113 end |
190
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
114 |
417
4c6604b7d990
Add dimension checking in the constructor
Jonatan Werpers <jonatan@werpers.com>
parents:
415
diff
changeset
|
115 Base.@propagate_inbounds Base.:∘(s::TensorMapping, t::TensorMapping) = TensorMappingComposition(s,t) |
190
8964b3165097
Break LazyTensors.jl into several files
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
116 |
377
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
117 """ |
393
b14eacf823b6
Test applying LazyLinearMap to random vectors and matrices. Fix indentation
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
392
diff
changeset
|
118 LazyLinearMap{T,R,D,...}(A, range_indicies, domain_indicies) |
377
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
119 |
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
120 TensorMapping defined by the AbstractArray A. `range_indicies` and `domain_indicies` define which indicies of A should |
400
c640f37d1c74
Update documentation
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
399
diff
changeset
|
121 be considerd the range and domain of the TensorMapping. Each set of indices must be ordered in ascending order. |
394
7ad644d112de
Expand tests for LazyLinearMap and update its documentation
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
393
diff
changeset
|
122 |
400
c640f37d1c74
Update documentation
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
399
diff
changeset
|
123 For instance, if A is a m x n matrix, and range_size = (1,), domain_size = (2,), then the LazyLinearMap performs the |
c640f37d1c74
Update documentation
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
399
diff
changeset
|
124 standard matrix-vector product on vectors of size n. |
377
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
125 """ |
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
126 struct LazyLinearMap{T,R,D, RD, AA<:AbstractArray{T,RD}} <: TensorMapping{T,R,D} |
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
127 A::AA |
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
128 range_indicies::NTuple{R,Int} |
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
129 domain_indicies::NTuple{D,Int} |
399
3b4b1758a8ad
Add a check for permuted indecies.
Jonatan Werpers <jonatan@werpers.com>
parents:
394
diff
changeset
|
130 |
3b4b1758a8ad
Add a check for permuted indecies.
Jonatan Werpers <jonatan@werpers.com>
parents:
394
diff
changeset
|
131 function LazyLinearMap(A::AA, range_indicies::NTuple{R,Int}, domain_indicies::NTuple{D,Int}) where {T,R,D, RD, AA<:AbstractArray{T,RD}} |
3b4b1758a8ad
Add a check for permuted indecies.
Jonatan Werpers <jonatan@werpers.com>
parents:
394
diff
changeset
|
132 if !issorted(range_indicies) || !issorted(domain_indicies) |
3b4b1758a8ad
Add a check for permuted indecies.
Jonatan Werpers <jonatan@werpers.com>
parents:
394
diff
changeset
|
133 throw(DomainError("range_indicies and domain_indicies must be sorted in ascending order")) |
3b4b1758a8ad
Add a check for permuted indecies.
Jonatan Werpers <jonatan@werpers.com>
parents:
394
diff
changeset
|
134 end |
3b4b1758a8ad
Add a check for permuted indecies.
Jonatan Werpers <jonatan@werpers.com>
parents:
394
diff
changeset
|
135 |
3b4b1758a8ad
Add a check for permuted indecies.
Jonatan Werpers <jonatan@werpers.com>
parents:
394
diff
changeset
|
136 return new{T,R,D,RD,AA}(A,range_indicies,domain_indicies) |
3b4b1758a8ad
Add a check for permuted indecies.
Jonatan Werpers <jonatan@werpers.com>
parents:
394
diff
changeset
|
137 end |
377
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
138 end |
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
139 |
392
418cfd945715
Fix bug in range_size and domain_size for LazyLinearMap and expand the test
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
377
diff
changeset
|
140 range_size(llm::LazyLinearMap) = size(llm.A)[[llm.range_indicies...]] |
418cfd945715
Fix bug in range_size and domain_size for LazyLinearMap and expand the test
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
377
diff
changeset
|
141 domain_size(llm::LazyLinearMap) = size(llm.A)[[llm.domain_indicies...]] |
377
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
142 |
943
fb060e98ac0a
Remove more type assertions
Jonatan Werpers <jonatan@werpers.com>
parents:
942
diff
changeset
|
143 function apply(llm::LazyLinearMap{T,R,D}, v::AbstractArray{<:Any,D}, I::Vararg{Any,R}) where {T,R,D} |
377
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
144 view_index = ntuple(i->:,ndims(llm.A)) |
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
145 for i ∈ 1:R |
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
146 view_index = Base.setindex(view_index, Int(I[i]), llm.range_indicies[i]) |
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
147 end |
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
148 A_view = @view llm.A[view_index...] |
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
149 return sum(A_view.*v) |
8414c2334393
Start implementing LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
359
diff
changeset
|
150 end |
411
4aa59af074ef
Add implementation of apply_transpose for LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
402
diff
changeset
|
151 |
943
fb060e98ac0a
Remove more type assertions
Jonatan Werpers <jonatan@werpers.com>
parents:
942
diff
changeset
|
152 function apply_transpose(llm::LazyLinearMap{T,R,D}, v::AbstractArray{<:Any,R}, I::Vararg{Any,D}) where {T,R,D} |
411
4aa59af074ef
Add implementation of apply_transpose for LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
402
diff
changeset
|
153 apply(LazyLinearMap(llm.A, llm.domain_indicies, llm.range_indicies), v, I...) |
4aa59af074ef
Add implementation of apply_transpose for LazyLinearMap
Jonatan Werpers <jonatan@werpers.com>
parents:
402
diff
changeset
|
154 end |
429
46acb2560451
Start implementing LazyIdentity
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
155 |
46acb2560451
Start implementing LazyIdentity
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
156 |
46acb2560451
Start implementing LazyIdentity
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
157 """ |
434
648a36ebac99
Change name from LazyIdentity to IdentityMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
433
diff
changeset
|
158 IdentityMapping{T,D} <: TensorMapping{T,D,D} |
429
46acb2560451
Start implementing LazyIdentity
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
159 |
46acb2560451
Start implementing LazyIdentity
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
160 The lazy identity TensorMapping for a given size. Usefull for building up higher dimensional tensor mappings from lower |
46acb2560451
Start implementing LazyIdentity
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
161 dimensional ones through outer products. Also used in the Implementation for InflatedTensorMapping. |
46acb2560451
Start implementing LazyIdentity
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
162 """ |
434
648a36ebac99
Change name from LazyIdentity to IdentityMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
433
diff
changeset
|
163 struct IdentityMapping{T,D} <: TensorMapping{T,D,D} |
429
46acb2560451
Start implementing LazyIdentity
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
164 size::NTuple{D,Int} |
46acb2560451
Start implementing LazyIdentity
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
165 end |
46acb2560451
Start implementing LazyIdentity
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
166 |
434
648a36ebac99
Change name from LazyIdentity to IdentityMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
433
diff
changeset
|
167 IdentityMapping{T}(size::NTuple{D,Int}) where {T,D} = IdentityMapping{T,D}(size) |
441
552189707fbe
Add convenience constructor
Jonatan Werpers <jonatan@werpers.com>
parents:
439
diff
changeset
|
168 IdentityMapping{T}(size::Vararg{Int,D}) where {T,D} = IdentityMapping{T,D}(size) |
442
e70e47fbfa7c
Add another convenience constructor
Jonatan Werpers <jonatan@werpers.com>
parents:
441
diff
changeset
|
169 IdentityMapping(size::Vararg{Int,D}) where D = IdentityMapping{Float64,D}(size) |
429
46acb2560451
Start implementing LazyIdentity
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
170 |
434
648a36ebac99
Change name from LazyIdentity to IdentityMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
433
diff
changeset
|
171 range_size(tmi::IdentityMapping) = tmi.size |
648a36ebac99
Change name from LazyIdentity to IdentityMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
433
diff
changeset
|
172 domain_size(tmi::IdentityMapping) = tmi.size |
429
46acb2560451
Start implementing LazyIdentity
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
173 |
943
fb060e98ac0a
Remove more type assertions
Jonatan Werpers <jonatan@werpers.com>
parents:
942
diff
changeset
|
174 apply(tmi::IdentityMapping{T,D}, v::AbstractArray{<:Any,D}, I::Vararg{Any,D}) where {T,D} = v[I...] |
fb060e98ac0a
Remove more type assertions
Jonatan Werpers <jonatan@werpers.com>
parents:
942
diff
changeset
|
175 apply_transpose(tmi::IdentityMapping{T,D}, v::AbstractArray{<:Any,D}, I::Vararg{Any,D}) where {T,D} = v[I...] |
429
46acb2560451
Start implementing LazyIdentity
Jonatan Werpers <jonatan@werpers.com>
parents:
411
diff
changeset
|
176 |
479
95f3b9036801
Specialize composition operator for composing a tensormapping with an identitymapping.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
465
diff
changeset
|
177 """ |
838
76e5682d0e52
Fix a bunch of docstring mistakes
Jonatan Werpers <jonatan@werpers.com>
parents:
625
diff
changeset
|
178 Base.:∘(tm, tmi) |
76e5682d0e52
Fix a bunch of docstring mistakes
Jonatan Werpers <jonatan@werpers.com>
parents:
625
diff
changeset
|
179 Base.:∘(tmi, tm) |
479
95f3b9036801
Specialize composition operator for composing a tensormapping with an identitymapping.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
465
diff
changeset
|
180 |
480
c1a366331e75
Fix typo in docs
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
479
diff
changeset
|
181 Composes a `Tensormapping` `tm` with an `IdentityMapping` `tmi`, by returning `tm` |
479
95f3b9036801
Specialize composition operator for composing a tensormapping with an identitymapping.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
465
diff
changeset
|
182 """ |
95f3b9036801
Specialize composition operator for composing a tensormapping with an identitymapping.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
465
diff
changeset
|
183 @inline function Base.:∘(tm::TensorMapping{T,R,D}, tmi::IdentityMapping{T,D}) where {T,R,D} |
485
4b49f03bdb98
Switch from DimensionMismatch to SizeMismatch for boundschecks on compositions
Jonatan Werpers <jonatan@werpers.com>
parents:
484
diff
changeset
|
184 @boundscheck check_domain_size(tm, range_size(tmi)) |
479
95f3b9036801
Specialize composition operator for composing a tensormapping with an identitymapping.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
465
diff
changeset
|
185 return tm |
95f3b9036801
Specialize composition operator for composing a tensormapping with an identitymapping.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
465
diff
changeset
|
186 end |
95f3b9036801
Specialize composition operator for composing a tensormapping with an identitymapping.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
465
diff
changeset
|
187 |
95f3b9036801
Specialize composition operator for composing a tensormapping with an identitymapping.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
465
diff
changeset
|
188 @inline function Base.:∘(tmi::IdentityMapping{T,R}, tm::TensorMapping{T,R,D}) where {T,R,D} |
485
4b49f03bdb98
Switch from DimensionMismatch to SizeMismatch for boundschecks on compositions
Jonatan Werpers <jonatan@werpers.com>
parents:
484
diff
changeset
|
189 @boundscheck check_domain_size(tmi, range_size(tm)) |
479
95f3b9036801
Specialize composition operator for composing a tensormapping with an identitymapping.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
465
diff
changeset
|
190 return tm |
95f3b9036801
Specialize composition operator for composing a tensormapping with an identitymapping.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
465
diff
changeset
|
191 end |
95f3b9036801
Specialize composition operator for composing a tensormapping with an identitymapping.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
465
diff
changeset
|
192 # Specialization for the case where tm is an IdentityMapping. Required to resolve ambiguity. |
95f3b9036801
Specialize composition operator for composing a tensormapping with an identitymapping.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
465
diff
changeset
|
193 @inline function Base.:∘(tm::IdentityMapping{T,D}, tmi::IdentityMapping{T,D}) where {T,D} |
485
4b49f03bdb98
Switch from DimensionMismatch to SizeMismatch for boundschecks on compositions
Jonatan Werpers <jonatan@werpers.com>
parents:
484
diff
changeset
|
194 @boundscheck check_domain_size(tm, range_size(tmi)) |
479
95f3b9036801
Specialize composition operator for composing a tensormapping with an identitymapping.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
465
diff
changeset
|
195 return tmi |
95f3b9036801
Specialize composition operator for composing a tensormapping with an identitymapping.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
465
diff
changeset
|
196 end |
95f3b9036801
Specialize composition operator for composing a tensormapping with an identitymapping.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
465
diff
changeset
|
197 |
460
acffa3a1395d
Move part of the documentation to the constructor
Jonatan Werpers <jonatan@werpers.com>
parents:
459
diff
changeset
|
198 |
459
11e58c49fb46
Add some documentation
Jonatan Werpers <jonatan@werpers.com>
parents:
458
diff
changeset
|
199 """ |
11e58c49fb46
Add some documentation
Jonatan Werpers <jonatan@werpers.com>
parents:
458
diff
changeset
|
200 InflatedTensorMapping{T,R,D} <: TensorMapping{T,R,D} |
11e58c49fb46
Add some documentation
Jonatan Werpers <jonatan@werpers.com>
parents:
458
diff
changeset
|
201 |
11e58c49fb46
Add some documentation
Jonatan Werpers <jonatan@werpers.com>
parents:
458
diff
changeset
|
202 An inflated `TensorMapping` with dimensions added before and afer its actual dimensions. |
11e58c49fb46
Add some documentation
Jonatan Werpers <jonatan@werpers.com>
parents:
458
diff
changeset
|
203 """ |
449
14d60de71b72
Change to concrete fields in the type
Jonatan Werpers <jonatan@werpers.com>
parents:
448
diff
changeset
|
204 struct InflatedTensorMapping{T,R,D,D_before,R_middle,D_middle,D_after, TM<:TensorMapping{T,R_middle,D_middle}} <: TensorMapping{T,R,D} |
448
912ae510dec9
Use new name of IdentityMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
447
diff
changeset
|
205 before::IdentityMapping{T,D_before} |
449
14d60de71b72
Change to concrete fields in the type
Jonatan Werpers <jonatan@werpers.com>
parents:
448
diff
changeset
|
206 tm::TM |
448
912ae510dec9
Use new name of IdentityMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
447
diff
changeset
|
207 after::IdentityMapping{T,D_after} |
446
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
208 |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
209 function InflatedTensorMapping(before, tm::TensorMapping{T}, after) where T |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
210 R_before = range_dim(before) |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
211 R_middle = range_dim(tm) |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
212 R_after = range_dim(after) |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
213 R = R_before+R_middle+R_after |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
214 |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
215 D_before = domain_dim(before) |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
216 D_middle = domain_dim(tm) |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
217 D_after = domain_dim(after) |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
218 D = D_before+D_middle+D_after |
449
14d60de71b72
Change to concrete fields in the type
Jonatan Werpers <jonatan@werpers.com>
parents:
448
diff
changeset
|
219 return new{T,R,D,D_before,R_middle,D_middle,D_after, typeof(tm)}(before, tm, after) |
448
912ae510dec9
Use new name of IdentityMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
447
diff
changeset
|
220 end |
446
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
221 end |
461 | 222 """ |
464
73882867c121
Align documentation
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
463
diff
changeset
|
223 InflatedTensorMapping(before, tm, after) |
465
f270d82fc9ad
Change documention in an attempt to follow the guidelines
Jonatan Werpers <jonatan@werpers.com>
parents:
464
diff
changeset
|
224 InflatedTensorMapping(before,tm) |
f270d82fc9ad
Change documention in an attempt to follow the guidelines
Jonatan Werpers <jonatan@werpers.com>
parents:
464
diff
changeset
|
225 InflatedTensorMapping(tm,after) |
461 | 226 |
227 The outer product of `before`, `tm` and `after`, where `before` and `after` are `IdentityMapping`s. | |
465
f270d82fc9ad
Change documention in an attempt to follow the guidelines
Jonatan Werpers <jonatan@werpers.com>
parents:
464
diff
changeset
|
228 |
f270d82fc9ad
Change documention in an attempt to follow the guidelines
Jonatan Werpers <jonatan@werpers.com>
parents:
464
diff
changeset
|
229 If one of `before` or `after` is left out, a 0-dimensional `IdentityMapping` is used as the default value. |
493
df566372bb4f
Implement constructors to avoid creating nested InflatedTensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
487
diff
changeset
|
230 |
df566372bb4f
Implement constructors to avoid creating nested InflatedTensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
487
diff
changeset
|
231 If `tm` already is an `InflatedTensorMapping`, `before` and `after` will be extended instead of |
df566372bb4f
Implement constructors to avoid creating nested InflatedTensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
487
diff
changeset
|
232 creating a nested `InflatedTensorMapping`. |
461 | 233 """ |
464
73882867c121
Align documentation
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
463
diff
changeset
|
234 InflatedTensorMapping(::IdentityMapping, ::TensorMapping, ::IdentityMapping) |
493
df566372bb4f
Implement constructors to avoid creating nested InflatedTensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
487
diff
changeset
|
235 |
df566372bb4f
Implement constructors to avoid creating nested InflatedTensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
487
diff
changeset
|
236 function InflatedTensorMapping(before, itm::InflatedTensorMapping, after) |
df566372bb4f
Implement constructors to avoid creating nested InflatedTensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
487
diff
changeset
|
237 return InflatedTensorMapping( |
df566372bb4f
Implement constructors to avoid creating nested InflatedTensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
487
diff
changeset
|
238 IdentityMapping(before.size..., itm.before.size...), |
df566372bb4f
Implement constructors to avoid creating nested InflatedTensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
487
diff
changeset
|
239 itm.tm, |
df566372bb4f
Implement constructors to avoid creating nested InflatedTensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
487
diff
changeset
|
240 IdentityMapping(itm.after.size..., after.size...), |
df566372bb4f
Implement constructors to avoid creating nested InflatedTensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
487
diff
changeset
|
241 ) |
df566372bb4f
Implement constructors to avoid creating nested InflatedTensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
487
diff
changeset
|
242 end |
df566372bb4f
Implement constructors to avoid creating nested InflatedTensorMappings
Jonatan Werpers <jonatan@werpers.com>
parents:
487
diff
changeset
|
243 |
462
c364e2908c6e
Implement InflatedTensorMapping where one of before and after are missing.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
458
diff
changeset
|
244 InflatedTensorMapping(before::IdentityMapping, tm::TensorMapping{T}) where T = InflatedTensorMapping(before,tm,IdentityMapping{T}()) |
c364e2908c6e
Implement InflatedTensorMapping where one of before and after are missing.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
458
diff
changeset
|
245 InflatedTensorMapping(tm::TensorMapping{T}, after::IdentityMapping) where T = InflatedTensorMapping(IdentityMapping{T}(),tm,after) |
465
f270d82fc9ad
Change documention in an attempt to follow the guidelines
Jonatan Werpers <jonatan@werpers.com>
parents:
464
diff
changeset
|
246 # Resolve ambiguity between the two previous methods |
462
c364e2908c6e
Implement InflatedTensorMapping where one of before and after are missing.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
458
diff
changeset
|
247 InflatedTensorMapping(I1::IdentityMapping{T}, I2::IdentityMapping{T}) where T = InflatedTensorMapping(I1,I2,IdentityMapping{T}()) |
446
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
248 |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
249 # TODO: Implement some pretty printing in terms of ⊗. E.g InflatedTensorMapping(I(3),B,I(2)) -> I(3)⊗B⊗I(2) |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
250 |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
251 function range_size(itm::InflatedTensorMapping) |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
252 return flatten_tuple( |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
253 range_size(itm.before), |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
254 range_size(itm.tm), |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
255 range_size(itm.after), |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
256 ) |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
257 end |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
258 |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
259 function domain_size(itm::InflatedTensorMapping) |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
260 return flatten_tuple( |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
261 domain_size(itm.before), |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
262 domain_size(itm.tm), |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
263 domain_size(itm.after), |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
264 ) |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
265 end |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
266 |
943
fb060e98ac0a
Remove more type assertions
Jonatan Werpers <jonatan@werpers.com>
parents:
942
diff
changeset
|
267 function apply(itm::InflatedTensorMapping{T,R,D}, v::AbstractArray{<:Any,D}, I::Vararg{Any,R}) where {T,R,D} |
538
848dec405332
Change variable names in apply and apply_transpose
Jonatan Werpers <jonatan@werpers.com>
parents:
537
diff
changeset
|
268 dim_before = range_dim(itm.before) |
848dec405332
Change variable names in apply and apply_transpose
Jonatan Werpers <jonatan@werpers.com>
parents:
537
diff
changeset
|
269 dim_domain = domain_dim(itm.tm) |
848dec405332
Change variable names in apply and apply_transpose
Jonatan Werpers <jonatan@werpers.com>
parents:
537
diff
changeset
|
270 dim_range = range_dim(itm.tm) |
848dec405332
Change variable names in apply and apply_transpose
Jonatan Werpers <jonatan@werpers.com>
parents:
537
diff
changeset
|
271 dim_after = range_dim(itm.after) |
520
fe86ac896377
Start refactoring split index and apply to accomodate future addition of apply_transpose
Jonatan Werpers <jonatan@werpers.com>
parents:
501
diff
changeset
|
272 |
538
848dec405332
Change variable names in apply and apply_transpose
Jonatan Werpers <jonatan@werpers.com>
parents:
537
diff
changeset
|
273 view_index, inner_index = split_index(Val(dim_before), Val(dim_domain), Val(dim_range), Val(dim_after), I...) |
446
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
274 |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
275 v_inner = view(v, view_index...) |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
276 return apply(itm.tm, v_inner, inner_index...) |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
277 end |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
278 |
943
fb060e98ac0a
Remove more type assertions
Jonatan Werpers <jonatan@werpers.com>
parents:
942
diff
changeset
|
279 function apply_transpose(itm::InflatedTensorMapping{T,R,D}, v::AbstractArray{<:Any,R}, I::Vararg{Any,D}) where {T,R,D} |
538
848dec405332
Change variable names in apply and apply_transpose
Jonatan Werpers <jonatan@werpers.com>
parents:
537
diff
changeset
|
280 dim_before = range_dim(itm.before) |
848dec405332
Change variable names in apply and apply_transpose
Jonatan Werpers <jonatan@werpers.com>
parents:
537
diff
changeset
|
281 dim_domain = domain_dim(itm.tm) |
848dec405332
Change variable names in apply and apply_transpose
Jonatan Werpers <jonatan@werpers.com>
parents:
537
diff
changeset
|
282 dim_range = range_dim(itm.tm) |
848dec405332
Change variable names in apply and apply_transpose
Jonatan Werpers <jonatan@werpers.com>
parents:
537
diff
changeset
|
283 dim_after = range_dim(itm.after) |
526
be152486d136
Implement apply_transpose with tests
Jonatan Werpers <jonatan@werpers.com>
parents:
525
diff
changeset
|
284 |
538
848dec405332
Change variable names in apply and apply_transpose
Jonatan Werpers <jonatan@werpers.com>
parents:
537
diff
changeset
|
285 view_index, inner_index = split_index(Val(dim_before), Val(dim_range), Val(dim_domain), Val(dim_after), I...) |
526
be152486d136
Implement apply_transpose with tests
Jonatan Werpers <jonatan@werpers.com>
parents:
525
diff
changeset
|
286 |
be152486d136
Implement apply_transpose with tests
Jonatan Werpers <jonatan@werpers.com>
parents:
525
diff
changeset
|
287 v_inner = view(v, view_index...) |
be152486d136
Implement apply_transpose with tests
Jonatan Werpers <jonatan@werpers.com>
parents:
525
diff
changeset
|
288 return apply_transpose(itm.tm, v_inner, inner_index...) |
be152486d136
Implement apply_transpose with tests
Jonatan Werpers <jonatan@werpers.com>
parents:
525
diff
changeset
|
289 end |
be152486d136
Implement apply_transpose with tests
Jonatan Werpers <jonatan@werpers.com>
parents:
525
diff
changeset
|
290 |
446
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
291 |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
292 """ |
533
aac7cc1fa79a
Try to improve the naming in split_index()
Jonatan Werpers <jonatan@werpers.com>
parents:
532
diff
changeset
|
293 split_index(::Val{dim_before}, ::Val{dim_view}, ::Val{dim_index}, ::Val{dim_after}, I...) |
446
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
294 |
533
aac7cc1fa79a
Try to improve the naming in split_index()
Jonatan Werpers <jonatan@werpers.com>
parents:
532
diff
changeset
|
295 Splits the multi-index `I` into two parts. One part which is expected to be |
aac7cc1fa79a
Try to improve the naming in split_index()
Jonatan Werpers <jonatan@werpers.com>
parents:
532
diff
changeset
|
296 used as a view, and one which is expected to be used as an index. |
446
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
297 Eg. |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
298 ``` |
537 | 299 split_index(Val(1),Val(3),Val(2),Val(1),(1,2,3,4)) -> (1,:,:,:,4), (2,3) |
446
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
300 ``` |
520
fe86ac896377
Start refactoring split index and apply to accomodate future addition of apply_transpose
Jonatan Werpers <jonatan@werpers.com>
parents:
501
diff
changeset
|
301 |
533
aac7cc1fa79a
Try to improve the naming in split_index()
Jonatan Werpers <jonatan@werpers.com>
parents:
532
diff
changeset
|
302 `dim_view` controls how many colons are in the view, and `dim_index` controls |
aac7cc1fa79a
Try to improve the naming in split_index()
Jonatan Werpers <jonatan@werpers.com>
parents:
532
diff
changeset
|
303 how many elements are extracted from the middle. |
aac7cc1fa79a
Try to improve the naming in split_index()
Jonatan Werpers <jonatan@werpers.com>
parents:
532
diff
changeset
|
304 `dim_before` and `dim_after` decides the length of the index parts before and after the colons in the view index. |
531
36dfc57e8e0b
Write out some more documentation for split_index
Jonatan Werpers <jonatan@werpers.com>
parents:
530
diff
changeset
|
305 |
533
aac7cc1fa79a
Try to improve the naming in split_index()
Jonatan Werpers <jonatan@werpers.com>
parents:
532
diff
changeset
|
306 Arguments should satisfy `length(I) == dim_before+B_domain+dim_after`. |
520
fe86ac896377
Start refactoring split index and apply to accomodate future addition of apply_transpose
Jonatan Werpers <jonatan@werpers.com>
parents:
501
diff
changeset
|
307 |
531
36dfc57e8e0b
Write out some more documentation for split_index
Jonatan Werpers <jonatan@werpers.com>
parents:
530
diff
changeset
|
308 The returned values satisfy |
533
aac7cc1fa79a
Try to improve the naming in split_index()
Jonatan Werpers <jonatan@werpers.com>
parents:
532
diff
changeset
|
309 * `length(view_index) == dim_before + dim_view + dim_after` |
aac7cc1fa79a
Try to improve the naming in split_index()
Jonatan Werpers <jonatan@werpers.com>
parents:
532
diff
changeset
|
310 * `length(I_middle) == dim_index` |
446
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
311 """ |
533
aac7cc1fa79a
Try to improve the naming in split_index()
Jonatan Werpers <jonatan@werpers.com>
parents:
532
diff
changeset
|
312 function split_index(::Val{dim_before}, ::Val{dim_view}, ::Val{dim_index}, ::Val{dim_after}, I...) where {dim_before,dim_view, dim_index,dim_after} |
aac7cc1fa79a
Try to improve the naming in split_index()
Jonatan Werpers <jonatan@werpers.com>
parents:
532
diff
changeset
|
313 I_before, I_middle, I_after = split_tuple(I, Val(dim_before), Val(dim_index)) |
446
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
314 |
533
aac7cc1fa79a
Try to improve the naming in split_index()
Jonatan Werpers <jonatan@werpers.com>
parents:
532
diff
changeset
|
315 view_index = (I_before..., ntuple((i)->:, dim_view)..., I_after...) |
446
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
316 |
520
fe86ac896377
Start refactoring split index and apply to accomodate future addition of apply_transpose
Jonatan Werpers <jonatan@werpers.com>
parents:
501
diff
changeset
|
317 return view_index, I_middle |
446
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
318 end |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
319 |
456
8f4c31e06689
Add docs and tests for slice_tuple
Jonatan Werpers <jonatan@werpers.com>
parents:
455
diff
changeset
|
320 # TODO: Can this be replaced by something more elegant while still being type stable? 2020-10-21 |
8f4c31e06689
Add docs and tests for slice_tuple
Jonatan Werpers <jonatan@werpers.com>
parents:
455
diff
changeset
|
321 # See: |
8f4c31e06689
Add docs and tests for slice_tuple
Jonatan Werpers <jonatan@werpers.com>
parents:
455
diff
changeset
|
322 # https://github.com/JuliaLang/julia/issues/34884 |
8f4c31e06689
Add docs and tests for slice_tuple
Jonatan Werpers <jonatan@werpers.com>
parents:
455
diff
changeset
|
323 # https://github.com/JuliaLang/julia/issues/30386 |
8f4c31e06689
Add docs and tests for slice_tuple
Jonatan Werpers <jonatan@werpers.com>
parents:
455
diff
changeset
|
324 """ |
8f4c31e06689
Add docs and tests for slice_tuple
Jonatan Werpers <jonatan@werpers.com>
parents:
455
diff
changeset
|
325 slice_tuple(t, Val(l), Val(u)) |
8f4c31e06689
Add docs and tests for slice_tuple
Jonatan Werpers <jonatan@werpers.com>
parents:
455
diff
changeset
|
326 |
8f4c31e06689
Add docs and tests for slice_tuple
Jonatan Werpers <jonatan@werpers.com>
parents:
455
diff
changeset
|
327 Get a slice of a tuple in a type stable way. |
838
76e5682d0e52
Fix a bunch of docstring mistakes
Jonatan Werpers <jonatan@werpers.com>
parents:
625
diff
changeset
|
328 Equivalent to `t[l:u]` but type stable. |
456
8f4c31e06689
Add docs and tests for slice_tuple
Jonatan Werpers <jonatan@werpers.com>
parents:
455
diff
changeset
|
329 """ |
455
b86312d14873
Make split_index type stable
Jonatan Werpers <jonatan@werpers.com>
parents:
452
diff
changeset
|
330 function slice_tuple(t,::Val{L},::Val{U}) where {L,U} |
b86312d14873
Make split_index type stable
Jonatan Werpers <jonatan@werpers.com>
parents:
452
diff
changeset
|
331 return ntuple(i->t[i+L-1], U-L+1) |
b86312d14873
Make split_index type stable
Jonatan Werpers <jonatan@werpers.com>
parents:
452
diff
changeset
|
332 end |
b86312d14873
Make split_index type stable
Jonatan Werpers <jonatan@werpers.com>
parents:
452
diff
changeset
|
333 |
457
8fb6a5611c7a
Add tests and docs for flatten_tuple
Jonatan Werpers <jonatan@werpers.com>
parents:
456
diff
changeset
|
334 """ |
532
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
335 split_tuple(t::Tuple{...}, ::Val{M}) where {N,M} |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
336 |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
337 Split the tuple `t` into two parts. the first part is `M` long. |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
338 E.g |
838
76e5682d0e52
Fix a bunch of docstring mistakes
Jonatan Werpers <jonatan@werpers.com>
parents:
625
diff
changeset
|
339 ```julia |
532
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
340 split_tuple((1,2,3,4),Val(3)) -> (1,2,3), (4,) |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
341 ``` |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
342 """ |
625
1c512e796c6d
Allow split_tuple to split tuples containing different types.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
562
diff
changeset
|
343 function split_tuple(t::NTuple{N,Any},::Val{M}) where {N,M} |
532
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
344 return slice_tuple(t,Val(1), Val(M)), slice_tuple(t,Val(M+1), Val(N)) |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
345 end |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
346 |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
347 """ |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
348 split_tuple(t::Tuple{...},::Val{M},::Val{K}) where {N,M,K} |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
349 |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
350 Same as `split_tuple(t::NTuple{N},::Val{M})` but splits the tuple in three parts. With the first |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
351 two parts having lenght `M` and `K`. |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
352 """ |
625
1c512e796c6d
Allow split_tuple to split tuples containing different types.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
562
diff
changeset
|
353 function split_tuple(t::NTuple{N,Any},::Val{M},::Val{K}) where {N,M,K} |
532
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
354 p1, tail = split_tuple(t, Val(M)) |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
355 p2, p3 = split_tuple(tail, Val(K)) |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
356 return p1,p2,p3 |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
357 end |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
358 |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
359 |
588a843907de
Add a split_tuple function to make split_index more readable
Jonatan Werpers <jonatan@werpers.com>
parents:
531
diff
changeset
|
360 """ |
457
8fb6a5611c7a
Add tests and docs for flatten_tuple
Jonatan Werpers <jonatan@werpers.com>
parents:
456
diff
changeset
|
361 flatten_tuple(t) |
8fb6a5611c7a
Add tests and docs for flatten_tuple
Jonatan Werpers <jonatan@werpers.com>
parents:
456
diff
changeset
|
362 |
8fb6a5611c7a
Add tests and docs for flatten_tuple
Jonatan Werpers <jonatan@werpers.com>
parents:
456
diff
changeset
|
363 Takes a nested tuple and flattens the whole structure |
8fb6a5611c7a
Add tests and docs for flatten_tuple
Jonatan Werpers <jonatan@werpers.com>
parents:
456
diff
changeset
|
364 """ |
446
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
365 flatten_tuple(t::NTuple{N, Number} where N) = t |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
366 flatten_tuple(t::Tuple) = ((flatten_tuple.(t)...)...,) # simplify? |
904aae1899df
Start implementing InflatedTensorMapping
Jonatan Werpers <jonatan@werpers.com>
parents:
429
diff
changeset
|
367 flatten_tuple(ts::Vararg) = flatten_tuple(ts) |
487
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
368 |
838
76e5682d0e52
Fix a bunch of docstring mistakes
Jonatan Werpers <jonatan@werpers.com>
parents:
625
diff
changeset
|
369 @doc raw""" |
76e5682d0e52
Fix a bunch of docstring mistakes
Jonatan Werpers <jonatan@werpers.com>
parents:
625
diff
changeset
|
370 LazyOuterProduct(tms...) |
468
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
371 |
501
4b9d124fe984
Fix typo in documentation
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
499
diff
changeset
|
372 Creates a `TensorMappingComposition` for the outerproduct of `tms...`. |
468
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
373 This is done by separating the outer product into regular products of outer products involving only identity mappings and one non-identity mapping. |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
374 |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
375 First let |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
376 ```math |
838
76e5682d0e52
Fix a bunch of docstring mistakes
Jonatan Werpers <jonatan@werpers.com>
parents:
625
diff
changeset
|
377 \begin{aligned} |
76e5682d0e52
Fix a bunch of docstring mistakes
Jonatan Werpers <jonatan@werpers.com>
parents:
625
diff
changeset
|
378 A &= A_{I,J} \\ |
76e5682d0e52
Fix a bunch of docstring mistakes
Jonatan Werpers <jonatan@werpers.com>
parents:
625
diff
changeset
|
379 B &= B_{M,N} \\ |
76e5682d0e52
Fix a bunch of docstring mistakes
Jonatan Werpers <jonatan@werpers.com>
parents:
625
diff
changeset
|
380 C &= C_{P,Q} \\ |
76e5682d0e52
Fix a bunch of docstring mistakes
Jonatan Werpers <jonatan@werpers.com>
parents:
625
diff
changeset
|
381 \end{aligned} |
468
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
382 ``` |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
383 |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
384 where ``I``, ``M``, ``P`` are multi-indexes for the ranges of ``A``, ``B``, ``C``, and ``J``, ``N``, ``Q`` are multi-indexes of the domains. |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
385 |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
386 We use ``⊗`` to denote the outer product |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
387 ```math |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
388 (A⊗B)_{IM,JN} = A_{I,J}B_{M,N} |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
389 ``` |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
390 |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
391 We note that |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
392 ```math |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
393 A⊗B⊗C = (A⊗B⊗C)_{IMP,JNQ} = A_{I,J}B_{M,N}C_{P,Q} |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
394 ``` |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
395 And that |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
396 ```math |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
397 A⊗B⊗C = (A⊗I_{|M|}⊗I_{|P|})(I_{|J|}⊗B⊗I_{|P|})(I_{|J|}⊗I_{|N|}⊗C) |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
398 ``` |
838
76e5682d0e52
Fix a bunch of docstring mistakes
Jonatan Werpers <jonatan@werpers.com>
parents:
625
diff
changeset
|
399 where ``|⋅|`` of a multi-index is a vector of sizes for each dimension. ``I_v`` denotes the identity tensor of size ``v[i]`` in each direction |
468
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
400 To apply ``A⊗B⊗C`` we evaluate |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
401 |
838
76e5682d0e52
Fix a bunch of docstring mistakes
Jonatan Werpers <jonatan@werpers.com>
parents:
625
diff
changeset
|
402 ```math |
468
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
403 (A⊗B⊗C)v = [(A⊗I_{|M|}⊗I_{|P|}) [(I_{|J|}⊗B⊗I_{|P|}) [(I_{|J|}⊗I_{|N|}⊗C)v]]] |
838
76e5682d0e52
Fix a bunch of docstring mistakes
Jonatan Werpers <jonatan@werpers.com>
parents:
625
diff
changeset
|
404 ``` |
468
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
405 """ |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
406 function LazyOuterProduct end |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
407 |
470
0c3decc04649
Add some tests and fix some bugs
Jonatan Werpers <jonatan@werpers.com>
parents:
469
diff
changeset
|
408 function LazyOuterProduct(tm1::TensorMapping{T}, tm2::TensorMapping{T}) where T |
0c3decc04649
Add some tests and fix some bugs
Jonatan Werpers <jonatan@werpers.com>
parents:
469
diff
changeset
|
409 itm1 = InflatedTensorMapping(tm1, IdentityMapping{T}(range_size(tm2))) |
0c3decc04649
Add some tests and fix some bugs
Jonatan Werpers <jonatan@werpers.com>
parents:
469
diff
changeset
|
410 itm2 = InflatedTensorMapping(IdentityMapping{T}(domain_size(tm1)),tm2) |
468
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
411 |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
412 return itm1∘itm2 |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
413 end |
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
414 |
491
2dc2eac27f75
Add special methods for Identity mappings
Jonatan Werpers <jonatan@werpers.com>
parents:
475
diff
changeset
|
415 LazyOuterProduct(t1::IdentityMapping{T}, t2::IdentityMapping{T}) where T = IdentityMapping{T}(t1.size...,t2.size...) |
2dc2eac27f75
Add special methods for Identity mappings
Jonatan Werpers <jonatan@werpers.com>
parents:
475
diff
changeset
|
416 LazyOuterProduct(t1::TensorMapping, t2::IdentityMapping) = InflatedTensorMapping(t1, t2) |
2dc2eac27f75
Add special methods for Identity mappings
Jonatan Werpers <jonatan@werpers.com>
parents:
475
diff
changeset
|
417 LazyOuterProduct(t1::IdentityMapping, t2::TensorMapping) = InflatedTensorMapping(t1, t2) |
2dc2eac27f75
Add special methods for Identity mappings
Jonatan Werpers <jonatan@werpers.com>
parents:
475
diff
changeset
|
418 |
470
0c3decc04649
Add some tests and fix some bugs
Jonatan Werpers <jonatan@werpers.com>
parents:
469
diff
changeset
|
419 LazyOuterProduct(tms::Vararg{TensorMapping}) = foldl(LazyOuterProduct, tms) |
468
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
420 |
474
3ad327378b2d
Simplify implementation of \otimes
Jonatan Werpers <jonatan@werpers.com>
parents:
470
diff
changeset
|
421 ⊗(a::TensorMapping, b::TensorMapping) = LazyOuterProduct(a,b) |
468
a52f38e72258
Start implementing function for outer products
Jonatan Werpers <jonatan@werpers.com>
parents:
461
diff
changeset
|
422 |
498 | 423 |
487
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
424 function check_domain_size(tm::TensorMapping, sz) |
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
425 if domain_size(tm) != sz |
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
426 throw(SizeMismatch(tm,sz)) |
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
427 end |
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
428 end |
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
429 |
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
430 struct SizeMismatch <: Exception |
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
431 tm::TensorMapping |
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
432 sz |
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
433 end |
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
434 |
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
435 function Base.showerror(io::IO, err::SizeMismatch) |
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
436 print(io, "SizeMismatch: ") |
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
437 print(io, "domain size $(domain_size(err.tm)) of TensorMapping not matching size $(err.sz)") |
6a6b7eaf9edf
Move exception handling to end of file and update error message.
Vidar Stiernström <vidar.stiernstrom@it.uu.se>
parents:
485
diff
changeset
|
438 end |