feat(matrices): add randjorth

docs/src/reference.md

@@ -73,6 +73,7 @@ TypedMatrices.Poisson
 TypedMatrices.Prolate
 TypedMatrices.Randcolu
 TypedMatrices.Randcorr
+TypedMatrices.Randjorth
 TypedMatrices.Rando
 TypedMatrices.RandSVD
 TypedMatrices.Redheff

src/matrices/index.jl

@@ -48,6 +48,7 @@ export
     Prolate,
     Randcolu,
     Randcorr,
+    Randjorth,
     Rando,
     RandSVD,
     Redheff,
@@ -113,6 +114,7 @@ include("poisson.jl")
 include("prolate.jl")
 include("randcolu.jl")
 include("randcorr.jl")
+include("randjorth.jl")
 include("rando.jl")
 include("randsvd.jl")
 include("redheff.jl")
@@ -178,6 +180,7 @@ MATRIX_GROUPS[GROUP_BUILTIN] = Set([
     Prolate,
     Randcolu,
     Randcorr,
+    Randjorth,
     Rando,
     RandSVD,
     Redheff,

src/matrices/randjorth.jl

@@ -0,0 +1,29 @@
+# TODO: Randjorth Matrix
+"""
+Randjorth Matrix
+================
+This matrix is currently not implemented.
+"""
+struct Randjorth{T<:Number} <: AbstractMatrix{T}
+    n::Integer
+
+    function Randjorth{T}(n::Integer) where {T<:Number}
+        n >= 0 || throw(ArgumentError("$n < 0"))
+        return new{T}(n)
+    end
+end
+
+# constructors
+Randjorth(n::Integer) = Randjorth{Float64}(n)
+
+# metadata
+@properties Randjorth [:random]
+
+# properties
+size(A::Randjorth) = (A.n, A.n)
+
+# functions
+@inline Base.@propagate_inbounds function getindex(A::Randjorth{T}, i::Integer, j::Integer) where {T}
+    @boundscheck checkbounds(A, i, j)
+    return zero(T)
+end

test/matrices/randjorth.jl

@@ -0,0 +1,11 @@
+# constructors & content (random matrix)
+@test allequal([
+    size(Randjorth(5)),
+    size(Randjorth{Float64}(5)),
+])
+
+# linear algebra functions
+run_test_linearalgrbra_functions(Randjorth.(1:5))
+
+# eltype
+@test test_matrix_elements(Randjorth{Float32}(5))