42 @inline function setvoigt!(V, J, ::CeedDim{1})  argument
43     @inbounds V[1] = J[1]
46 @inline function setvoigt!(V, J, ::CeedDim{2})  argument
48         V[1] = J[1]
49         V[2] = J[4]
50         V[3] = J[2]
54 @inline function setvoigt!(V, J, ::CeedDim{3})  argument
56         V[1] = J[1]
57         V[2] = J[5]
58         V[3] = J[9]
59         V[4] = J[6]
60         V[5] = J[3]
61         V[6] = J[2]
66     getvoigt(V, ::CeedDim{dim})
68 Given a vector `V` that encodes a symmetric matrix using the [Voigt
72 @inline getvoigt(V, ::CeedDim{1}) = @inbounds @SMatrix [V[1]]  argument
73 @inline getvoigt(V, ::CeedDim{2}) = @inbounds @SMatrix [V[1] V[3]; V[3] V[2]]  argument
74 @inline getvoigt(V, ::CeedDim{3}) = @inbounds @SMatrix [  argument
75     V[1] V[6] V[5]
76     V[6] V[2] V[4]
77     V[5] V[4] V[3]
79 @inline getvoigt(V::StaticArray{Tuple{1}}) = getvoigt(V, CeedDim(1))
80 @inline getvoigt(V::StaticArray{Tuple{3}}) = getvoigt(V, CeedDim(2))
81 @inline getvoigt(V::StaticArray{Tuple{6}}) = getvoigt(V, CeedDim(3))
83 @inline function getvoigt!(J, V, ::CeedDim{1})  argument
84     @inbounds J[1, 1] = V[1]
87 @inline function getvoigt!(J, V, ::CeedDim{2})  argument
90         J[1,1] = V[1] ; J[1,2] = V[3]
91         J[2,1] = V[3] ; J[2,2] = V[2]
96 @inline function getvoigt!(J, V, ::CeedDim{3})  argument
99         J[1,1] = V[1] ; J[1,2] = V[6] ; J[1,3] = V[5]
100         J[2,1] = V[6] ; J[2,2] = V[2] ; J[2,3] = V[4]
101         J[3,1] = V[5] ; J[3,2] = V[4] ; J[3,3] = V[3]