updated method for type specialization

SchisslerGroup · Feb 21, 2024 · afca446 · afca446
1 parent 27c01dd
commit afca446
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/src/Bigsimr.jl b/src/Bigsimr.jl
@@ -103,10 +103,10 @@ false
 ```
 """
 function is_correlation(X::AbstractMatrix{T}) where {T<:Real}
-    issymmetric(X)     || return false
-    all(diag(X) .== 1) || return false
-    all(-1 .≤ X .≤ 1)  || return false
-    isposdef(X)        || return false
+    issymmetric(X)              || return false
+    all(diag(X) .== one(T))     || return false
+    all(-one(T) .≤ X .≤ one(T)) || return false
+    isposdef(X)                 || return false
 
     return true
 end