The OpenD Programming Language

/++
$(H2 Multidimensional traits)

This is a submodule of $(MREF mir,ndslice).

$(BOOKTABLE $(H2 Function),
$(TR $(TH Function Name) $(TH Description))

$(T2 isVector, Test if type is a one-dimensional slice.)
$(T2 isMatrix, Test if type is a two-dimensional slice.)
$(T2 isContiguousSlice, Test if type is a contiguous slice.)
$(T2 isCanonicalSlice, Test if type is a canonical slice.)
$(T2 isUniversalSlice, Test if type is a universal slice.)
$(T2 isContiguousVector, Test if type is a contiguous one-dimensional slice.)
$(T2 isUniversalVector, Test if type is a universal one-dimensional slice.)
$(T2 isContiguousMatrix, Test if type is a contiguous two-dimensional slice.)
$(T2 isCanonicalMatrix, Test if type is a canonical two-dimensional slice.)
$(T2 isUniversalMatrix, Test if type is a universal two-dimensional slice.)
$(T2 isIterator, Test if type is a random access iterator.)
)

License: $(HTTP www.apache.org/licenses/LICENSE-2.0, Apache-2.0)
Copyright: 2020 Ilia Ki, Kaleidic Associates Advisory Limited, Symmetry Investments
Authors: John Hall


Macros:
SUBREF = $(REF_ALTTEXT $(TT $2), $2, mir, ndslice, $1)$(NBSP)
T2=$(TR $(TDNW $(LREF $1)) $(TD $+))
+/

module mir.ndslice.traits;

import mir.ndslice.slice : Slice, SliceKind, Contiguous, Universal, Canonical;

/// Test if type is a one-dimensional slice.
enum bool isVector(T) = is(T : Slice!(Iterator, 1, kind), SliceKind kind, Iterator);
                                    
/// Test if type is a two-dimensional slice.
enum bool isMatrix(T) = is(T : Slice!(Iterator, 2, kind), SliceKind kind, Iterator);
                                    
/// Test if type is a contiguous slice.
enum bool isContiguousSlice(T) = is(T : Slice!(Iterator, N, Contiguous), Iterator, size_t N);
                                            
/// Test if type is a canonical slice.
enum bool isCanonicalSlice(T) = is(T : Slice!(Iterator, N, Canonical), Iterator, size_t N);
                                            
/// Test if type is a universal slice.
enum bool isUniversalSlice(T) = is(T : Slice!(Iterator,  N, Universal), Iterator, size_t N);
                                            
/// Test if type is a contiguous one-dimensional slice.
enum bool isContiguousVector(T) = is(T : Slice!(Iterator, 1, Contiguous), Iterator);
                                                    
/// Test if type is a universal one-dimensional slice.
enum bool isUniversalVector(T) = is(T : Slice!(Iterator,  1, Universal), Iterator);
                                                    
/// Test if type is a contiguous two-dimensional slice.
enum bool isContiguousMatrix(T) = is(T : Slice!(Iterator, 2, Contiguous), Iterator);
                                                    
/// Test if type is a canonical two-dimensional slice.
enum bool isCanonicalMatrix(T) = is(T : Slice!(Iterator,  2, Canonical), Iterator);
                                                    
/// Test if type is a universal two-dimensional slice.
enum bool isUniversalMatrix(T) = is(T : Slice!(Iterator,  2, Universal), Iterator);

///
@safe pure nothrow @nogc 
version(mir_ndslice_test) unittest
{
    import mir.ndslice.slice : Slice;

    alias S1 = Slice!(int*);
    static assert(isContiguousVector!S1);
    static assert(!isUniversalVector!S1);
    
    static assert(!isContiguousMatrix!S1);
    static assert(!isCanonicalMatrix!S1);
    static assert(!isUniversalMatrix!S1);
    
    static assert(isVector!S1);
    static assert(!isMatrix!S1);
    
    static assert(isContiguousSlice!S1);
    static assert(!isCanonicalSlice!S1);
    static assert(!isUniversalSlice!S1);
}

@safe pure nothrow @nogc 
version(mir_ndslice_test) unittest
{
    alias S2 = Slice!(float*, 1, Universal);
    static assert(!isContiguousVector!S2);
    static assert(isUniversalVector!S2);
    
    static assert(!isContiguousMatrix!S2);
    static assert(!isCanonicalMatrix!S2);
    static assert(!isUniversalMatrix!S2);
    
    static assert(isVector!S2);
    static assert(!isMatrix!S2);
    
    static assert(!isContiguousSlice!S2);
    static assert(!isCanonicalSlice!S2);
    static assert(isUniversalSlice!S2);
}

@safe pure nothrow @nogc 
version(mir_ndslice_test) unittest
{
    alias S3 = Slice!(byte*, 2);
    static assert(!isContiguousVector!S3);
    static assert(!isUniversalVector!S3);
    
    static assert(isContiguousMatrix!S3);
    static assert(!isCanonicalMatrix!S3);
    static assert(!isUniversalMatrix!S3);
    
    static assert(!isVector!S3);
    static assert(isMatrix!S3);
    
    static assert(isContiguousSlice!S3);
    static assert(!isCanonicalSlice!S3);
    static assert(!isUniversalSlice!S3);
}

@safe pure nothrow @nogc 
version(mir_ndslice_test) unittest
{
    alias S4 = Slice!(int*, 2, Canonical);
    static assert(!isContiguousVector!S4);
    static assert(!isUniversalVector!S4);
    
    static assert(!isContiguousMatrix!S4);
    static assert(isCanonicalMatrix!S4);
    static assert(!isUniversalMatrix!S4);
    
    static assert(!isVector!S4);
    static assert(isMatrix!S4);
    
    static assert(!isContiguousSlice!S4);
    static assert(isCanonicalSlice!S4);
    static assert(!isUniversalSlice!S4);
}

@safe pure nothrow @nogc 
version(mir_ndslice_test) unittest
{
    alias S5 = Slice!(int*, 2, Universal);
    static assert(!isContiguousVector!S5);
    static assert(!isUniversalVector!S5);
    
    static assert(!isContiguousMatrix!S5);
    static assert(!isCanonicalMatrix!S5);
    static assert(isUniversalMatrix!S5);
    
    static assert(!isVector!S5);
    static assert(isMatrix!S5);
    
    static assert(!isContiguousSlice!S5);
    static assert(!isCanonicalSlice!S5);
    static assert(isUniversalSlice!S5);
}

@safe pure nothrow @nogc 
version(mir_ndslice_test) unittest
{
    alias S6 = Slice!(int*, 3);
    
    static assert(!isContiguousVector!S6);
    static assert(!isUniversalVector!S6);
    
    static assert(!isContiguousMatrix!S6);
    static assert(!isCanonicalMatrix!S6);
    static assert(!isUniversalMatrix!S6);
    
    static assert(!isVector!S6);
    static assert(!isMatrix!S6);
    
    static assert(isContiguousSlice!S6);
    static assert(!isCanonicalSlice!S6);
    static assert(!isUniversalSlice!S6);
}

@safe pure nothrow @nogc 
version(mir_ndslice_test) unittest
{
    alias S7 = Slice!(int*, 3, Canonical);

    static assert(!isContiguousVector!S7);
    static assert(!isUniversalVector!S7);
    
    static assert(!isContiguousMatrix!S7);
    static assert(!isCanonicalMatrix!S7);
    static assert(!isUniversalMatrix!S7);
    
    static assert(!isVector!S7);
    static assert(!isMatrix!S7);
    
    static assert(!isContiguousSlice!S7);
    static assert(isCanonicalSlice!S7);
    static assert(!isUniversalSlice!S7);
}

@safe pure nothrow @nogc 
version(mir_ndslice_test) unittest
{
    alias S8 = Slice!(int*, 3, Universal);
    
    static assert(!isContiguousVector!S8);
    static assert(!isUniversalVector!S8);
    
    static assert(!isContiguousMatrix!S8);
    static assert(!isCanonicalMatrix!S8);
    static assert(!isUniversalMatrix!S8);
    
    static assert(!isVector!S8);
    static assert(!isMatrix!S8);
    
    static assert(!isContiguousSlice!S8);
    static assert(!isCanonicalSlice!S8);
    static assert(isUniversalSlice!S8);
}

///
template isIterator(T)
{
    enum isIterator = __traits(compiles, (T a, T b)
    {
        sizediff_t diff = a - b;
        ++a;
        ++b;
        --a;
        --b;
        void foo(V)(auto ref V v)
        {

        }
        foo(a[sizediff_t(3)]);
        auto c = a + sizediff_t(3);
        auto d = a - sizediff_t(3);
        a += sizediff_t(3);
        a -= sizediff_t(3);
        foo(*a);
    });
}