mirror of
https://github.com/JuliaFEM/JuliaFEM.jl.git
synced 2026-09-18 01:31:31 +00:00
Jukka Aho
96 lines
4.1 KiB
Julia
96 lines
4.1 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
|
|
using JuliaFEM.Preprocess
|
|
using JuliaFEM.Postprocess
|
|
using JuliaFEM.Abaqus
|
|
using JuliaFEM.Testing
|
|
using DataFrames
|
|
|
|
# to turn on automatic file download, set
|
|
# ENV["ABAQUS_DOWNLOAD_URL"] = "http://<domain>:2080/v2016/books/eif"
|
|
# if don't want to download all stuff to current directory, set also
|
|
# ENV["ABAQUS_DOWNLOAD_DIR"] = "/tmp"
|
|
|
|
""" Run test, return true if simulation is succesfull, i.e. no errors raise
|
|
during parsing .inp file or execution of model. This doesn't mean that results
|
|
are meaningful; they must be checked in separately. Running model only verifies
|
|
that no catastrophic failures happen during file parsing. """
|
|
function abaqus_run_test(name)
|
|
return_code = abaqus_run_model(name; fetch=true, verbose=true)
|
|
return_code == 0 && return true
|
|
return false
|
|
end
|
|
|
|
@testset "JuliaFEM-ABAQUS interface" begin
|
|
@testset "1 Element Verification" begin
|
|
@testset "1.2 Eigenvalue tests" begin
|
|
@testset "1.2.1 Eigenvalue extraction for single unconstrained elements" begin
|
|
@testset "Acoustic elements" begin
|
|
@testset "AC1D2 elements." begin
|
|
# abaqus_run_test("ec12afe1") || return
|
|
end
|
|
end
|
|
@testset "Three-dimensional continuum elements" begin
|
|
@testset "C3D10 elements." begin
|
|
# abaqus_run_test("ec3asfe1") || return
|
|
end
|
|
end
|
|
end
|
|
end
|
|
@testset "1.3 Simple load tests" begin
|
|
@testset "1.3.1 Membrane loading of plane stress, plane strain, membrane, and shell elements" begin
|
|
@testset "CPS4 elements." begin
|
|
# abaqus_run_test("ecs4sfs1") || return
|
|
end
|
|
end
|
|
@testset "1.3.3 Three-dimensional solid elements" begin
|
|
@testset "C3D8 elements." begin
|
|
abaqus_run_test("ec38sfs2") || return
|
|
res = abaqus_open_results("ec38sfs2")
|
|
|
|
node_output1 = wsv"""
|
|
NODE U1 U2 U3 COOR1 COOR2 COOR3
|
|
1 -2.0000E-33 -2.0000E-33 -2.0000E-33 0.000 0.000 0.000
|
|
2 -2.6667E-05 -1.0000E-33 -1.7333E-04 2.000 0.000 0.000
|
|
3 -2.0000E-04 -2.6667E-05 -1.7333E-04 2.000 2.000 0.000
|
|
4 -1.7333E-04 -2.6667E-05 -1.0000E-33 0.000 2.000 0.000
|
|
5 -3.6777E-48 -8.6667E-05 -1.3333E-05 0.000 0.000 1.000
|
|
6 -2.6667E-05 -8.6667E-05 -1.8667E-04 2.000 0.000 1.000
|
|
7 -2.0000E-04 -1.1333E-04 -1.8667E-04 2.000 2.000 1.000
|
|
8 -1.7333E-04 -1.1333E-04 -1.3333E-05 0.000 2.000 1.000
|
|
"""
|
|
|
|
node_output_2 = wsv"""
|
|
NODE RF1 RF2 RF3 CF1 CF2 CF3
|
|
1 1500.000 1500.000 1000.000 0.000 0.000 0.000
|
|
2 0.000 500.000 0.000 1500.000 0.000 0.000
|
|
3 0.000 0.000 0.000 500.000 500.000 -1000.000
|
|
4 0.000 0.000 0.000 500.000 1500.000 0.000
|
|
5 -500.000 0.000 0.000 0.000 -500.000 1000.000
|
|
6 0.000 0.000 0.000 -500.000 -1500.000 0.000
|
|
7 0.000 0.000 0.000 -1500.000 -1500.000 -1000.000
|
|
8 0.000 0.000 0.000 -1500.000 -500.000 0.000
|
|
"""
|
|
#= to check also results:
|
|
side, opts = read_result(xdmf, "SECTION/side")
|
|
@test isapprox(side["SOFM"], 3464.0)
|
|
@test isapprox(side["SOF1"], 2000.0)
|
|
@test isapprox(side["SOF2"], 2000.0)
|
|
@test isapprox(side["SOF3"], 2000.0)
|
|
@test isapprox(side["SOMM"], 2828.0)
|
|
@test isapprox(side["SOM1"], 0.0)
|
|
@test isapprox(side["SOM2"], 2000.0)
|
|
@test isapprox(side["SOM3"], -2000.0)
|
|
@test isapprox(side["SOAREA"], 2.000)
|
|
@test isapprox(side["SOCF1"], 2/3)
|
|
@test isapprox(side["SOCF2"], 2/3)
|
|
@test isapprox(side["SOCF3"], 1/6)
|
|
=#
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|