mirror of
https://github.com/JuliaFEM/JuliaFEM.jl.git
synced 2026-09-21 18:33:36 +00:00
Jukka Aho
51 lines
1.8 KiB
Julia
51 lines
1.8 KiB
Julia
# This file is a part of JuliaFEM.
|
|
# License is MIT: see https://github.com/JuliaFEM/JuliaFEM.jl/blob/master/LICENSE.md
|
|
|
|
using JuliaFEM.Test
|
|
|
|
using JuliaFEM.Core: update!, Problem, Elasticity, Dirichlet, Solver, Node, Hex8, Quad4
|
|
|
|
@testset "test continuum 3d linear elasticity with surface load" begin
|
|
nodes = Dict{Int64, Node}(
|
|
1 => [0.0, 0.0, 0.0],
|
|
2 => [1.0, 0.0, 0.0],
|
|
3 => [1.0, 1.0, 0.0],
|
|
4 => [0.0, 1.0, 0.0],
|
|
5 => [0.0, 0.0, 1.0],
|
|
6 => [1.0, 0.0, 1.0],
|
|
7 => [1.0, 1.0, 1.0],
|
|
8 => [0.0, 1.0, 1.0])
|
|
|
|
element1 = Hex8([1, 2, 3, 4, 5, 6, 7, 8])
|
|
element2 = Quad4([5, 6, 7, 8])
|
|
update!([element1, element2], "geometry", nodes)
|
|
update!([element1], "youngs modulus", 900.0)
|
|
update!([element1], "poissons ratio", 0.25)
|
|
update!([element2], "displacement traction force", Vector{Float64}[[0.0, 0.0, -100.0] for i=1:4])
|
|
|
|
elasticity_problem = Problem(Elasticity, "solve continuum block", 3)
|
|
elasticity_problem.properties.finite_strain = false
|
|
push!(elasticity_problem, element1)
|
|
push!(elasticity_problem, element2)
|
|
|
|
symxy = Quad4([1, 2, 3, 4])
|
|
symxz = Quad4([1, 2, 6, 5])
|
|
symyz = Quad4([1, 4, 8, 5])
|
|
update!([symxy, symxz, symyz], "geometry", nodes)
|
|
symxy["displacement 3"] = 0.0
|
|
symxz["displacement 2"] = 0.0
|
|
symyz["displacement 1"] = 0.0
|
|
boundary_problem = Problem(Dirichlet, "symmetry boundary conditions", 3, "displacement")
|
|
push!(boundary_problem, symxy, symxz, symyz)
|
|
|
|
solver = Solver("solve 3d block")
|
|
push!(solver, elasticity_problem)
|
|
push!(solver, boundary_problem)
|
|
call(solver)
|
|
|
|
disp = element1("displacement", [1.0, 1.0, 1.0], 0.0)
|
|
info("displacement at tip: $disp")
|
|
u_expected = -100.0/900.0 * [-0.25, -0.25, 1.0]
|
|
@test isapprox(disp, u_expected)
|
|
end
|