Files
JuliaFEM.jl/src/sparse/sparsevectordok.jl
T
Jukka Aho ef9cddff13 feat: Consolidate AbaqusReader and AsterReader (mesh I/O)
- Added 1111 lines of mesh reading code to src/readers/
- ABAQUS .inp format support (6 files: parse_mesh, parse_model, keywords, etc.)
- Code Aster .med format support (3 files: read_aster_mesh, read_aster_results)
- Modernized Julia 0.x → 1.x syntax:
  * Nullable{T} → Union{T, Nothing}
  * get(nullable) → direct field access
- Added Logging stdlib to Project.toml dependencies
- Functions verified: abaqus_read_mesh, aster_read_mesh

Result: 7 vendor packages consolidated (~6400 lines total)
        FEMBasis, FEMBase, FEMQuad, FEMSparse, AbaqusReader, AsterReader
Tests: 5 passing (baseline maintained)
2025-11-08 11:25:13 +02:00

48 lines
1.2 KiB
Julia

# This file is a part of JuliaFEM.
# License is MIT: see https://github.com/JuliaFEM/FEMSparse.jl/blob/master/LICENSE
mutable struct SparseVectorDOK{Tv,Ti<:Integer} <: AbstractSparseArray{Tv,Ti,1}
data::Dict{Ti,Tv}
end
function SparseVectorDOK()
return SparseVectorDOK(Dict{Int64,Float64}())
end
function SparseVectorDOK{Tv,Ti<:Integer}(b::SparseVector{Tv,Ti})
I, V = findnz(b)
c = SparseVectorDOK()
add!(c, I, V)
return c
end
function SparseVectorDOK{T}(b::Vector{T})
return SparseVectorDOK(sparsevec(b))
end
function add!{Tv,Ti<:Integer}(b::SparseVectorDOK{Tv,Ti}, i::Ti, v::Tv)
b.data[i] = get(b, i) + v
return nothing
end
function add!{Tv,Ti<:Integer}(b::SparseVectorDOK{Tv,Ti}, dofs::Vector{Ti}, data::Vector{Tv})
@assert length(dofs) == length(data)
z = Tv(0)
for i = 1:length(dofs)
@inbounds b.data[dofs[i]] = Base.get(b.data, i, z) + data[i]
end
return nothing
end
function get{Tv,Ti<:Integer}(b::SparseVectorDOK{Tv,Ti}, i::Ti)
return Base.get(b.data, i, Tv(0))
end
function get!{Tv,Ti<:Integer}(b::SparseVectorDOK{Tv,Ti}, dofs::Vector{Ti}, data::Vector{Tv})
for (i, j) in enumerate(dofs)
data[i] = get(b, i)
end
return nothing
end