use FEMBasis / BasisInfo structure

Calculate basic element info using BasisInfo
This commit is contained in:
Jukka Aho
2017-08-14 20:50:21 +03:00
parent 08055ecd21
commit 1505205dcd
+6 -3
View File
@@ -140,12 +140,15 @@ function assemble!{El<:Elasticity3DVolumeElements}(assembly::Assembly,
Km = zeros(ndofs, ndofs)
Kg = zeros(ndofs, ndofs)
f = zeros(ndofs)
bi = BasisInfo(El)
for ip in get_integration_points(element)
detJ = element(ip, time, Val{:detJ})
X = element("geometry", time)
eval_basis!(bi, X, ip)
detJ = bi.detJ
N = bi.N
dN = bi.grad
w = ip.weight*detJ
N = element(ip, time)
dN = element(ip, time, Val{:Grad})
# kinematics; calculate deformation gradient and strain