check for function egal instead of euqual

Author: hexaeder

src/component_functions.jl

@@ -582,8 +582,8 @@ dispatchT(T::Type{<:EdgeModel}) = EdgeModel
 # TODO: introduce batchequal hash for faster batching of component models
 batchequal(a, b) = false
 function batchequal(a::ComponentModel, b::ComponentModel)
-    compf(a)  == compf(b)  || return false
-    compg(a)  == compg(b)  || return false
+    compf(a) === compf(b)  || return false
+    compg(a) === compg(b)  || return false
     fftype(a) == fftype(b) || return false
     dim(a)    == dim(b)    || return false
     outdim(a) == outdim(b) || return false

src/construction.jl

@@ -325,9 +325,9 @@ function batch_by_idxs(v::AbstractVector, batches::Vector{Vector{Int}})
 end
 
 _find_identical(v::ComponentModel, indices) = [collect(indices)]
-function _find_identical(v::Vector, indices)
+function _find_identical(v::Vector{T}, indices) where {T<:ComponentModel}
     idxs_per_type = Vector{Int}[]
-    unique_comp = []
+    unique_comp = T[]
     for i in eachindex(v)
         found = false
         for j in eachindex(unique_comp)