Incremental formulation works now, also finite sliding without proper linearization (very slow convergence)

This commit is contained in:
Jukka Aho
2016-02-16 17:40:11 +02:00
parent c7cca58590
commit 0d0d200bfc
6 changed files with 256 additions and 34 deletions
+3 -3
View File
@@ -268,7 +268,7 @@ function get_nodes(elements::Vector)
return nodes
end
""" Calculate normal-tangential coordinates for a set of elements.
""" Calculate normal-tangential coordinates for a set of elements.
Notes
-----
@@ -314,7 +314,7 @@ function calculate_normal_tangential_coordinates!(elements::Vector, time::Real,
node_ids = get_connectivity(element)
Q = Matrix{Float64}[ [n[:,i] t[:,i]] for i in node_ids]
element["normal-tangential coordinates"] = (time => Q)
element["normals"] = Vector{Float64}[n[:,i] for i in node_ids]
element["normals"] = (time => Vector{Float64}[n[:,i] for i in node_ids])
end
end
@@ -350,7 +350,7 @@ function calculate_normal_tangential_coordinates!(elements::Vector, time::Real,
node_ids = get_connectivity(element)
Q = Matrix{Float64}[ [n[:,i] t1[:,i] t2[:,i]] for i in node_ids]
element["normal-tangential coordinates"] = (time => Q)
element["normals"] = Vector{Float64}[n[:,i] for i in node_ids]
element["normals"] = (time => Vector{Float64}[n[:,i] for i in node_ids])
end
end