414414function get_full_tensor (state:: GeneralStressState{Nσ} , :: TT , v:: SVector{Nσ,T} ) where {Nσ,T,TT}
415415 TB = Tensors. get_base (TT)
416416 shear_factor = if TB == SymmetricTensor{2 ,3 }
417- T ( 1 /√ 2 )
417+ 1 / sqrt ( 2 * one (T) )
418418 elseif TB == Tensor{2 ,3 }
419419 one (T)
420420 else
@@ -426,14 +426,14 @@ function get_full_tensor(state::GeneralStressState{Nσ}, ::TT, v::SVector{Nσ,T}
426426end
427427
428428function get_unknowns (state:: GeneralStressState{Nσ} , a:: AbstractTensor{2,3,T} ) where {Nσ, T}
429- shear_factor = a isa SymmetricTensor ? T ( √ 2 ) : one (T)
429+ shear_factor = a isa SymmetricTensor ? sqrt ( 2 * one (T) ) : one (T)
430430 s (i,j) = i== j ? one (T) : shear_factor
431431 f (c) = ((i,j) = c; s (i,j)* (a[i,j]- state. σ[i,j]))
432432 return SVector {Nσ,T} ((f (c) for c in state. σm_inds))
433433end
434434
435435function get_unknowns (state:: GeneralStressState{Nσ} , a:: AbstractTensor{4,3,T} ) where {Nσ,T}
436- shear_factor = a isa SymmetricTensor ? T ( √ 2 ) : one (T)
436+ shear_factor = a isa SymmetricTensor ? sqrt ( 2 * one (T) ) : one (T)
437437 s (i,j) = i== j ? one (T) : shear_factor
438438 f (c1,c2) = ((i,j) = c1; (k,l) = c2; a[i,j,k,l]* s (i,j)* s (k,l))
439439 return SMatrix {Nσ,Nσ,T} ((f (c1,c2) for c1 in state. σm_inds, c2 in state. σm_inds))
0 commit comments