From 238e356324d4edb789894d0b5ee802984ac63e0b Mon Sep 17 00:00:00 2001
From: axexlck <axelclk@gmail.com>
Date: Mon, 6 Nov 2023 16:33:09 +0100
Subject: [PATCH] Added some implementation status

---
 .../core/builtin/LinearAlgebra.java           |  5 ++
 .../core/builtin/TensorFunctions.java         | 46 +++++++++++++++++++
 2 files changed, 51 insertions(+)

diff --git a/symja_android_library/matheclipse-core/src/main/java/org/matheclipse/core/builtin/LinearAlgebra.java b/symja_android_library/matheclipse-core/src/main/java/org/matheclipse/core/builtin/LinearAlgebra.java
index 453e69c66b..3f3cffe8e6 100644
--- a/symja_android_library/matheclipse-core/src/main/java/org/matheclipse/core/builtin/LinearAlgebra.java
+++ b/symja_android_library/matheclipse-core/src/main/java/org/matheclipse/core/builtin/LinearAlgebra.java
@@ -1249,6 +1249,11 @@ public IExpr evaluate(final IAST ast, EvalEngine engine) {
       return F.NIL;
     }
 
+    @Override
+    public int status() {
+      return ImplementationStatus.PARTIAL_SUPPORT;
+    }
+
     @Override
     public int[] expectedArgSize(IAST ast) {
       return ARGS_2_2;
diff --git a/symja_android_library/matheclipse-core/src/main/java/org/matheclipse/core/builtin/TensorFunctions.java b/symja_android_library/matheclipse-core/src/main/java/org/matheclipse/core/builtin/TensorFunctions.java
index e588c21cfa..a1b08bd83a 100644
--- a/symja_android_library/matheclipse-core/src/main/java/org/matheclipse/core/builtin/TensorFunctions.java
+++ b/symja_android_library/matheclipse-core/src/main/java/org/matheclipse/core/builtin/TensorFunctions.java
@@ -13,6 +13,7 @@
 import org.matheclipse.core.eval.util.IAssumptions;
 import org.matheclipse.core.eval.util.OptionArgs;
 import org.matheclipse.core.expression.F;
+import org.matheclipse.core.expression.ImplementationStatus;
 import org.matheclipse.core.expression.S;
 import org.matheclipse.core.expression.data.SparseArrayExpr;
 import org.matheclipse.core.generic.Predicates;
@@ -163,6 +164,11 @@ public IExpr evaluate(final IAST ast, EvalEngine engine) {
       return F.NIL;
     }
 
+    @Override
+    public int status() {
+      return ImplementationStatus.PARTIAL_SUPPORT;
+    }
+
     @Override
     public int[] expectedArgSize(IAST ast) {
       return ARGS_2_3;
@@ -193,6 +199,11 @@ public IExpr evaluate(final IAST ast, EvalEngine engine) {
       return F.NIL;
     }
 
+    @Override
+    public int status() {
+      return ImplementationStatus.PARTIAL_SUPPORT;
+    }
+
     @Override
     public int[] expectedArgSize(IAST ast) {
       return ARGS_1_1;
@@ -258,6 +269,11 @@ public IExpr evaluate(final IAST ast, EvalEngine engine) {
       return F.NIL;
     }
 
+    @Override
+    public int status() {
+      return ImplementationStatus.PARTIAL_SUPPORT;
+    }
+
     @Override
     public int[] expectedArgSize(IAST ast) {
       return ARGS_2_INFINITY;
@@ -298,6 +314,11 @@ public IExpr evaluate(final IAST ast, EvalEngine engine) {
       return leviCivitaNormalForm;
     }
 
+    @Override
+    public int status() {
+      return ImplementationStatus.PARTIAL_SUPPORT;
+    }
+
     @Override
     public int[] expectedArgSize(IAST ast) {
       return ARGS_1_1;
@@ -378,6 +399,11 @@ private static IAST nestedReverseRecursive(IAST kernel, IntList rootKernelDimens
       return reversedList;
     }
 
+    @Override
+    public int status() {
+      return ImplementationStatus.PARTIAL_SUPPORT;
+    }
+
     @Override
     public int[] expectedArgSize(IAST ast) {
       return ARGS_2_2;
@@ -480,6 +506,11 @@ public static IExpr listCorrelate(IAST kernel, IAST tensor, final ISymbol plusFu
       return F.NIL;
     }
 
+    @Override
+    public int status() {
+      return ImplementationStatus.PARTIAL_SUPPORT;
+    }
+
     @Override
     public int[] expectedArgSize(IAST ast) {
       return ARGS_2_2;
@@ -787,6 +818,11 @@ public IExpr evaluate(final IAST ast, EvalEngine engine) {
       return F.NIL;
     }
 
+    @Override
+    public int status() {
+      return ImplementationStatus.PARTIAL_SUPPORT;
+    }
+
     @Override
     public int[] expectedArgSize(IAST ast) {
       return ARGS_1_2;
@@ -961,6 +997,11 @@ protected static IExpr tensorProduct(final IAST tensor1, final IAST tensor2, int
           .evaluate(F.Map(F.Function(F.Times(F.Slot1, tensor2)), tensor1, F.List(tensor1Depth)));
     }
 
+    @Override
+    public int status() {
+      return ImplementationStatus.PARTIAL_SUPPORT;
+    }
+
     @Override
     public void setUp(final ISymbol newSymbol) {
       newSymbol.setAttributes(ISymbol.FLAT | ISymbol.ONEIDENTITY);
@@ -1017,6 +1058,11 @@ public IExpr evaluate(final IAST ast, EvalEngine engine) {
       return F.NIL;
     }
 
+    @Override
+    public int status() {
+      return ImplementationStatus.PARTIAL_SUPPORT;
+    }
+
     @Override
     public int[] expectedArgSize(IAST ast) {
       return ARGS_1_2;