3d finite sliding contact

This commit is contained in:
Jukka Aho
2016-10-03 23:12:00 +03:00
parent c79b4d5514
commit 64becfb29d
3 changed files with 35 additions and 10 deletions
+2 -1
View File
@@ -19,7 +19,8 @@ function cross2(a, b)
end
function get_slave_elements(problem::Problem)
filter(el -> haskey(el, "master elements"), get_elements(problem))
cond(el) = haskey(el, "master elements") || haskey(el, "potential master elements")
return filter(cond, get_elements(problem))
end
function project_from_master_to_slave{E<:MortarElements2D}(slave_element::Element{E}, x2, time)