Glassvision/JuliaFEM.jl
1
0
Fork 0
mirror of https://github.com/JuliaFEM/JuliaFEM.jl.git synced 2026-08-06 04:21:33 +00:00
Code Issues Packages Projects Releases Wiki Activity
Files
a3f84b7292bab6395670a57f3827b803c42a6ab8
JuliaFEM.jl/notebooks/2015-12-13-3d-tie-contact.ipynb
T
Jukka Aho 69bd7ce58c code aster .med reader, notebook of 3d mortar.
2015-12-14 02:09:33 +02:00

932 lines
30 KiB
Plaintext
Raw Blame History

{
"cells": [
{
"cell_type": "markdown",
"metadata": {},
"source": [
"# Tie contact 3d\n",
"\n",
"Author(s): Jukka Aho"
]
},
{
"cell_type": "markdown",
"metadata": {},
"source": [
"## Solid block\n",
"\n",
"<img src=\"http://results.juliafem.org/2015-12-13-box_geom.png\" width=300px style=\"float:left\">\n",
"<img src=\"http://results.juliafem.org/2015-12-13-box_bcs.png\" width=300px style=\"float:left\">"
]
},
{
"cell_type": "code",
"execution_count": 1,
"metadata": {
"collapsed": false
},
"outputs": [],
"source": [
"using JuliaFEM\n",
"using JuliaFEM.Preprocess: parse_aster_med_file\n",
"using JuliaFEM.Core: LinearElasticityProblem, DirichletProblem, get_connectivity, Quad4, Hex8, LinearSolver"
]
},
{
"cell_type": "code",
"execution_count": 2,
"metadata": {
"collapsed": false
},
"outputs": [
{
"name": "stderr",
"output_type": "stream",
"text": [
"INFO: Found 4 element sets: SYM23, SYM12, SYM13, LOAD\n"
]
},
{
"data": {
"text/plain": [
"Dict{ASCIIString,Any} with 2 entries:\n",
" \"nodes\" => Dict(2=>[0.0,0.0,0.0],11=>[0.0,0.3333333333333333,1.0],39=>…\n",
" \"connectivity\" => Dict(68=>(:QU4,:OTHER,[45,47,48,46]),2=>(:SE2,:OTHER,[9,10]…"
]
},
"execution_count": 2,
"metadata": {},
"output_type": "execute_result"
}
],
"source": [
"mesh = parse_aster_med_file(Pkg.dir(\"JuliaFEM\")*\"/geometry/unit_box/mesh.med\")\n",
"#mesh = parse_aster_med_file(Pkg.dir(\"JuliaFEM\")*\"/geometry/unit_box/twoelem_box.med\")"
]
},
{
"cell_type": "code",
"execution_count": 3,
"metadata": {
"collapsed": false
},
"outputs": [
{
"name": "stderr",
"output_type": "stream",
"text": [
"INFO: created 36 elements.\n"
]
}
],
"source": [
"# interior elements are of type HE8\n",
"field_problem = LinearElasticityProblem()\n",
"for (elid, (eltype, elset, elcon)) in mesh[\"connectivity\"]\n",
" eltype == :HE8 || continue\n",
" element = Hex8(elcon)\n",
" element[\"geometry\"] = Vector{Float64}[mesh[\"nodes\"][i] for i in get_connectivity(element)]\n",
" element[\"youngs modulus\"] = 900.0\n",
" element[\"poissons ratio\"] = 0.25\n",
" push!(field_problem, element)\n",
"end\n",
"# Neumann boundary condition, traction force -100 on Z direction for element set LOAD\n",
"for (elid, (eltype, elset, elcon)) in mesh[\"connectivity\"]\n",
" (eltype == :QU4) && (elset == :LOAD) || continue\n",
" element = Quad4(elcon)\n",
" element[\"geometry\"] = Vector{Float64}[mesh[\"nodes\"][i] for i in get_connectivity(element)]\n",
" element[\"displacement traction force\"] = Vector{Float64}[[0.0, 0.0, -100.0] for i=1:4]\n",
" push!(field_problem, element)\n",
"end\n",
"info(\"created $(length(field_problem.elements)) elements.\")"
]
},
{
"cell_type": "code",
"execution_count": 4,
"metadata": {
"collapsed": false
},
"outputs": [
{
"name": "stderr",
"output_type": "stream",
"text": [
"INFO: created 27 boundary elements.\n"
]
}
],
"source": [
"# boundary conditions\n",
"boundary_problem = DirichletProblem(\"displacement\", 3)\n",
"for (elid, (eltype, elset, elcon)) in mesh[\"connectivity\"]\n",
" (eltype == :QU4) && (elset in [:SYM23, :SYM12, :SYM13]) || continue\n",
" element = Quad4(elcon)\n",
" element[\"geometry\"] = Vector{Float64}[mesh[\"nodes\"][i] for i in get_connectivity(element)]\n",
" if elset == :SYM23\n",
" element[\"displacement 1\"] = 0.0\n",
" elseif elset == :SYM12\n",
" element[\"displacement 3\"] = 0.0\n",
" elseif elset == :SYM13\n",
" element[\"displacement 2\"] = 0.0\n",
" end\n",
" push!(boundary_problem, element)\n",
"end\n",
"info(\"created $(length(boundary_problem.elements)) boundary elements.\")"
]
},
{
"cell_type": "code",
"execution_count": 5,
"metadata": {
"collapsed": false,
"scrolled": true
},
"outputs": [
{
"name": "stderr",
"output_type": "stream",
"text": [
"INFO: solving displacement problem, 3 dofs / nodes\n",
"INFO: solved problem in 2.11 seconds.\n"
]
},
{
"data": {
"text/plain": [
"0.587944735792132"
]
},
"execution_count": 5,
"metadata": {},
"output_type": "execute_result"
}
],
"source": [
"ls = LinearSolver(\"block\")\n",
"push!(ls, field_problem)\n",
"push!(ls, boundary_problem)\n",
"norm = call(ls, 0.0)"
]
},
{
"cell_type": "code",
"execution_count": 6,
"metadata": {
"collapsed": false
},
"outputs": [
{
"name": "stderr",
"output_type": "stream",
"text": [
"INFO: nid near corner = 7\n"
]
},
{
"data": {
"text/plain": [
"7"
]
},
"execution_count": 6,
"metadata": {},
"output_type": "execute_result"
}
],
"source": [
"nid = 0\n",
"for (nid, coords) in mesh[\"nodes\"]\n",
" if isapprox(coords, [1.0, 1.0, 1.0])\n",
" info(\"nid near corner = $nid\")\n",
" break\n",
" end\n",
"end\n",
"nid"
]
},
{
"cell_type": "code",
"execution_count": 7,
"metadata": {
"collapsed": false
},
"outputs": [
{
"name": "stderr",
"output_type": "stream",
"text": [
"INFO: displacement X = [1.0,1.0,1.0], u = [-0.02777777777777779,-0.027777777777777773,0.11111111111111113]\n",
"INFO: displacement X = [1.0,1.0,1.0], u = [-0.02777777777777779,-0.027777777777777773,0.11111111111111113]\n"
]
}
],
"source": [
"using JuliaFEM.Test\n",
"known_value = [1/36, 1/36, -1/9]\n",
"for element in field_problem.elements\n",
" i = indexin([nid], get_connectivity(element))[1]\n",
" i != 0 || continue\n",
" X = element(\"geometry\", 0.0)\n",
" u = element(\"displacement\", 0.0)\n",
" info(\"displacement X = $(X[i]), u = $(u[i])\")\n",
" @test isapprox(-u[i], known_value)\n",
"end"
]
},
{
"cell_type": "code",
"execution_count": 8,
"metadata": {
"collapsed": false
},
"outputs": [
{
"name": "stderr",
"output_type": "stream",
"text": [
"INFO: XDFM: ndim = 192\n"
]
}
],
"source": [
"xdoc, xmodel = JuliaFEM.Postprocess.xdmf_new_model()\n",
"coll = JuliaFEM.Postprocess.xdmf_new_temporal_collection(xmodel)\n",
"grid = JuliaFEM.Postprocess.xdmf_new_grid(coll; time=0.0)\n",
"\n",
"Xg = Dict{Int64, Vector{Float64}}()\n",
"ug = Dict{Int64, Vector{Float64}}()\n",
"for element in field_problem.elements\n",
" conn = get_connectivity(element)\n",
" X = element(\"geometry\", 0.0)\n",
" u = element(\"displacement\", 0.0)\n",
" for (i, c) in enumerate(conn)\n",
" Xg[c] = X[i]\n",
" ug[c] = u[i]\n",
" end\n",
"end\n",
"perm = sort(collect(keys(Xg)))\n",
"nodes = Vector{Float64}[Xg[i] for i in perm]\n",
"disp = Vector{Float64}[ug[i] for i in perm]\n",
"elements = []\n",
"for el in field_problem.elements\n",
" isa(el, JuliaFEM.Core.Element{JuliaFEM.Core.Hex8}) || continue\n",
" push!(elements, (:Hex8, get_connectivity(el)))\n",
"end\n",
"#elements\n",
"JuliaFEM.Postprocess.xdmf_new_mesh!(grid, nodes, elements)\n",
"JuliaFEM.Postprocess.xdmf_new_nodal_field!(grid, \"displacement\", disp)\n",
"JuliaFEM.Postprocess.xdmf_save_model(xdoc, \"/tmp/foobar2.xmf\");"
]
},
{
"cell_type": "markdown",
"metadata": {},
"source": [
"<img src=\"http://results.juliafem.org/2015-12-13-box_results.png\" width=300px style=\"float:left\">"
]
},
{
"cell_type": "code",
"execution_count": 9,
"metadata": {
"collapsed": false
},
"outputs": [
{
"data": {
"text/plain": [
"3x56 Array{Float64,2}:\n",
" 0.0 0.0 0.0 0.0 0.0 0.0 … 0.0 0.0 0.0 \n",
" 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 \n",
" -2.77778 0.0 -2.77778 0.0 -2.77778 0.0 -11.1111 -11.1111 -11.1111"
]
},
"execution_count": 9,
"metadata": {},
"output_type": "execute_result"
}
],
"source": [
"reshape(full(JuliaFEM.Core.assemble(field_problem, 0.0).force_vector), 3, 56)"
]
},
{
"cell_type": "markdown",
"metadata": {},
"source": [
"## Block divived to two parts\n",
"\n",
"<img src=\"http://results.juliafem.org/2015-12-13-divided-block-geometry.png\" width=400px style=\"float:left\">\n",
"<img src=\"http://results.juliafem.org/2015-12-13-divided-block-both-parts.png\" width=400px style=\"float:left\">"
]
},
{
"cell_type": "code",
"execution_count": 1,
"metadata": {
"collapsed": false
},
"outputs": [
{
"name": "stderr",
"output_type": "stream",
"text": [
"INFO: Found 4 element sets: LSYM23, LSYM12, LSYM13, LOWER_BLOCK_TO_UPPER_BLOCK\n",
"INFO: Found 4 element sets: USYM23, UPPER_BLOCK_TO_LOWER_BLOCK, USYM13, LOAD\n"
]
},
{
"data": {
"text/plain": [
"Dict{ASCIIString,Any} with 2 entries:\n",
" \"nodes\" => Dict(2=>[0.0,0.0,1.0],11=>[0.0,0.6666666666666666,1.0],39=>…\n",
" \"connectivity\" => Dict(68=>(:QU4,:UPPER_BLOCK_TO_LOWER_BLOCK,[42,14,4,26]),2=…"
]
},
"execution_count": 1,
"metadata": {},
"output_type": "execute_result"
}
],
"source": [
"using JuliaFEM\n",
"using JuliaFEM.Preprocess: parse_aster_med_file\n",
"using JuliaFEM.Core: LinearElasticityProblem, DirichletProblem, get_connectivity, Quad4, Hex8, LinearSolver\n",
"mesh_lower = parse_aster_med_file(Pkg.dir(\"JuliaFEM\")*\"/geometry/unit_box/LOWER_BLOCK.med\")\n",
"mesh_upper = parse_aster_med_file(Pkg.dir(\"JuliaFEM\")*\"/geometry/unit_box/UPPER_BLOCK.med\")"
]
},
{
"cell_type": "code",
"execution_count": 2,
"metadata": {
"collapsed": false
},
"outputs": [
{
"data": {
"text/plain": [
"1x75 Array{Int64,2}:\n",
" 1 2 3 4 5 6 7 8 9 10 11 12 … 67 68 69 70 71 72 73 74 75"
]
},
"execution_count": 2,
"metadata": {},
"output_type": "execute_result"
}
],
"source": [
"sort(collect(keys(mesh_lower[\"nodes\"])))'"
]
},
{
"cell_type": "code",
"execution_count": 3,
"metadata": {
"collapsed": false
},
"outputs": [
{
"data": {
"text/plain": [
"1x48 Array{Int64,2}:\n",
" 1 2 3 4 5 6 7 8 9 10 11 12 … 40 41 42 43 44 45 46 47 48"
]
},
"execution_count": 3,
"metadata": {},
"output_type": "execute_result"
}
],
"source": [
"sort(collect(keys(mesh_upper[\"nodes\"])))'"
]
},
{
"cell_type": "markdown",
"metadata": {},
"source": [
"Need to renumber nodes."
]
},
{
"cell_type": "code",
"execution_count": 4,
"metadata": {
"collapsed": false
},
"outputs": [
{
"data": {
"text/plain": [
"Dict{Int64,Int64} with 48 entries:\n",
" 2 => 77\n",
" 11 => 86\n",
" 39 => 114\n",
" 46 => 121\n",
" 25 => 100\n",
" 42 => 117\n",
" 29 => 104\n",
" 8 => 83\n",
" 20 => 95\n",
" 14 => 89\n",
" 31 => 106\n",
" 33 => 108\n",
" 18 => 93\n",
" 26 => 101\n",
" 35 => 110\n",
" 17 => 92\n",
" 44 => 119\n",
" 4 => 79\n",
" 37 => 112\n",
" 45 => 120\n",
" 13 => 88\n",
" 30 => 105\n",
" 1 => 76\n",
" 47 => 122\n",
" 32 => 107\n",
" ⋮ => ⋮"
]
},
"execution_count": 4,
"metadata": {},
"output_type": "execute_result"
}
],
"source": [
"new_node_numbering = Dict{Int64, Int64}()\n",
"upper_node_ids = sort(collect(keys(mesh_upper[\"nodes\"])))\n",
"for (k, old_node_id) in enumerate(upper_node_ids)\n",
" new_node_numbering[old_node_id] = 75+k\n",
"end\n",
"new_node_numbering"
]
},
{
"cell_type": "code",
"execution_count": 5,
"metadata": {
"collapsed": false
},
"outputs": [
{
"data": {
"text/plain": [
"1x48 Array{Int64,2}:\n",
" 76 77 78 79 80 81 82 83 84 85 … 117 118 119 120 121 122 123"
]
},
"execution_count": 5,
"metadata": {},
"output_type": "execute_result"
}
],
"source": [
"function renumber!(mesh, node_numbering)\n",
" old_nodes = mesh[\"nodes\"]\n",
" new_nodes = typeof(old_nodes)()\n",
" for (node_id, node_coords) in old_nodes\n",
" new_node_id = node_numbering[node_id]\n",
" new_nodes[new_node_id] = node_coords\n",
" end\n",
" mesh[\"nodes\"] = new_nodes\n",
" for (elid, (eltype, elset, elcon)) in mesh[\"connectivity\"]\n",
" new_elcon = [node_numbering[node_id] for node_id in elcon]\n",
" mesh[\"connectivity\"][elid] = (eltype, elset, new_elcon)\n",
" end\n",
" return mesh\n",
"end\n",
"\n",
"renumber!(mesh_upper, new_node_numbering)\n",
"sort(collect(keys(mesh_upper[\"nodes\"])))'"
]
},
{
"cell_type": "code",
"execution_count": 6,
"metadata": {
"collapsed": false
},
"outputs": [
{
"data": {
"text/plain": [
"Dict{Int64,Tuple{Symbol,Symbol,Array{Int64,1}}} with 92 entries:\n",
" 68 => (:QU4,:UPPER_BLOCK_TO_LOWER_BLOCK,[117,89,79,101])\n",
" 2 => (:SE2,:OTHER,[84,77])\n",
" 89 => (:HE8,:OTHER,[121,123,115,114,118,119,103,102])\n",
" 11 => (:SE2,:OTHER,[80,90])\n",
" 39 => (:QU4,:USYM13,[80,90,106,93])\n",
" 46 => (:QU4,:LOAD,[95,108,109,96])\n",
" 85 => (:HE8,:OTHER,[107,120,116,94,106,121,114,93])\n",
" 25 => (:SE2,:OTHER,[83,99])\n",
" 55 => (:QU4,:OTHER,[96,112,113,95])\n",
" 42 => (:QU4,:USYM13,[90,81,92,106])\n",
" 66 => (:QU4,:UPPER_BLOCK_TO_LOWER_BLOCK,[94,76,88,116])\n",
" 58 => (:QU4,:OTHER,[112,100,101,113])\n",
" 29 => (:SE2,:OTHER,[101,79])\n",
" 59 => (:QU4,:OTHER,[113,101,79,87])\n",
" 8 => (:SE2,:OTHER,[76,88])\n",
" 74 => (:QU4,:OTHER,[119,103,83,99])\n",
" 90 => (:HE8,:OTHER,[105,87,79,89,122,113,101,117])\n",
" 57 => (:QU4,:OTHER,[99,83,100,112])\n",
" 20 => (:SE2,:OTHER,[95,96])\n",
" 78 => (:HE8,:OTHER,[85,86,105,104,110,108,122,120])\n",
" 14 => (:SE2,:OTHER,[91,92])\n",
" 31 => (:SE2,:OTHER,[102,103])\n",
" 70 => (:QU4,:OTHER,[97,118,119,98])\n",
" 33 => (:QU4,:USYM23,[76,84,104,88])\n",
" 52 => (:QU4,:LOAD,[110,91,92,111])\n",
" ⋮ => ⋮"
]
},
"execution_count": 6,
"metadata": {},
"output_type": "execute_result"
}
],
"source": [
"mesh_upper[\"connectivity\"]"
]
},
{
"cell_type": "code",
"execution_count": 7,
"metadata": {
"collapsed": false
},
"outputs": [
{
"name": "stderr",
"output_type": "stream",
"text": [
"INFO: lower: add element with connectivity [40,69,57,23,17,64,34,5]\n",
"INFO: lower: add element with connectivity [73,54,31,61,74,53,32,62]\n",
"INFO: lower: add element with connectivity [75,52,33,63,66,30,8,36]\n",
"INFO: lower: add element with connectivity [71,74,62,59,72,75,63,60]\n",
"INFO: lower: add element with connectivity [46,47,71,68,49,50,72,69]\n",
"INFO: lower: add element with connectivity [49,50,72,69,24,25,65,64]\n",
"INFO: lower: add element with connectivity [20,43,67,42,19,46,68,41]\n",
"INFO: lower: add element with connectivity [9,37,14,1,42,67,55,21]\n",
"INFO: lower: add element with connectivity [44,45,73,70,47,48,74,71]\n",
"INFO: lower: add element with connectivity [10,11,38,37,43,44,70,67]\n",
"INFO: lower: add element with connectivity [39,13,4,16,73,54,31,61]\n",
"INFO: lower: add element with connectivity [74,53,32,62,75,52,33,63]\n",
"INFO: lower: add element with connectivity [37,38,15,14,67,70,58,55]\n",
"INFO: lower: add element with connectivity [70,73,61,58,71,74,62,59]\n",
"INFO: lower: add element with connectivity [43,44,70,67,46,47,71,68]\n",
"INFO: lower: add element with connectivity [68,71,59,56,69,72,60,57]\n",
"INFO: lower: add element with connectivity [12,3,13,39,45,29,54,73]\n",
"INFO: lower: add element with connectivity [67,70,58,55,68,71,59,56]\n",
"INFO: lower: add element with connectivity [47,48,74,71,50,51,75,72]\n",
"INFO: lower: add element with connectivity [2,10,37,9,20,43,67,42]\n",
"INFO: lower: add element with connectivity [69,72,60,57,64,65,35,34]\n",
"INFO: lower: add element with connectivity [72,75,63,60,65,66,36,35]\n",
"INFO: lower: add element with connectivity [45,29,54,73,48,28,53,74]\n",
"INFO: lower: add element with connectivity [51,27,52,75,26,7,30,66]\n",
"INFO: lower: add element with connectivity [11,12,39,38,44,45,73,70]\n",
"INFO: lower: add element with connectivity [42,67,55,21,41,68,56,22]\n",
"INFO: lower: add element with connectivity [19,46,68,41,18,49,69,40]\n",
"INFO: lower: add element with connectivity [38,39,16,15,70,73,61,58]\n",
"INFO: lower: add element with connectivity [48,28,53,74,51,27,52,75]\n",
"INFO: lower: add element with connectivity [50,51,75,72,25,26,66,65]\n",
"INFO: lower: add element with connectivity [41,68,56,22,40,69,57,23]\n",
"INFO: lower: add element with connectivity [18,49,69,40,6,24,64,17]\n",
"INFO: upper: add element with connectivity [121,123,115,114,118,119,103,102]\n",
"INFO: upper: add element with connectivity [107,120,116,94,106,121,114,93]\n",
"INFO: upper: add element with connectivity [105,87,79,89,122,113,101,117]\n",
"INFO: upper: add element with connectivity [85,86,105,104,110,108,122,120]\n",
"INFO: upper: add element with connectivity [109,96,112,123,98,82,99,119]\n",
"INFO: upper: add element with connectivity [84,104,88,76,107,120,116,94]\n",
"INFO: upper: add element with connectivity [106,121,114,93,90,118,102,80]\n",
"INFO: upper: add element with connectivity [92,111,121,106,81,97,118,90]\n",
"INFO: upper: add element with connectivity [111,109,123,121,97,98,119,118]\n",
"INFO: upper: add element with connectivity [108,95,113,122,109,96,112,123]\n",
"INFO: upper: add element with connectivity [122,113,101,117,123,112,100,115]\n",
"INFO: upper: add element with connectivity [77,85,104,84,91,110,120,107]\n",
"INFO: upper: add element with connectivity [104,105,89,88,120,122,117,116]\n",
"INFO: upper: add element with connectivity [110,108,122,120,111,109,123,121]\n",
"INFO: upper: add element with connectivity [91,110,120,107,92,111,121,106]\n",
"INFO: upper: add element with connectivity [86,78,87,105,108,95,113,122]\n",
"INFO: upper: add element with connectivity [120,122,117,116,121,123,115,114]\n",
"INFO: upper: add element with connectivity [123,112,100,115,119,99,83,103]\n",
"INFO: created 59 elements.\n"
]
}
],
"source": [
"# interior elements are of type HE8\n",
"field_problem = LinearElasticityProblem()\n",
"\n",
"for (elid, (eltype, elset, elcon)) in mesh_lower[\"connectivity\"]\n",
" eltype == :HE8 || continue\n",
" element = Hex8(elcon)\n",
" element[\"geometry\"] = Vector{Float64}[mesh_lower[\"nodes\"][i] for i in get_connectivity(element)]\n",
" element[\"youngs modulus\"] = 900.0\n",
" element[\"poissons ratio\"] = 0.25\n",
" info(\"lower: add element with connectivity $elcon\")\n",
" push!(field_problem, element)\n",
"end\n",
"\n",
"for (elid, (eltype, elset, elcon)) in mesh_upper[\"connectivity\"]\n",
" eltype == :HE8 || continue\n",
" element = Hex8(elcon)\n",
" element[\"geometry\"] = Vector{Float64}[mesh_upper[\"nodes\"][i] for i in get_connectivity(element)]\n",
" element[\"youngs modulus\"] = 900.0\n",
" element[\"poissons ratio\"] = 0.25\n",
" info(\"upper: add element with connectivity $elcon\")\n",
" push!(field_problem, element)\n",
"end\n",
"\n",
"# Neumann boundary condition, traction force -100 on Z direction for element set LOAD\n",
"for (elid, (eltype, elset, elcon)) in mesh_upper[\"connectivity\"]\n",
" (eltype == :QU4) && (elset == :LOAD) || continue\n",
" element = Quad4(elcon)\n",
" element[\"geometry\"] = Vector{Float64}[mesh_upper[\"nodes\"][i] for i in get_connectivity(element)]\n",
" element[\"displacement traction force\"] = Vector{Float64}[[0.0, 0.0, 100.0] for i=1:4]\n",
" push!(field_problem, element)\n",
"end\n",
"info(\"created $(length(field_problem.elements)) elements.\")"
]
},
{
"cell_type": "code",
"execution_count": 8,
"metadata": {
"collapsed": false
},
"outputs": [
{
"name": "stderr",
"output_type": "stream",
"text": [
"INFO: created 44 boundary elements.\n"
]
}
],
"source": [
"# boundary conditions\n",
"boundary_problem = DirichletProblem(\"displacement\", 3)\n",
"\n",
"for (elid, (eltype, elset, elcon)) in mesh_lower[\"connectivity\"]\n",
" (eltype == :QU4) && (elset in [:LSYM23, :LSYM12, :LSYM13]) || continue\n",
" element = Quad4(elcon)\n",
" element[\"geometry\"] = Vector{Float64}[mesh_lower[\"nodes\"][i] for i in get_connectivity(element)]\n",
" if elset == :LSYM23\n",
" element[\"displacement 1\"] = 0.0\n",
" elseif elset == :LSYM12\n",
" element[\"displacement 3\"] = 0.0\n",
" elseif elset == :LSYM13\n",
" element[\"displacement 2\"] = 0.0\n",
" end\n",
" push!(boundary_problem, element)\n",
"end\n",
"\n",
"for (elid, (eltype, elset, elcon)) in mesh_upper[\"connectivity\"]\n",
" (eltype == :QU4) && (elset in [:USYM23, :USYM12, :USYM13]) || continue\n",
" element = Quad4(elcon)\n",
" element[\"geometry\"] = Vector{Float64}[mesh_upper[\"nodes\"][i] for i in get_connectivity(element)]\n",
" if elset == :USYM23\n",
" element[\"displacement 1\"] = 0.0\n",
" elseif elset == :USYM12\n",
" element[\"displacement 3\"] = 0.0\n",
" elseif elset == :USYM13\n",
" element[\"displacement 2\"] = 0.0\n",
" end\n",
" push!(boundary_problem, element)\n",
"end\n",
"\n",
"info(\"created $(length(boundary_problem.elements)) boundary elements.\")"
]
},
{
"cell_type": "markdown",
"metadata": {},
"source": [
"### Creating tie contact\n",
"- define slave element surface (the one where integration happend)\n",
"- define potential master elements for slave elements"
]
},
{
"cell_type": "code",
"execution_count": 9,
"metadata": {
"collapsed": false
},
"outputs": [],
"source": [
"using JuliaFEM.Core: Element, MortarProblem, calculate_normal_tangential_coordinates!\n",
"\n",
"mortar_side = mesh_upper\n",
"nonmortar_side = mesh_lower\n",
"\n",
"master_elements = JuliaFEM.Core.Element[]\n",
"for (elid, (eltype, elset, elcon)) in mortar_side[\"connectivity\"]\n",
" (eltype == :QU4) && (elset == :UPPER_BLOCK_TO_LOWER_BLOCK) || continue\n",
" element = Quad4(elcon)\n",
" element[\"geometry\"] = Vector{Float64}[mortar_side[\"nodes\"][i] for i in get_connectivity(element)]\n",
" push!(master_elements, element)\n",
"end\n",
"\n",
"contact_problem = MortarProblem(\"displacement\", 3)\n",
"for (elid, (eltype, elset, elcon)) in nonmortar_side[\"connectivity\"]\n",
" (eltype == :QU4) && (elset == :LOWER_BLOCK_TO_UPPER_BLOCK) || continue\n",
" element = Quad4(elcon)\n",
" element[\"geometry\"] = Vector{Float64}[nonmortar_side[\"nodes\"][i] for i in get_connectivity(element)]\n",
" element[\"master elements\"] = master_elements\n",
" calculate_normal_tangential_coordinates!(element, 0.0)\n",
" push!(contact_problem, element)\n",
"end"
]
},
{
"cell_type": "code",
"execution_count": 10,
"metadata": {
"collapsed": false
},
"outputs": [
{
"name": "stderr",
"output_type": "stream",
"text": [
"INFO: # of field problems: 1\n",
"INFO: # of boundary problems: 2\n",
"INFO: Starting iteration 1\n",
"INFO: Assembling field problems...\n",
"INFO: Assembling body 1...\n",
"INFO: dim = 369\n",
"INFO: Assembling boundary problems...\n",
"INFO: Assembling boundary 1...\n",
"INFO: Assembling boundary 2...\n",
"INFO: dumping matrices to disk, file = matrices_tie_contact_3d_host_1_iteration_1.jld\n",
"INFO: Solving system\n",
"INFO: UMFPACK: solved in 0.1845378875732422 seconds. norm = 0.37585220926688956\n",
"INFO: timing info for non-linear iteration:\n"
]
},
{
"data": {
"text/plain": [
"(1,false)"
]
},
"execution_count": 10,
"metadata": {},
"output_type": "execute_result"
},
{
"name": "stderr",
"output_type": "stream",
"text": [
"INFO: boundary assembly : 1.6115069389343262\n",
"INFO: field assembly : 1.110853910446167\n",
"INFO: dump matrices to disk : 1.0786750316619873\n",
"INFO: solve problem : 0.3312990665435791\n",
"INFO: update element data : 0.022845029830932617\n",
"INFO: non-linear iteration : 4.155207872390747\n",
"INFO: Warning: did not coverge in 1 iterations!\n"
]
}
],
"source": [
"using JuliaFEM.Core: DirectSolver\n",
"solver = DirectSolver()\n",
"solver.name = \"tie_contact_3d\"\n",
"solver.method = :UMFPACK\n",
"solver.max_iterations = 1\n",
"solver.dump_matrices = true\n",
"push!(solver, field_problem)\n",
"push!(solver, boundary_problem)\n",
"push!(solver, contact_problem)\n",
"call(solver, 0.0)"
]
},
{
"cell_type": "code",
"execution_count": 11,
"metadata": {
"collapsed": false
},
"outputs": [
{
"name": "stderr",
"output_type": "stream",
"text": [
"INFO: nid near corner = 82\n",
"INFO: displacement X = [1.0,1.0,1.0], u = [0.022782767229558416,0.022002026379764242,-0.08215452308106556]\n"
]
},
{
"ename": "LoadError",
"evalue": "LoadError: test failed: isapprox(-(u[i]),known_value)\n in expression: isapprox(-(u[i]),known_value)\nwhile loading In[11], in expression starting on line 14",
"output_type": "error",
"traceback": [
"LoadError: test failed: isapprox(-(u[i]),known_value)\n in expression: isapprox(-(u[i]),known_value)\nwhile loading In[11], in expression starting on line 14",
"",
" in error at ./error.jl:21",
" in default_handler at test.jl:30",
" in do_test at test.jl:53",
" [inlined code] from In[11]:20",
" in anonymous at no file:0"
]
}
],
"source": [
"using JuliaFEM.Test\n",
"\n",
"nid = 0\n",
"for (nid, coords) in mesh_upper[\"nodes\"]\n",
" if isapprox(coords, [1.0, 1.0, 1.0])\n",
" info(\"nid near corner = $nid\")\n",
" break\n",
" end\n",
"end\n",
"nid\n",
"\n",
"known_value = [1/36, 1/36, -1/9]\n",
"\n",
"for element in field_problem.elements\n",
" i = indexin([nid], get_connectivity(element))[1]\n",
" i != 0 || continue\n",
" X = element(\"geometry\", 0.0)\n",
" u = element(\"displacement\", 0.0)\n",
" info(\"displacement X = $(X[i]), u = $(u[i])\")\n",
" @test isapprox(-u[i], known_value)\n",
"end"
]
},
{
"cell_type": "code",
"execution_count": 12,
"metadata": {
"collapsed": false
},
"outputs": [
{
"name": "stderr",
"output_type": "stream",
"text": [
"INFO: XDFM: ndim = 369\n"
]
}
],
"source": [
"xdoc, xmodel = JuliaFEM.Postprocess.xdmf_new_model()\n",
"coll = JuliaFEM.Postprocess.xdmf_new_temporal_collection(xmodel)\n",
"grid = JuliaFEM.Postprocess.xdmf_new_grid(coll; time=0.0)\n",
"\n",
"Xg = Dict{Int64, Vector{Float64}}()\n",
"ug = Dict{Int64, Vector{Float64}}()\n",
"for element in field_problem.elements\n",
" conn = get_connectivity(element)\n",
" X = element(\"geometry\", 0.0)\n",
" u = element(\"displacement\", 0.0)\n",
" for (i, c) in enumerate(conn)\n",
" Xg[c] = X[i]\n",
" ug[c] = u[i]\n",
" end\n",
"end\n",
"perm = sort(collect(keys(Xg)))\n",
"nodes = Vector{Float64}[Xg[i] for i in perm]\n",
"disp = Vector{Float64}[ug[i] for i in perm]\n",
"elements = []\n",
"for el in field_problem.elements\n",
" isa(el, JuliaFEM.Core.Element{JuliaFEM.Core.Hex8}) || continue\n",
" push!(elements, (:Hex8, get_connectivity(el)))\n",
"end\n",
"#elements\n",
"JuliaFEM.Postprocess.xdmf_new_mesh!(grid, nodes, elements)\n",
"JuliaFEM.Postprocess.xdmf_new_nodal_field!(grid, \"displacement\", disp)\n",
"JuliaFEM.Postprocess.xdmf_save_model(xdoc, \"/tmp/foobar3.xmf\");"
]
},
{
"cell_type": "code",
"execution_count": null,
"metadata": {
"collapsed": true
},
"outputs": [],
"source": []
}
],
"metadata": {
"kernelspec": {
"display_name": "Julia 0.4.2",
"language": "julia",
"name": "julia-0.4"
},
"language_info": {
"file_extension": ".jl",
"mimetype": "application/julia",
"name": "julia",
"version": "0.4.2"
}
},
"nbformat": 4,
"nbformat_minor": 0
}
Reference in New Issue View Git Blame Copy Permalink